易语言FTP操作API源码

系统结构:枚举文件回调,枚举目录回调,FTP连接,FTP断开,FTP上传,FTP创建目录,FTP删除目录,FTP获取现行目录,FTP置现行目录,FTP删除文件,FTP下载文件,FTP文件重命名,FTP打开文件,FTP关闭文件,FTP取文件列表,FTP取目录列表,FTP取文件长度,FTP读文件,FTP文件是否存在,FTP目录是否存在,API_创建Internet会话,API_读Internet文件,API_FTP上传,API_FTP创建目录,API_FTP置现行目录,API_FTP取现行目录,API_FTP删除目录,API_关闭Internet句柄,API_FTP删除文件,API_FTP下载文件,API_FTP文件改名,API_FTP打开文件,API_FTP寻找第一个,API_FTP寻找下一个,API_打开Internet,

======窗口程序集1
           |  |
           |  |------ __启动窗口_创建完毕
           |  |
           |  |------ _按钮1_被单击
           |  |
           |  |------ _按钮3_被单击
           |  |
           |  |------ _按钮2_被单击
           |  |
           |  |------ _按钮4_被单击
           |  |
           |  |------ _按钮5_被单击
           |  |
           |  |------ _按钮6_被单击
           |  |
           |  |------ _按钮7_被单击
           |  |
           |  |------ _按钮8_被单击
           |  |
           |  |------ _按钮9_被单击
           |  |
           |  |------ _按钮10_被单击
           |  |
           |  |------ _按钮11_被单击
           |  |
           |  |------ _按钮12_被单击
           |  |
           |  |------ _按钮13_被单击
           |  |
           |  |------ 枚举文件回调
           |  |
           |  |------ _按钮14_被单击
           |  |
           |  |------ 枚举目录回调
           |  |
           |  |------ _按钮16_被单击
           |  |
           |  |------ _按钮17_被单击
           |  |
           |  |------ _按钮18_被单击
           |  |
           |  |------ _按钮15_被单击
           |  |
           |  |
======FTP操作类
           |  |
           |  |------ _初始化
           |  |
           |  |------ _销毁
           |  |
           |  |------ FTP连接
           |  |
           |  |------ FTP断开
           |  |
           |  |------ FTP上传
           |  |
           |  |------ FTP创建目录
           |  |
           |  |------ FTP删除目录
           |  |
           |  |------ FTP获取现行目录
           |  |
           |  |------ FTP置现行目录
           |  |
           |  |------ FTP删除文件
           |  |
           |  |------ FTP下载文件
           |  |
           |  |------ FTP文件重命名
           |  |
           |  |------ FTP打开文件
           |  |
           |  |------ FTP关闭文件
           |  |
           |  |------ FTP取文件列表
           |  |
           |  |------ FTP取目录列表
           |  |
           |  |------ FTP取文件长度
           |  |
           |  |------ FTP读文件
           |  |
           |  |------ FTP文件是否存在
           |  |
           |  |------ FTP目录是否存在
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   API_创建Internet会话
           |  |
           |  |---[dll]------   API_读Internet文件
           |  |
           |  |---[dll]------   API_FTP上传
           |  |
           |  |---[dll]------   API_FTP创建目录
           |  |
           |  |---[dll]------   API_FTP置现行目录
           |  |
           |  |---[dll]------   API_FTP取现行目录
           |  |
           |  |---[dll]------   API_FTP删除目录
           |  |
           |  |---[dll]------   API_关闭Internet句柄
           |  |
           |  |---[dll]------   API_FTP删除文件
           |  |
           |  |---[dll]------   API_FTP下载文件
           |  |
           |  |---[dll]------   API_FTP文件改名
           |  |
           |  |---[dll]------   API_FTP打开文件
           |  |
           |  |---[dll]------   API_FTP寻找第一个
           |  |
           |  |---[dll]------   API_FTP寻找下一个
           |  |
           |  |---[dll]------   API_打开Internet

调用的DLL命令:

.DLL命令 API_创建Internet会话, 整数型, "wininet.dll", "InternetConnectA", 公开
    .参数 hInternetSession, 整数型
    .参数 sServerName, 文本型
    .参数 nServerPort, 短整数型
    .参数 sUsername, 文本型
    .参数 sPassword, 文本型
    .参数 lService, 整数型
    .参数 lFlags, 整数型
    .参数 lContext, 整数型

.DLL命令 API_读Internet文件, 整数型, "wininet.dll", "InternetReadFile", 公开, InternetReadFile*
    .参数 Internet地址句柄, 整数型, , hFile
    .参数 数据缓冲区, 字节集, , sBuffer
    .参数 读取大小, 整数型, , lNumBytesToRead
    .参数 读取首地址, 整数型, 传址, lNumberOfBytesRead

.DLL命令 API_FTP上传, 逻辑型, "wininet.dll", "FtpPutFileA", 公开
    .参数 hFtpSession, 整数型
    .参数 lpszLocalFile, 文本型
    .参数 lpszRemoteFile, 文本型
    .参数 dwFlags, 整数型
    .参数 dwContext, 整数型

.DLL命令 API_FTP创建目录, 逻辑型, "wininet.dll", "FtpCreateDirectoryA", 公开
    .参数 hFtpSession, 整数型
    .参数 lpszDirectory, 文本型

.DLL命令 API_FTP置现行目录, 逻辑型, "wininet.dll", "FtpSetCurrentDirectoryA", 公开
    .参数 hFtpSession, 整数型
    .参数 lpszDirectory, 文本型

.DLL命令 API_FTP取现行目录, 逻辑型, "wininet.dll", "FtpGetCurrentDirectoryA", 公开
    .参数 hFtpSession, 整数型
    .参数 lpszCurrentDirectory, 文本型, 传址
    .参数 lpdwCurrentDirectory, 整数型, 传址

.DLL命令 API_FTP删除目录, 逻辑型, "wininet.dll", "FtpRemoveDirectoryA", 公开
    .参数 hFtpSession, 整数型
    .参数 lpszDirectory, 文本型

.DLL命令 API_关闭Internet句柄, 整数型, "wininet.dll", "InternetCloseHandle", 公开
    .参数 Internet句柄, 整数型, , hInet

.DLL命令 API_FTP删除文件, 逻辑型, "wininet.dll", "FtpDeleteFileA", 公开
    .参数 hFtpSession, 整数型
    .参数 lpszFileName, 文本型

.DLL命令 API_FTP下载文件, 逻辑型, "wininet.dll", "FtpGetFileA", 公开
    .参数 hFtpSession, 整数型
    .参数 lpszRemoteFile, 文本型
    .参数 lpszNewFile, 文本型
    .参数 fFailIfExists, 逻辑型
    .参数 dwFlagsAndAttributes, 整数型
    .参数 dwFlags, 整数型
    .参数 dwContext, 整数型

.DLL命令 API_FTP文件改名, 逻辑型, "wininet.dll", "FtpRenameFileA", 公开
    .参数 连接句柄, 整数型
    .参数 源文件, 文本型
    .参数 新文件, 文本型

.DLL命令 API_FTP打开文件, 整数型, "wininet.dll", "FtpOpenFileA", 公开
    .参数 连接句柄, 整数型
    .参数 文件名, 文本型
    .参数 模式, 整数型
    .参数 传输模式, 整数型
    .参数 标记, 整数型

.DLL命令 API_FTP寻找第一个, 整数型, "wininet.dll", "FtpFindFirstFileA", 公开
    .参数 句柄, 整数型
    .参数 路径, 文本型
    .参数 文件结构, 文件属性_易之海
    .参数 标记, 整数型
    .参数 标记1, 整数型

.DLL命令 API_FTP寻找下一个, 整数型, "wininet.dll", "InternetFindNextFileA", 公开
    .参数 搜索句柄, 整数型
    .参数 文件结构, 文件属性_易之海

.DLL命令 API_打开Internet, 整数型, "wininet.dll", "InternetOpenA"
    .参数 sAgent, 文本型
    .参数 lAccessType, 整数型
    .参数 sProxyName, 整数型
    .参数 sProxyBypass, 整数型
    .参数 lFlags, 整数型