vb 自动回帖功能片断:
Set vDoc = WebBrowser1.Document
For i = 0 To vDoc.All.length - 1 '搜索全部文档
With vDoc.All(i)
Select Case UCase(.tagName)
Case "TEXTAREA"
vDoc.All(i).Value = fileR '读文件的内容
Case "BUTTON"
Select Case vDoc.All.Item(i).Name
Case buttonName
.Click
Exit For
End Select
End Select
End With
Next i 以上的片断是在一个循环里,(论坛不断的回帖)但问题是每次都得从新把网页上的全部文档搜索一遍,,性能太差,,有什么解决办法吗,,最好是第一次循环就记住,,可是我不知道怎么实现!!!!高手帮忙!!!
Set vDoc = WebBrowser1.Document
For i = 0 To vDoc.All.length - 1 '搜索全部文档
With vDoc.All(i)
Select Case UCase(.tagName)
Case "TEXTAREA"
vDoc.All(i).Value = fileR '读文件的内容
Case "BUTTON"
Select Case vDoc.All.Item(i).Name
Case buttonName
.Click
Exit For
End Select
End Select
End With
Next i 以上的片断是在一个循环里,(论坛不断的回帖)但问题是每次都得从新把网页上的全部文档搜索一遍,,性能太差,,有什么解决办法吗,,最好是第一次循环就记住,,可是我不知道怎么实现!!!!高手帮忙!!!
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货