UC知道在用visual basic6.0设计浏览器的时候，怎么样才能对当前网页进行保存呢??
来源：百度知道 编辑：UC知道 时间：2024/07/05 20:49:23
那位大哥能告诉我？？先谢谢了！
我采用了inet来保存成txt格式，是乱码！怎么样才能重新找开呢？
Dim b() As Byte
b() = Inet1.openurl(Combo1.Text, 1)
CommonDialog1.Action = 2
Open CommonDialog1.FileName For Output As #1
Print #1, b()
Close #1
我采用了inet来保存成txt格式，是乱码！怎么样才能重新找开呢？
Dim b() As Byte
b() = Inet1.openurl(Combo1.Text, 1)
CommonDialog1.Action = 2
Open CommonDialog1.FileName For Output As #1
Print #1, b()
Close #1
如果是用webBrowser控件做的浏览器的话,可以直接这样写
WebBrowser1.Navigate Combo1.Text '打开
CommonDialog1.Action = 2
Open CommonDialog1.FileName For Output As #1
Print #1, WebBrowser1.Document.documentElement.innerHTML
Close #1