我初始化后执行建立连接函数，执行到以下这句时
InternetCloseHandle(API_Handle)
会报找不到变量 API_Handle

执行建立连接函数有时快，有时慢，这总结了下，如果很慢时就会报这个错误，

我照您的方法，先用FlashFTP把您建的目录和文件删除，再执行：
SET DEFAULT TO [C:\Users\Administrator\Desktop\ftp]
SET PROCEDURE TO ftp
CLEAR
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


结果如下：

要上传的文件 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

运行结果：

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

好的。

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

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

错误：12003
原因：
连接到 Microsoft FTP 服务器使用 WinInet Api 时，一些 WinInet FTP Api 可能会失败，错误是 12003 (ERROR_INTERNET_EXTENDED_ERROR)。InternetGetLastResponseInfo API 可能会检索到 Internet 的任何具体信息。当 FTP 服务器将意外的状态代码发送到 WinInet 客户端，则可能发生此错误。请注意这可能表示出现错误，但而不是服务器的成功消息或确认 （如确认获取文件、 发送目录列表，等等）。在某些情况下，WinInet FTP Api 可以分析此类消息正确和错误地报告错误。当 WinInet FTP Api 用于连接到某个虚拟机 VAX/FTP 服务器，则可能发生此错误。

解决方案：
不使用 InternetConnect 或 InternetOpenUrl API 中的 INTERNET_FLAG_PASSIVE 标志可避免上述问题。未使用此标志，则 WinInet 使用 FTP 连接，这样就避免了的返回状态代码，这将导致分析问题的活动的语义。

原文地址：http://support.

我估计是因为我的 FTP是虚拟主机的原因。

呵呵，大侠今天不要再回了，再耽误您的时间我就是罪人了。

怕，我很怕，因为里面有三个文件夹，和我上传的一个test.ico呢？呵呵，这是我申请的一个免费FTP空间，用于测试，如果你有需要，你也可以用来测试你的程序。呵呵。