Download
从FTP上下载文件,语法:
Download(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.Download("\photo\Desert.jpg","c:\data\Desert.jpg") = True Then
Dim Proc As New Process '定义一个新的Process
Proc.File = "c:\data\Desert.jpg" '指定要打开的文件
Proc.Start()
Else
Messagebox.show("下载失败!","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)
End If
这个改一下就可以了,下载的地址自行指定,文件需要做定期删除,或不删除都可以
[此贴子已经被作者于2021/9/6 17:08:34编辑过]