网站首页 易语言相关 网络相关源码 正文
资源介绍:
易语言FTP超时处理源码,通过调用windowsAPI实现了FTP超时处理。
资源作者:
@易语言自学网
资源界面:
.版本 2 .支持库 EThread .支持库 spec .程序集 程序集1 .子程序 _启动子程序, 整数型, , 本子程序在程序启动后最先执行 置随机数种子 () 标准输出 (, “START...”) 启动线程 (&demo, , ) 标准输入 () API_FreeConsole () ' 64位没办法 返回 (0) ' 可以根据您的需要返回任意数值 .子程序 demo .局部变量 szHost, 文本型 .局部变量 szUser, 文本型 .局部变量 szPass, 文本型 .局部变量 szLocalFile, 文本型 .局部变量 szRemoteFile, 文本型 .局部变量 dwExitCode, 整数型 .局部变量 dwTimeout, 整数型 .局部变量 threadParam, PARM .局部变量 hThread, 整数型 .局部变量 dwThreadId, 整数型 .局部变量 buff, 文本型 g_hOpen = 0 szHost = 到文本 (取随机数 (1, 255)) + “.” + 到文本 (取随机数 (1, 255)) + “.” + 到文本 (取随机数 (1, 255)) + “.” + 到文本 (取随机数 (1, 255)) 调试输出 (szHost) szUser = “Jiesoft” szPass = “2012” g_hOpen = API_InternetOpen (“FTP sample”, #INTERNET_OPEN_TYPE_DIRECT, 0, 0, 0) .如果真 (g_hOpen = 0) 标准输出 (, #换行符 + “Error on InternetOpen: ” + 到文本 (API_GetLastError ())) 标准输出 (, #换行符 + “END...”) 返回 () .如果真结束 threadParam.pHost = szHost threadParam.pUser = szUser threadParam.pPass = szPass hThread = API_CreateThread (0, 0, 到整数 (&WorkerFunction), 取变量数据地址 (threadParam), 0, dwThreadId) dwTimeout = 5000 .如果真 (API_WaitForSingleObject (hThread, dwTimeout) = #WAIT_TIMEOUT) 标准输出 (, #换行符 + “Can not connect to server in ” + 到文本 (dwTimeout) + “ milliseconds”) .如果真 (g_hOpen ≠ 0) API_InternetCloseHandle (g_hOpen) .如果真结束 API_WaitForSingleObject (hThread, #INFINITE) 标准输出 (, #换行符 + “Thread has exited”) 标准输出 (, #换行符 + “END...”) 返回 () .如果真结束 dwExitCode = 0 .如果真 (API_GetExitCodeThread (hThread, dwExitCode) = 0) 标准输出 (, #换行符 + “Error on GetExitCodeThread: ” + 到文本 (API_GetLastError ())) 标准输出 (, #换行符 + “END...”) 返回 () .如果真结束 API_CloseHandle (hThread) .如果真 (API_FtpGetFile (g_hConnect, szRemoteFile, szLocalFile, 0, #INTERNET_FLAG_RELOAD, #FTP_TRANSFER_TYPE_ASCII, 0) = 0) 标准输出 (, #换行符 + “Error on FtpGetFile: ” + 到文本 (API_GetLastError ())) .如果真结束 .如果真 (g_hConnect ≠ 0) API_InternetCloseHandle (g_hConnect) .如果真结束 .如果真 (g_hOpen ≠ 0) API_InternetCloseHandle (g_hOpen) .如果真结束 标准输出 (, #换行符 + “END...”) .子程序 WorkerFunction, 整数型 .参数 vThreadParm, 整数型 .局部变量 pThreadParm, PARM .局部变量 buff, 文本型 置入代码 ({ 139, 93, 8, 139, 3, 137, 69, 252 }) g_hConnect = API_InternetConnect (g_hOpen, pThreadParm.pHost, #INTERNET_INVALID_PORT_NUMBER, pThreadParm.pUser, pThreadParm.pPass, #INTERNET_SERVICE_FTP, 0, 0) .如果真 (g_hConnect = 0) 标准输出 (, #换行符 + “Error on InternetConnnect: ” + 到文本 (API_GetLastError ())) 返回 (1) .如果真结束 返回 (0)
资源下载:
来源:三叶资源网,欢迎分享,公众号:iisanye,(三叶资源网官方③群:33301895)
- 上一篇: 易语言下载文件源码
- 下一篇: 易语言翻译英文复读机源码
猜你喜欢
- 2019-02-15 M3U8视频批量转码易语言源码
- 2019-02-15 淘宝优惠券查询免登陆高佣转链源码
- 2019-02-15 易语言模拟器中控源码
- 2019-02-15 腾讯滑块图像识别源码 非JS算法 识别率100%
- 2019-02-14 腾讯滑块模块源码及调用例子源码
- 2019-02-14 新浪股吧易语言源码 发帖+顶贴+异常账号解锁
- 2019-02-14 易语言远程桌面管理工具源码
- 2019-02-13 代理指定程序,让指定程序走socks5,纯易语言源码
- 2019-02-13 TCP套接字实现的HTTP服务器源码
- 2019-02-13 微信内存搜索群目录好友目录易语言源码
你 发表评论:
欢迎- 百度站内搜索
- 交流QQ群:33301895
-
三叶资源网官方③群:33301895 加群全凭信仰,群里有的资源网站也会有。 群里只是能及时交流,群主会尽力解答一些会的问题。 设置付费入群,只是为了过滤一些小号无意义广告。 所以不必要为了1块钱加群又退出 群主在群内发的红包都够你抢回来还有的多,更何况还能交流学习。
- 网站分类
-
- 易语言相关
- 网络相关源码
- 图形图像源码
- 系统工具源码
- 易语言模块源码
- 易语言支持库
- 数据库类源码
- 易语言例程
- 易语言游戏开发
- 易语言模块
- 多媒体类源码
- 易语言视频教程
- JS分析教程
- 易语言图文教程
- 易语言常见问题及笔记
- 易语言版本
- 在线教程
- 多线程培训班
- 烧饼多线程教程
- 觅风易语言教程
- 模拟系列教程
- 集中营易语言教程
- 网站公告
- 程序员工具箱
- 编程工具
- 开发工具教程
- 工具源码
- 游戏安全
- 火山相关
- 火山安卓软件
- 火山常见问题及笔记
- 火山安卓源码
- 火山视频教程
- 按键精灵相关
- 按键精灵图文教程
- 按键精灵视频教程
- 按键精灵Q语言
- 按键精灵安卓版
- 其他教程分享
- 互联网那些事
- 业界动态
- 引流推广
- 项目揭秘
- 网络营销
- 营销软件
- 行业软件
- QQ营销软件
- 娱乐软件
- 机器人插件
- 微信营销软件
- 精品软件
- 培训教程
- 技术教程
- 活动线报
- 随机tag
本文暂时没有评论,来添加一个吧(●'◡'●)