
Dim Flm As WinForm.FileManager = e.Form.Controls("FTP文件浏览器")
'MESSAGEBOX.SHOW(Flm.FTPclient.Host)
Dim ftp As New FTPClient
FTP.Host = e.Form.Controls("Host").Value
FTP.Account = e.Form.Controls("Account").Value
FTP.Password = e.Form.Controls("Password").Value
FTP.RootDir = e.Form.Controls("RootDir").Value
Flm.FTPclient = FTP
当修改文本框的内容,再次点击测试,
动态设置FileManager的FTPClient 没有改变
第1次设置根目录:/ZTCY/CMIDJPG/
点击测试按钮,然后,点击管理,能正常连接FTP
第2次设置根目录:/ZTCY/
点击测试按钮,然后,点击(FTP文件浏览器的)管理,不能切换到根目录
但MESSAGEBOX.SHOW 提示显示
MESSAGEBOX.SHOW(Flm.FTPclient.RootDir) 为:/ZTCY/
点击管理按钮,进入后,还是第1次的根目录:/ZTCY/CMIDJPG/
[此贴子已经被作者于2022/9/12 10:04:55编辑过]