网卡是一个A/D 接口。

来源：蜘蛛抓取(WebSpider) 时间：2018-12-07 03:25 标签： D/A

.版本 2 .程序集 HTTP读文件程序集 .程序集變量 程序集_完整网址, 文本型 .程序集变量 程序集_访问方式, 文本型, , , "GET" or "POST",为空默认"GET" .程序集变量 程序集_代理地址, 文本型 .程序集变量 程序集_附加协议头, 文夲型 .程序集变量 程序集_页面内容, 字节集 .程序集变量 程序集_线程号, 整数型 .程序集变量 程序集_提交信息, 文本型, , , "POST"专用 .子程序 HTTP读文件字集, 字节集, , 有鈳能线程阻塞,请在外部加超时判断 .参数 参数_完整网址, 文本型 .参数 参数_访问方式, 文本型, 可空, "GET" or "POST",为空默认"GET" .参数 参数_代理地址, 文本型, 可空 .参数 参数_附加协议头, 文本型, 可空 .参数 参数_提交信息, 文本型, 可空, "POST"专用 .参数 参数_超时值, 整数型, 可空 .局部变量 开始时间, 整数型 程序集_完整网址 ＝ 参数_完整網址 程序集_访问方式 ＝ 参数_访问方式 程序集_代理地址 ＝ 参数_代理地址 程序集_附加协议头 ＝ 参数_附加协议头 程序集_提交信息 ＝ 参数_提交信息 程序集_页面内容 ＝ 取空白字节集 (0) .如果真 (是否为空 (参数_超时值) 或 参数_超时值 ＝ 0) 参数_超时值 ＝ 8 .如果真结束 开始时间 ＝ 取启动时间 () 程序集_线程号 ＝ 创建线程 (0, 0, &子程序_读网页, 0, 0, 程序集_线程号) .判断循环首 (程序集_线程号 ＞ 0) 处理事件 () .如果真 (取启动时间 () － 开始时间 ＞ 参数_超时值 × 1000) 销毁线程 (程序集_線程号, 0) 处理事件 () 程序集_页面内容 ＝ 取空白字节集 (0) 程序集_线程号 ＝ 0 .如果真结束 .判断循环尾 () 返回 (程序集_页面内容) .子程序 子程序_读网页 .局部变量 局部_Internet句柄, 整数型 .局部变量 局部_Internet连接句柄, 整数型 .局部变量 局部_HTTP请求句柄, 整数型 .局部变量 局部_域名, 文本型 .局部变量 局部_页面地址, 文本型 .局部变量 局部_整数变量1, 整数型 .局部变量 局部_整数变量2, 整数型 .局部变量 局部_逻辑变量, 逻辑型 .局部变量 局部_文本变量, 文本型 .局部变量 局部_字节集变量, 芓节集 局部_域名 ＝ 子程序_取域名 (程序集_完整网址) 局部_页面地址 ＝ 子程序_取页面地址 (程序集_完整网址) ' 建立基础连接 .如果 (删全部空 (程序集_代理哋址) ＝ “”) 局部_Internet句柄 ＝ zh-cn” ＋ #换行符 .如果真结束 ' 附带信息发送请求 .判断开始 (程序集_访问方式 ＝ “” 或 程序集_访问方式 ＝ “GET”) Http发送请求 (局部_HTTP请求句柄, 程序集_附加协议头, 取文本长度 (程序集_附加协议头), “”, 0) .判断 (程序集_访问方式 ＝ “POST”) .如果真 (程序集_提交信息 ≠ “”) 程序集_附加协议头 ＝ (程序集_附加协议头), 程序集_提交信息, 取文本长度 (程序集_提交信息)) .默认 程序集_页面内容 ＝ 取空白字节集 (0) 返回 () .判断结束 ' 读取页面文本 局部_逻辑变量 ＝ 真 局部_整数变量1 ＝ 0 .判断循环首 (局部_逻辑变量) 局部_字节集变量 ＝ 取空白字节集 (512) 处理事件 () Internet读文件 (局部_HTTP请求句柄, 局部_字节集变量, 取字节集长喥 (局部_字节集变量), 局部_整数变量1) .如果 (局部_整数变量1 ＝ 0) 局部_逻辑变量 ＝ 假 .否则 程序集_页面内容 ＝ 程序集_页面内容 ＋ 取字节集左边 (局部_字节集變量, 局部_整数变量1) .如果结束 .判断循环尾 () ' 取服务器回传协议头 局部_文本变量 ＝ 取空白文本 (1024) HTTP查询信息 局部_整数变量1 ＝ 打开内存文件 () 写出文本 (局蔀_整数变量1, 局部_文本变量) 移到文件首 (局部_整数变量1) .判断循环首 (是否在文件尾 (局部_整数变量1, 假) ＝ 假) 局部_文本变量 ＝ 读入一行 (局部_整数变量1) .如果真 (寻找文本 (局部_文本变量, “Set-Cookie: ”, 1, 真) ＞ 0) 局部_文本变量 ＝ 文本替换 (局部_文本变量, 1, 12, ) 局部_整数变量2 ＝ 寻找文本 (局部_文本变量, “=”, 1, 真) 设置COOKIE (“http://” ＋ 局部_域名, 取文本左边 (局部_文本变量, 局部_整数变量2 － 1), 取文本右边 (局部_文本变量, 取文本长度 (局部_文本变量) － 局部_整数变量2)) .如果真结束 .判断循环尾 () 关閉文件 (局部_整数变量1) .如果真结束 程序集_线程号 ＝ 0 .子程序 子程序_取域名, 文本型 .参数 参数_网址, 文本型 .局部变量 局部_符号位置, 整数型 .局部变量 局蔀_域名, 文本型 .如果 (文本比较 (取文本左边 (参数_网址, 7), “http://”, 假) ≠ 0) 局部_符号位置 ＝ 寻找文本 (参数_网址, “/”, , 真) .如果 (局部_符号位置 ＞ 0) 局部_域名 ＝ 取文本咗边 (参数_网址, 局部_符号位置 － 1) .否则 局部_域名 ＝ 参数_网址 .如果结束 .否则 局部_符号位置 ＝ 寻找文本 (参数_网址, “/”, 8, 真) .如果 (局部_符号位置 ＞ 0) 局部_域洺 ＝ 取文本中间 (参数_网址, 8, 局部_符号位置 － 8) .否则 局部_域名 ＝ 文本替换 (参数_网址, 1, 7, ) .如果结束 .如果结束 局部_符号位置 ＝ 寻找文本 (局部_域名, “:”, 1, 真) .如果真 (局部_符号位置 ＞ 0) 局部_域名 ＝ 取文本左边 (局部_域名, 局部_符号位置 － 1) .如果真结束 返回 (到小写 (局部_域名)) .子程序 子程序_取页面地址, 文本型 .参数 參数_网址, 文本型 .局部变量 局部_页面地址, 文本型 .局部变量 局部_符号位置, 整数型 .局部变量 局部_域名, 文本型 局部_域名 ＝ 子程序_取域名 (参数_网址) 局蔀_符号位置 ＝ 寻找文本 (参数_网址, “/”, 寻找文本 (参数_网址, 局部_域名, 1, 真), 真) .如果 (局部_符号位置 ＞ 0) 局部_页面地址 ＝ 取文本右边 (参数_网址, 取文本长度 (參数_网址) － 局部_符号位置 ＋ 1) .否则 局部_页面地址 ＝ “/” .如果结束 返回 (局部_页面地址) .子程序 子程序_取端口, 整数型 .参数 参数_网址, 文本型 .局部变量 局部_符号位置, 整数型 .局部变量 局部_域名, 文本型 .如果 (文本比较 (取文本左边 (参数_网址, 7), “http://”, 假) ≠ 0) 局部_符号位置 ＝ 寻找文本 (参数_网址, “/”, , 真) .如果 (局蔀_符号位置 ＞ 0) 局部_域名 ＝ 取文本左边 (参数_网址, 局部_符号位置 － 1) .否则 局部_域名 ＝ 参数_网址 .如果结束 .否则 局部_符号位置 ＝ 寻找文本 (参数_网址, “/”, 8, 真) .如果 (局部_符号位置 ＞ 0) 局部_域名 ＝ 取文本中间 (参数_网址, 8, 局部_符号位置 － 8) .否则 局部_域名 ＝ 文本替换 (参数_网址, 1, 7, ) .如果结束 .如果结束 局部_符号位置 ＝ 寻找文本 (局部_域名, “:”,

我要回帖

更多关于 D/A 的文章

 

随机推荐