一个页面采集的问题
我在制作一个web版本的页面采集程序中遇到一个问题
当使用asp来采集其它方式编码的页面时候需要用到
Function bytes2BSTR(vIn)
Dim strReturn
Dim i
Dim ThisCharCode
Dim NextCharCode
strReturn = ""
For i = 1 To LenB(vIn)
ThisCharCode = AscB(MidB(vIn, i, 1))
If ThisCharCode < &H80 Then
strReturn = strReturn & Chr(ThisCharCode)
Else
NextCharCode = AscB(MidB(vIn, i + 1, 1))
strReturn = strReturn & Chr(CLng(ThisCharCode) * &H100 + CInt(NextCharCode))
i = i + 1
End If
Next
bytes2BSTR = strReturn
End Function
**************************************
这个函数来进行处理才能得到正确的数据,当用使用aspx C#的webhttprequest后讲得到的bytes用encoding.default.getstring(bytes)来处理这样得到的string和asp 中那个vbs函数的结果不一样(前一个能在ie正常显示,后一个老是报错)。请那位大虾帮忙解释一下原因是什么并该怎么解决,谢谢。