[此贴子已经被作者于2024-6-21 11:52编辑过]

NetFTP V1.02 全新函数，舍去老的函数，重点函数：
*--异步上传一个大文件----------------------------------------------------
*--该方法有断点续传功能
cid                     = [UnloadFileAsync]
strRemoteFileName       = [\unload\NetQR.7z]                                &&远程文件名,必须加全路径
strLocalFileName        = [E:\NetFTP\Unload\NetQR.7z]                        &&保存在本地文件名
?"UnloadFileAsync        异步上传    ->"
??Justfname( strRemoteFileName )
oFtp.UnloadFileAsync( cid ,strRemoteFileName ,  strLocalFileName )


*--异步下载一个大文件----------------------------------------------------------
*--该方法有断点续传功能
cid                     = [DownloadFileAsync]
strRemoteFileName       = [\unload\NetQR.7z]                                &&远程文件名,必须加全路径
strLocalFileName        = [E:\NetFTP\download\NetQR.7z]                        &&保存在本地文件名
?"DownloadFileAsync    异步下载    ->"
??Justfname( strRemoteFileName )
oFtp.DownloadFileAsync( cid ,strRemoteFileName ,  strLocalFileName )

[此贴子已经被作者于2024-6-23 00:12编辑过]

NetFTP V1.031 开启多任务异步下载

[此贴子已经被作者于2024-6-23 21:18编辑过]

V1.033
同步上下载也增加进度显示，但是阻塞当前VFP进程

[此贴子已经被作者于2024-6-24 15:24编辑过]