INET控件抓网页的问题

Question

我抓了某个网页到本地，放到一个文本文件，然后再用TextStream对象取出分析：
Dim b() As Byte    With Me.Inet1
        b = .OpenURL("http://", 0)
        Open "E:\vb_proj\test\a.txt" For Binary Access Write As #1
        Put #1, , b()
        Close #1    End With分析：发现抓下来的文本文件每个字符都是双字节，用textstream对象没法处理。问：抓下来的文件能是单字节字符文件么？如果是双字符文件，怎么转变为单字符文件？

Answer 1

即然是网页，就用字符串变量保存openURL的内容，同时保存文件时以文本文件的方式打开，即：
Dim s as string
s=inet1.openurl(yoururl)
open youfile for output as #1
print#1,,s
close #1

Answer 2

你这方法不通。因为抓下来的页面存在着大量ascii为0的字符，而字符串是以这个空字符表示结束。一定要想办法要过滤掉这个空字符

Answer 3

“字符串是以这个空字符表示结束”？没有这样的问题呀。VB中对字符串如何结束可没那么多规定的。以下代码运行得好好的。
Dim s As String
    Me.MousePointer = vbHourglass
    With Inet1
       ' .AccessType = icNamedProxy
        .RemoteHost = "127.0.0.1"
        .RemotePort = 80
    End With
       s = Inet1.OpenURL("http://127.0.0.1/index.php")
       
    
    Me.MousePointer = vbNormal
    Text1.Text = s

Answer 4

我又建立了一个字节数组c，然后把b数组导到c数组，导的过程过滤掉0d、0a和00的情况。