vb 自动点击网页提交按钮问题

Question

想让VB程序分别自动点击下面HTML代码中的“点击这里” Dim Doc As IHTMLDocument2 Set Doc = WebBrowser1.Document HTML代码如下： <form action="url" method="post"name="form2"> 
<a href="#"  onclick="form2.submit();return false">点击这里 </a> 
</form> <form autocomplete="off" id="frm" name="frm" method="post" action="url" onSubmit="return CheckForm()"> <a href="#" onclick="javascript:IsSkip();return false" >点击这里 </a>  </form> 最好能给出点代码

Answer 1

<form action="url" method="post"name="form2">  
<a href="#"  onclick="form2.submit();return false">点击这里  </a>  
</form> 这段已经解决，请帮忙解决下段代码的点击 <form autocomplete="off" id="frm" name="frm" method="post" action="url" onSubmit="return CheckForm()">  <a href="#" onclick="javascript:IsSkip();return false" >点击这里  </a>   </form>

Answer 2

Dim Doc As HTMLDocument, col As IHTMLElementCollection
Dim href As HTMLAnchorElement
Set Doc = WebBrowser1.Document
Set col = Doc.getElementsByTagName("a")
For Each href In col
'    If href.Name = "frm" Then
         href.Click
'    End If
Next

Answer 3

WebBrowser1.Document.parentWindow.execScript "java函数名", "JavaScript"