读书人

replace html文件 替换后没有任何反应

发布时间: 2012-03-12 12:45:33 作者: rapoo

replace html文件 替换后没有任何反应?
WebBrowser1.Navigate2 "http://www.sss.com "
Dim s2 As String
s2 = WebBrowser1.Document.body.outerHTML
s2 = Replace(s2, " </td> ", "-*- </td> ")

msgbox s2
-----------------------------
用outerHTML innerHTML 都没反应

但是 msgbox Replace( "asdf </td> asdf ", " </td> ", "-*- </td> ") 结果是正确的
为什么? 谢谢

[解决办法]
在webbrowser1的DocumentComplete里面写

Dim s2 As String
s2 = WebBrowser1.Document.body.outerHTML
s2 = Replace(s2, " </td> ", "-*- </td> ")
msgbox s2

读书人网 >VB

热点推荐