以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  ftp上传文件夹的问题  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=124807)

--  作者:rogen
--  发布时间:2018/9/14 6:35:00
--  ftp上传文件夹的问题
最近要用到ftp上传文件和文件夹
搜论坛找到了关键代码:ftp.UploadDirectory("d:\\test1",True)

目前的问题是:
① 只能上传到服务器的根目录吗?
② 第二个参数True,才能上传子目录,但是界面会卡住,设为fasle,只上传一个目录,下面文件和子文件夹不上传;
② 既然是上传整个文件夹了,那么文件数量和体积自然是很大的,给一个进度条,是比较人性化的吧,否则不知道进度也是急人啊。


--  作者:有点甜
--  发布时间:2018/9/14 9:28:00
--  

单独写一个ftpclient吧

 

http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=78301&skin=0

 


--  作者:rogen
--  发布时间:2018/9/14 9:43:00
--  

老师,这例子没看懂,下面是例子里的按钮代码:

 

Dim ftpUrl As New Uri("ftp://127.0.0.1/")
Dim ftp As New FTPHelper(ftpUrl, "test", "test")
addhandler ftp.UploadFileCompleted, addressof client_UploadFileCompleted
addhandler ftp.UploadProgressChanged, addressof client_UploadProgressChanged

ftp.UploadFileAsync(projectpath & "test.jpg", "/test.jpg", True)

 

在哪输入IP、账号、密码?

我要上传D:\\工作资料这个文件夹(包含工作资料这个文件夹本身)到服务器的 /个人资料/下面,并能显示上传进度

要咋改呢?


--  作者:有点甜
--  发布时间:2018/9/14 10:16:00
--  

看懂2楼实例。

 

1、账号密码 Dim ftp As New FTPHelper(ftpUrl, "test", "test")

 

2、看懂全局代码里面的各个方法,找到对应方法调用