.版本 2 .支持库 spec .程序集 窗口程序集_启动窗口 .程序集变量 g_cookie, 文本型 .子程序 __启动窗口_创建完毕 读验证码 () .子程序 Get_xml, 字节集 .参数 Url, 文本型 .局部变量 http, 对象 .局部变量 return, 字节集 .局部变量 str, 文本型 加载_G (0) .如果真 (http.创建 (“Microsoft.XMLHTTP”, ) ＝ 假) 调试输出 (“Microsoft.XMLHTTP -> 不成功”) .如果真 (http.创建 (“WinHttp.WinHttpRequest.5.1”, ) ＝ 假) 调试输出 (“WinHttp.WinHttpRequest.5.1 -> 不成功”) .如果真 (http.创建 (“MSXML2.ServerXMLHTTP.6.0”, ) ＝ 假) 调试输出 (“MSXML2.ServerXMLHTTP.6.0 -> 不成功”) .如果真 (http.创建 (“MSXML2.ServerXMLHTTP.5.0”, ) ＝ 假) 调试输出 (“MSXML2.ServerXMLHTTP.5.0 -> 不成功”) 信息框 (“系统不支持本操作”, #警告图标, , ) 返回 ({ }) ' 不支持返回 .如果真结束 .如果真结束 .如果真结束 .如果真结束 http.方法 (“Open”, “GET”, Url, 假) http.方法 (“SetRequestHeader”, “Accept”, “*/*”) http.方法 (“SetRequestHeader”, “Accept-Language”, “zh-CN”) http.方法 (“SetRequestHeader”, “User-Agent”, “Mozilla/5.0 (Windows NT 10.0; Win64; x64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/79.0.3945.88 Safari/537.36”) http.方法 (“SetRequestHeader”, “Accept-Encoding”, “deflate”) http.方法 (“SetRequestHeader”, “Connection”, “Keep-Alive”) http.方法 (“Send”, ) str ＝ http.读文本属性 (“GetallResponseHeaders”, ) g_cookie ＝ 文本_取出中间文本 (str, “Set-Cookie: ”, #换行符) return ＝ http.读属性 (“ResponseBody”, ).取字节集 () 卸载_G () 返回 (return) .子程序 Post_xml, 字节集 .参数 Url, 文本型 .参数 Send, 文本型 .局部变量 http, 对象 .局部变量 return, 字节集 加载_P (0) .如果真 (http.创建 (“Microsoft.XMLHTTP”, ) ＝ 假) 调试输出 (“Microsoft.XMLHTTP -> 不成功”) .如果真 (http.创建 (“WinHttp.WinHttpRequest.5.1”, ) ＝ 假) 调试输出 (“WinHttp.WinHttpRequest.5.1 -> 不成功”) .如果真 (http.创建 (“MSXML2.ServerXMLHTTP.6.0”, ) ＝ 假) 调试输出 (“MSXML2.ServerXMLHTTP.6.0 -> 不成功”) .如果真 (http.创建 (“MSXML2.ServerXMLHTTP.5.0”, ) ＝ 假) 调试输出 (“MSXML2.ServerXMLHTTP.5.0 -> 不成功”) 信息框 (“系统不支持本操作”, #警告图标, , ) 返回 ({ }) ' 不支持返回 .如果真结束 .如果真结束 .如果真结束 .如果真结束 http.方法 (“Open”, “POST”, Url, 假) http.方法 (“SetRequestHeader”, “Accept”, “*/*”) http.方法 (“SetRequestHeader”, “Accept-Language”, “zh-CN”) http.方法 (“SetRequestHeader”, “User-Agent”, “Mozilla/5.0 (Windows NT 10.0; Win64; x64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/79.0.3945.88 Safari/537.36”) http.方法 (“SetRequestHeader”, “Content-Type”, “application/x-www-form-urlencoded”) http.方法 (“SetRequestHeader”, “Accept-Encoding”, “deflate”) http.方法 (“SetRequestHeader”, “Connection”, “Keep-Alive”) http.方法 (“SetRequestHeader”, “Cache-Control”, “no-cache”) http.方法 (“SetRequestHeader”, “Cookie”, g_cookie) http.方法 (“Send”, Send) return ＝ http.读属性 (“ResponseBody”, ).取字节集 () 卸载_P () 返回 (return) .子程序 _按钮1_被单击 .局部变量 str, 文本型 str ＝ 编码_utf8到gb2312 (到文本 (Post_xml (“https://chaxun.360.cn/chaxun/query”, “captcha=” ＋ 编辑框1.内容 ＋ “&search=” ＋ 编辑框2.内容 ＋ “&type=url”))) 调试输出 (str) 编辑框_返回内容.内容 ＝ “” str ＝ 文本_取出中间文本 (str, “main index show-result”, “<h2>”) 编辑框_返回内容.加入文本 (str ＋ #换行符) .子程序 读验证码 图片框1.图片 ＝ Get_xml (“https://captcha.360.cn/image.php?app=safecare&t=1618983068322”) 调试输出 (g_cookie)