当前位置:编程学习 > C#/ASP.NET >>

类型“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) --------------------编程问答--------------------
引用 3 楼 xingyuebuyu 的回复:
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
CopyRight © 2012 站长网 编程知识问答 www.zzzyk.com All Rights Reserved
部份技术文章来自网络,