| 网站首页 | 业界新闻 | 小组 | 交易 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
共有 331 人关注过本帖
标题:vfp上传文件到ftp?
只看楼主 加入收藏
su0527
Rank: 2
等 级:论坛游民
帖 子:418
专家分:74
注 册:2015-1-10
结帖率:95.76%
  已结贴   问题点数:20  回复次数:6   
vfp上传文件到ftp?

DECLARE LONG URLDownloadToFileA IN Urlmon LONG, STRING@, STRING@, LONG, LONG
DECLARE LONG DeleteUrlCacheEntry IN Wininet STRING@
IF !DIRECTORY("D:\myfolder")
    MD D:\myfolder
ENDIF
? DownloadFile("ftp://qxu1649560463:su6683111@121.42.122.244\myfolder\test", "D:\myfolder\test")
? DownloadFile("ftp://qxu1649560463:su6683111@121.42.122.244\myfolder\update.exe", "D:\myfolder\update.exe")
CLEAR DLLS

FUNCTION DownloadFile(cURL, cLocalFileName)
    IF URLDownloadToFileA(0, @cURL, @cLocalFileName, 0, 0) == 0
        DeleteUrlCacheEntry(@cURL)
        RETURN .T.
    ENDIF
    RETURN .F.   
ENDFUNC

以上代码出自版主吹水佬,用来从服务器上下载文件
请问,如何用上面的方法,写一个上传文件到服务器的代码?
搜索更多相关主题的帖子: 上传文件 ftp vfp STRING LONG 
【推荐】大型监控、工控、组态VC++./C#源码组件库2019下载!
【推荐】超50万数控、建模仿真、电力VC++/.NET图形源码库下载!
【推荐】专业CAD\GIS\业务流程VC++/C#可视化图形软件源码库下载!
2019-09-05 19:54
厨师王德榜
Rank: 12Rank: 12Rank: 12
等 级:贵宾
威 望:83
帖 子:533
专家分:2039
注 册:2013-2-16
  得分:10 
https://blog.  "WinInet和FTP "
可以参看这个资料,无非是wininet对ftp函数的各种封装,声明好了就拿来用 .
2019-09-05 20:21
su0527
Rank: 2
等 级:论坛游民
帖 子:418
专家分:74
注 册:2015-1-10
  得分:0 
回复 2楼 厨师王德榜
学习了一下,不知道如何申明
2019-09-05 21:34
su0527
Rank: 2
等 级:论坛游民
帖 子:418
专家分:74
注 册:2015-1-10
  得分:0 
WinInet 使用手册谁有,中文版最好
2019-09-06 11:44
radiofan
Rank: 2
等 级:论坛游民
威 望:1
帖 子:77
专家分:97
注 册:2006-7-30
  得分:0 
*********上传文本********
Set Library To myFll

hFtp=FtpConnect(FTPip,"username","userpass") &&连接FTP

FtpCreateDir(hFtp,"fordername")  &&创建上传目录

FtpDisconnect(hFtp) &&断开

FtpUploadFile(FTPip,本地文件名,服务器目录+文件名,"username","userpass")

Set Library To
2019-09-06 12:07
radiofan
Rank: 2
等 级:论坛游民
威 望:1
帖 子:77
专家分:97
注 册:2006-7-30
  得分:10 
以下是引用radiofan在2019-9-6 12:07:59的发言:

*********上传文本********
Set Library To myFll

hFtp=FtpConnect(FTPip,"username","userpass") &&连接FTP

FtpCreateDir(hFtp,"fordername")  &&创建上传目录

FtpDisconnect(hFtp) &&断开

FtpUploadFile(FTPip,本地文件名,服务器目录+文件名,"username","userpass")

Set Library To



myfll帮助

函数名:FtpUploadFile(cServer,cLocalFile,cRemoteFile [,cUserName [,cPassword]])
缩写:ftpu
向FTP服务器上传文件,注意:windows服务器可以不区分大小写,而且可以同时使用\或/做为路径,而unix系列服务器则是区分大小写,并且路径只能用/来标识

支持VFP回调SetVFPEvents()来获取进度。

返回值:
逻辑值,为真时,上传成功,否则失败
参数:
cServer:字符型,服务器地址,如127.0.0.1,如果非21端口,请用冒号隔开,如192.168.1.1:22
cLocalFile:字符型,本地文件,应包含全部路径。如d:\test.rar
cRemoteFile:字符型,远程文件,应包含相对于根的路径,如www\test.rar
[cUserName:字符型,访问FTP的用户名,如果使用匿名访问,可以省略此参数
[cPassword]:字符型,访问FTP的密码,如果使用匿名访问,可以省略此参数
示例代码
Set Library To myFll

*将d盘的test.rar上传到服务器的www文件夹下:

?FtpUploadFile("127.0.0.1","d:\test.rar","www\test.rar","admin","a123")

Set Library To
2019-09-06 12:10
su0527
Rank: 2
等 级:论坛游民
帖 子:418
专家分:74
注 册:2015-1-10
  得分:0 
感谢各位,正在测试中……
2019-09-06 19:10
快速回复:vfp上传文件到ftp?
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.161413 second(s), 8 queries.
Copyright©2004-2019, BCCN.NET, All Rights Reserved