以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  关于ftp上传窗口  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=69930)

--  作者:cyl123
--  发布时间:2015/6/12 21:21:00
--  关于ftp上传窗口
ftp上传文件,如何自制上传窗口,利用ProgressBar显示上传进度?
--  作者:bzfc57
--  发布时间:2015/6/12 23:11:00
--  
图片点击可在新窗口打开查看
--  作者:Bin
--  发布时间:2015/6/13 8:56:00
--  

Upload

将文件上传到FTP,语法:

Upload(sourceFileName, destinationFileName, ShowUI)

sourceFileName:要上传的本地文件,含路径
destinationFileName:目标文件,含路径
ShowUI:逻辑型,是否显示上传进度,默认为False。

如果上传成功,返回True,否则返回False

示例

Dim ftp1 As New FtpClient
ftp1
.Host="196.128.143.28"
ftp1
.Account = "foxuser"
ftp1
.Password = "138238110"
If 
ftp1.Upload("c:\\data\\Desert.jpg","\\update\\Desert.jpg") = True Then
    
Messagebox.show("上传完成!","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)
Else
    
Messagebox.show("上传失败!","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)
End If


--  作者:cyl123
--  发布时间:2015/6/13 18:06:00
--  
bin老师,是要制作窗口,不是自带的,自带显示进度窗口的太丑了。如何自己设计一个可以显示进度的窗口?(获取上传文件的进度数据?)
--  作者:大红袍
--  发布时间:2015/6/14 10:51:00
--  
以下是引用cyl123在2015/6/13 18:06:00的发言:
bin老师,是要制作窗口,不是自带的,自带显示进度窗口的太丑了。如何自己设计一个可以显示进度的窗口?(获取上传文件的进度数据?)

 

这个就太麻烦了,你要重新做ftpclient。建议你还是直接弹出一个提示窗口,说正在上传即可。