以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  PictureViewer的远程文件路径问题  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=187276)

--  作者:lianghanyu
--  发布时间:2023/7/5 10:09:00
--  PictureViewer的远程文件路径问题

图片点击可在新窗口打开查看此主题相关图片如下:snipaste_2023-07-05_10-03-06.jpg
图片点击可在新窗口打开查看

图片点击可在新窗口打开查看此主题相关图片如下:snipaste_2023-07-05_10-03-21.jpg
图片点击可在新窗口打开查看
有一个PictureViewer1 控件,初始不设置远程文件。

通过窗口的一按钮,按钮代码如下:

Dim ftp As New FTPClient
ftp.Host = Tables("网络设置").Current("地址")
ftp.Account = Tables("网络设置").Current("帐号")
ftp.Password = Tables("网络设置").Current("密码")
ftp.Port = Tables("网络设置").Current("端口")
ftp.ChangeDir("test\\123")


Dim p1 As WinForm.PictureViewer = e.Form.Controls("PictureViewer1")
p1.FTPClient = ftp

问题:ftp可以连接 ,并且 可以上上传图片。 但是为什么上传的图片存放路径不是在 "test\\123" 下呢?请指教。


图片点击可在新窗口打开查看此主题相关图片如下:snipaste_2023-07-05_10-04-30.jpg
图片点击可在新窗口打开查看



--  作者:有点蓝
--  发布时间:2023/7/5 10:15:00
--  
增加图片,只是把ftp已经上传好的图片的路径添加到单元格而已,说明这个图片是之前已经上传了的,并且路径已经确定。现在只是把这个路径放到单元格记录下来,方便程序下载
--  作者:lianghanyu
--  发布时间:2023/7/5 10:32:00
--  
明白 ,那我先用ftp上传文件到指定目录 ,然后再用 addfile 添加图片  是否就可以实现了

ftp.Upload("D:\\123.jpg", "test\\123\\123.jpg")
p1.AddFile("test\\123\\123.jpg")
p1.FTPClient = ftp

--  作者:有点蓝
--  发布时间:2023/7/5 10:36:00
--  
ftp.Upload("D:\\123.jpg", "test\\123\\123.jpg")
p1.FTPClient = ftp
p1.AddFile("test\\123\\123.jpg")