我用webbrowser的难题,帮帮我吧
我用webbrowser的难题,帮帮我吧
有一些网址 如:
http://bbs.jztele.com/BbsPostReply.aspx?fid=14089972
http://bbs.jztele.com/BbsPostReply.aspx?fid=14089973
http://bbs.jztele.com/BbsPostReply.aspx?fid=14089974
http://bbs.jztele.com/BbsPostReply.aspx?fid=14089975
……………………………………
现在我用webbrowser1.Navigate 访问以上数据,然后进行填表提交,执行完后再打开第二个网址继续执行
问题出现了,当第一个网址正常执行完后,在执行第二个网址的时候,webbrowser1.navigate控件就打不开新的网页,当然的网页内容还是上次的网页能容不变,也不会填表提交, 程序只会在继续执行第3个、第4个,都是一样,
加入了刷新也不行
[解决办法]
将每次填表,提交的过程放进一过程,以不同的URL去调用这一过程,就行了.例如:
Private Sub Command1_Click()URL = ARRAR(URL1, URL2, URL3, URL4, ……)For I = 0 To UBound(URL)xx URL(I)NextEnd SubPrivate Sub xx(ByVal URL As String)WebBrowser1.Navigate2 URLIf Not WebBrowser1.Busy Then填表 , 提交的代码End IfEnd Sub