Foxtable(狐表)用户栏目专家坐堂 → 远程文件管理 中文是乱码,如何处理—已解决


  共有8774人关注过本帖树形打印复制链接

主题:远程文件管理 中文是乱码,如何处理—已解决

帅哥哟,离线,有人找我吗?
lin_hailun
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:狐神 帖子:6708 积分:34304 威望:0 精华:11 注册:2012/8/18 23:10:00
  发帖心情 Post By:2012/9/28 12:27:00 [显示全部帖子]

 才刷新看到解决方法……弄死哥了,还以为是你自己做的一个ftp管理小工具。

 下面是编码转换的一个方法。参考 http://msdn.microsoft.com/zh-cn/library/system.text.encoding%28v=vs.80%29.aspx

'上传的时候,转换编码
Dim file As String = "文件.txt"
Dim bytes() As Byte
Dim utf As Encoding = Encoding.GetEncoding("utf-8")   '这里填ftpClient的字符编码
Dim def As Encoding = Encoding.Default
Bytes = def.GetBytes(file)
Bytes = Encoding.Convert(def, utf, Bytes)   '把本机的编码转换成ftpClient编码的字节数组
file = def.GetString(Bytes)   '得到存储到ftpClient的字符(乱码)
'Output.Show(file)
'然后上传文件. 处理后,在本机是乱码,但上传到服务器,就正常


'在本机显示的时候,也转换一下编码(因为是乱码)
Dim file As String = "鏂囦欢.txt"
Dim bytes() As Byte
Dim utf As Encoding = Encoding.GetEncoding("utf-8")   '这里填ftpClient的字符编码
Dim def As Encoding = Encoding.Default
Bytes = utf.GetBytes(file)
Bytes = Encoding.Convert(utf, def, Bytes)
file = utf.GetString(Bytes)  
'Output.Show(file)
[此贴子已经被作者于2012-9-28 12:27:26编辑过]

 回到顶部