主题：[求助]最新版的2013远程文件管理器是不是有问题呢？

'现场音频FTP

Dim fuwuqi2 As String

Dim yonghu2 As String

Dim mima2 As String

Dim mulu2 As String = GetPY("" & _username & "")

Dim dr2 As DataRow = DataTables("ftp").Find("ftp = '现场音频'")

If dr2 IsNot Nothing Then '如果找到的话

    fuwuqi2 = dr2("服务器")

    yonghu2 = dr2("用户")

    mima2 = dr2("密码")

End If

Dim piv2 As WinForm.FileManager = e.Form.Controls("FileManager1")

Dim ftp2 As New FTPClient

ftp2.host = "" & fuwuqi2 & ""

ftp2.Account = "" & yonghu2 & ""

ftp2.password = "" & mima2 & ""

If ftp2.DirExists("\" & mulu2 & "") Then

    ftp2.RootDir = "\" & mulu2 & ""  '设置根目录

Else

    If ftp2.MakeDir("\" & mulu2 & "") Then

        ftp2.RootDir = "\" & mulu2 & ""  '设置根目录

    Else

        Messagebox.Show("创建目录失败,请重新打开窗口!")

        Return

    End If

End If

piv2.FTPclient = ftp2