web开发 ie edge:Vb的WebBrowser1问题?

来源:百度文库 编辑:中科新闻网 时间:2024/04/29 23:19:44
我想通过WebBrowser1获取网页html代码,然后保存到一个htm文件里
docHtml = WebBrowser1.Document.documentElement.innerHTML
Set Fso = CreateObject("Scripting.FileSystemObject")
Set fout = Fso.CreateTextFile(path)
fout.Write docHtml 这里出错,说是变量错误,估计里面有二进制数
首先我想到,先把docHtml变量赋值给Text
Text2.Text = docHtml
docHtml = Text2.Text
这样再fout.Write docHtml 就能顺利生成htm文件
可是问题是,当获取的网页源代码过多,Text2.Text自动截取了前面几千行数据,后面的就没有了,怎么解决这个问题呢?

用richtextbox控件