关于WebBrowser识别html的问题

我用WebBrowser载入一个网页

然后读取保持html到文件

发现和实际的差别好大。很多位置都出现乱码

再ie中保存出来的就没问题

不知道怎么回事

Function getWebHtml(browser As WebBrowser) As String
    Dim doc As Object
    Dim i As Object
    Dim strHtml As String
   
    Set doc = browser.Document
    For Each i In doc.All
        strHtml = strHtml & Chr(13) & i.innerHtml '
    Next
    getWebHtml = strHtml
End Function

---

估计是字体编码问题，右键查源代码，看看类似下面这句
content="text/html;charset=gb2312"
编码一样就不会再乱码

---

那是因字体与格式不同之故,IE是已商业化智能型色软件, 自己随便两三下搞搞的是无法相比的.

---

那当然了,你还需要把css,图片,js文件等都要下载下来的

你只保存了html肯定不成啊

---

编码是这个编码

我只读body段中的数据

但是出现乱码。我已经把html转义字符replace了。可是还是不行！

不知道怎么回事。

---

引用

编码是这个编码

我只读body段中的数据

但是出现乱码。我已经把html转义字符replace了。可是还是不行！

不知道怎么回事。

大哥我说的你看懂没有??没有样式的保存那肯定不成啊....

WebBrow