类型“System.Text.Encoding”的值无法转换为“Microsoft.VisualBasic.VbStrConv”
原VB代码:Public Function GetHtmlStr(ByVal StrUrl$) As String
Dim XmlHttp, StartTm
XmlHttp = CreateObject("Microsoft.XMLHTTP")
XmlHttp.Open("GET", StrUrl, True)
XmlHttp.send()
GetHtmlStr = StrConv(XmlHttp.responseBody, System.Text.Encoding.Unicode)
XmlHttp = Nothing
End Function
这句:
GetHtmlStr = StrConv(XmlHttp.responseBody, vbUnicode)
换为VB.NET后
vbUnicode 为未声明类型
于是改成
GetHtmlStr = StrConv(XmlHttp.responseBody,System.Text.Encoding.Unicode)
提示:
类型“System.Text.Encoding”的值无法转换为“Microsoft.VisualBasic.VbStrConv”
请问该怎么改? --------------------编程问答-------------------- 应该是个枚举,不是个类型。你试试
VbStrConv枚举中的值,就那么几个,你试试,看哪个可以用。
获取源码你可以看我这个博客
http://blog.csdn.net/wuyazhe/archive/2010/07/17/5741941.aspx
网上找个c#->vb.net语法的网站。转一下vb.net语法就可以了。 --------------------编程问答-------------------- Microsoft.VisualBasic.Strings.StrConv("", Microsoft.VisualBasic.VbStrConv.SimplifiedChinese, 0) --------------------编程问答-------------------- http://topic.csdn.net/u/20110115/14/72288e3a-f192-48a0-a408-01d600ba3e86.html
GetHtmlStr= Microsoft.VisualBasic.StrConv(XmlHttp.responseBody, VbStrConv.Wide) --------------------编程问答--------------------
VbStrConv.Wide 是将字符串中的单字节(半角)字符转换为双字节(全角)字符。
运行了仍然不行
--------------------编程问答-------------------- 同志,.NET时代还用什么Microsoft.XMLHTTP啊。HttpWebRequest不是很好吗
补充:.NET技术 , VB.NET