Foxtable(狐表)用户栏目专家坐堂 → ftp utf-8


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

主题:ftp utf-8

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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2015/5/8 12:32:00 [显示全部帖子]

测试了一下,必须发送指令才能得到服务器反馈的编码信息的,所以这个功能必须是foxtable自己集成。

 

简单一点判断的方法,可以这样做

 


Dim ftp As New FTPClient
ftp.host="127.0.0.1"
ftp.Account = "test"
ftp.password = "test"
ftp.utf8 = True
Dim flist As List(Of String) = ftp.GetFileList
Dim flag As Boolean = ftp.utf8
For i As Integer = flist.Count - 1 To 0 Step -1
    Dim fname = flist(i)
    For Each c As String In fname
        'output.show(fname & " " & asc(c))
        If Asc(c) = 63 Then '说明有中文乱码
            flag = not flag
            Exit For
        End If
    Next
    If flag <> ftp.utf8 Then Exit For
Next
ftp.close

msgbox("utf8:" & flag)


 回到顶部