你设了Default目录，要上传的文件在不在那个目录中啊？

要上传的文件 wininet.h 就在这个目录里的，而且我把设置默认目录的语句注释掉，运行结果还是一样的。

你用? file("wininet.h")看看文件在不在？

SET DEFAULT TO [C:\Users\Administrator\Desktop\ftp]
SET PROCEDURE TO ftp
CLEAR
?'检查文件是否存在：'         ,file("wininet.h")
Ftp_Init()
?'建立连接：'                 , Ftp_Connect("182.236.160.129", "pangchuan",")
?'返回当前目录：'             , Ftp_GetCurrentDir()
?'设置当前目录为web/YT_Pic：' , Ftp_SetCurrentDir("web/YT_Pic")
?'新建目录test：'             , Ftp_CreateDirectory("test")
?'设置当前目录为test：'       , Ftp_SetCurrentDir("test")
?'上传文件：'                 , Ftp_UpLoadFile("wininet.h", "wininet.h")
Ftp_Close()
RETURN

运行结果：

大侠，我自己再好好检查一下吧，今天耽误您太多时间了，很不好意思。还有问题的话，下次再请教您。谢谢您了！

把你C:\Users\Administrator\Desktop\ftp目录中的列表给我看看

好的。

那你自己检查吧，一定是找不着文件的，我试过没问题。实在不行，就在返回.F.的语句后用GetLastErro()获取错误码，到百度中搜索这个错误信息是什么意思。可能跟你把文件放在桌面有点关系。

[ 本帖最后由 TonyDeng 于 2013-8-13 17:02 编辑 ]

那个 wininet.h 文件应该添加进项目那个分类里呢？我先是加在“其他”——“文本文件”，再是加在“代码”——“程序”里，是不是这里出错了呢？

好的，再次感谢大侠，今天耽误了您很多时间，十分抱歉。