易语言API实现FTP上传源码

易语言API实现FTP上传源码系统结构:InternetOpen,InternetConnect,InternetCloseHandle,FtpFindFirstFile,InternetFindNextFile,FtpSetCurrentDirectory,FtpCreateDirectory,FtpGetCurrentDirectory,FtpRemoveDirectory,FtpGetFile,FtpPutFile,FtpOpenFile,FtpDeleteFile,InternetGetLastResponseInfo, ======窗口程序集1 || ||------__启动窗口_创建完毕 || ||------_按钮1_被单击 || ||------_按钮2_被单击 || ||------_按钮3_被单击 || ||------_按钮4_被单击 || || ======调用的Dll || ||---[dll]------InternetOpen || ||---[dll]------InternetConnect || ||---[dll]------InternetCloseHandle || ||---[dll]------FtpFindFirstFile || ||---[dll]------InternetFindNextFile || ||---[dll]------FtpSetCurrentDirectory || ||---[dll]------FtpCreateDirectory || ||---[dll]------FtpGetCurrentDirectory || ||---[dll]------FtpRemoveDirectory || ||---[dll]------FtpGetFile || ||---[dll]------FtpPutFile || ||---[dll]------FtpOpenFile || ||---[dll]------FtpDeleteFile || ||---[dll]------InternetGetLastResponseInfo 调用的DLL命令: .DLL命令InternetOpen,整数型,"wininet.dll","InternetOpenA" .参数sAgent,文本型 .参数lAccessType,整数型 .参数sProxyName,文本型 .参数sProxyBypass,文本型 .参数lFlags,整数型 .DLL命令InternetConnect,整数型,"wininet.dll","InternetConnectA" .参数hInternetSession,整数型 .参数sServerName,文本型 .参数nServerPort,短整数型 .参数sUsername,文本型 .参数sPassword,文本型 .参数lService,整数型 .参数lFlags,整数型 .参数lContext,整数型 .DLL命令InternetCloseHandle,短整数型,"wininet.dll" .参数hInet,整数型 .DLL命令FtpFindFirstFile,整数型,"wininet.dll","FtpFindFirstFileA" .参数hFtpSession,整数型 .参数lpszSearchFile,文本型 .参数lpFindFileData,WIN32_FIND_DATA,传址 .参数dwFlags,整数型 .参数dwContent,整数型 .DLL命令InternetFindNextFile,整数型,"wininet.dll","InternetFindNextFileA" .参数hFind,整数型 .参数lpvFindData,WIN32_FIND_DATA,传址 .DLL命令FtpSetCurrentDirectory,逻辑型,"wininet.dll","FtpSetCurrentDirectoryA" .参数hFtpSession,整数型 .参数lpszDirectory,文本型 .DLL命令FtpCreateDirectory,逻辑型,"wininet.dll","FtpCreateDirectoryA" .参数hFtpSession,整数型 .参数lpszDirectory,文本型 .DLL命令FtpGetCurrentDirectory,逻辑型,"wininet.dll","FtpGetCurrentDirectoryA" .参数hFtpSession,整数型 .参数lpszCurrentDirectory,文本型,传址 .参数lpdwCurrentDirectory,整数型,传址 .DLL命令FtpRemoveDirectory,逻辑型,"wininet.dll","FtpRemoveDirectoryA" .参数hFtpSession,整数型 .参数lpszDirectory,文本型 .DLL命令FtpGetFile,逻辑型,"wininet.dll","FtpGetFileA" .参数hFtpSession,整数型 .参数lpszRemoteFile,文本型 .参数lpszNewFile,文本型 .参数fFailIfExists,逻辑型 .参数dwFlagsAndAttributes,整数型 .参数dwFlags,整数型 .参数dwContext,整数型 .DLL命令FtpPutFile,逻辑型,"wininet.dll","FtpPutFileA" .参数hFtpSession,整数型 .参数lpszLocalFile,文本型 .参数lpszRemoteFile,文本型 .参数dwFlags,整数型 .参数dwContext,整数型 .DLL命令FtpOpenFile,整数型,"wininet.dll","FtpOpenFileA" .参数hFtpSession,整数型 .参数sFileName,文本型 .参数lAccess,整数型 .参数lFlags,整数型 .参数lContext,整数型 .DLL命令FtpDeleteFile,逻辑型,"wininet.dll","FtpDeleteFileA" .参数hFtpSession,整数型 .参数lpszFileName,文本型 .DLL命令InternetGetLastResponseInfo,逻辑型,"wininet.dll","InternetGetLastResponseInfoA" .参数lpdwError,整数型,传址 .参数lpszBuffer,文本型 .参数lpdwBufferLength,整数型,传址