62,050
社区成员
发帖
与我相关
我的任务
分享utf-8(gb2312)转big5,请教
我要做一个web app Url页面，并以HTTP POST 一个xml信息，要求用big5编码，
也就是对方收到xml包的信息为繁体，并且保证不能是乱码。。对方解析xml包的时候是用big5编码
我试了好多方法都不行。
也就是对方收到xml包的信息为繁体，并且保证不能是乱码。。对方解析xml包的时候是用big5编码
我试了好多方法都不行。
...全文
请发表友善的回复…
发表回复
chmodyou 2005-11-23
- 打赏
- 举报
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
''big5转gb2312
Dim str As String = TextBox1.Text
Dim gb2312 As String = Encoding.Default.GetString(Encoding.Convert(Encoding.GetEncoding(950), Encoding.GetEncoding(936), Encoding.Default.GetBytes(str)))
TextBox2.Text = StrConv(gb2312, VbStrConv.SimplifiedChinese)
End Sub
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
''gb2312转big5
Dim str As String = TextBox1.Text
str = StrConv(str, VbStrConv.TraditionalChinese)
TextBox2.Text = Encoding.Default.GetString(Encoding.Convert(Encoding.GetEncoding(936), Encoding.GetEncoding(950), Encoding.Default.GetBytes(str)))
End Sub
''big5转gb2312
Dim str As String = TextBox1.Text
Dim gb2312 As String = Encoding.Default.GetString(Encoding.Convert(Encoding.GetEncoding(950), Encoding.GetEncoding(936), Encoding.Default.GetBytes(str)))
TextBox2.Text = StrConv(gb2312, VbStrConv.SimplifiedChinese)
End Sub
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
''gb2312转big5
Dim str As String = TextBox1.Text
str = StrConv(str, VbStrConv.TraditionalChinese)
TextBox2.Text = Encoding.Default.GetString(Encoding.Convert(Encoding.GetEncoding(936), Encoding.GetEncoding(950), Encoding.Default.GetBytes(str)))
End Sub
liuredstar 2005-11-23
- 打赏
- 举报
好问题，顶一下。
jackymi 2005-11-22
- 打赏
- 举报
utf-8不行吗? 我所有的xml都是用utf-8编码的,国外的朋友也没有见到有乱码的情况出现
bitliuyang 2005-11-22
- 打赏
- 举报
这个问题不错，不要沉了，顶，等待高手。
zwp315 2005-11-22
- 打赏
- 举报
我的目的就是给对方post发的xml数据包，对方解析后不是乱码就行
