易语言精易模块批量取出cookie

zgx949

易语言在网页取cookie的时候，用的是精易模块的网页_访问，第一次可以过去成功，但是第二次之后所有的cookie取出来都是空的，但是程序关闭后重新再调试的时候，第一个还是可以取成功，所以总结就是:第一次可以成功，后面都不成功，重启软件后第一次任然能成功
个人看法:可能存在网页访问的缓存，但是不知道要怎么清除，试过用代理，清除cookie，都没办法解决问题
希望大佬能够帮助我解决问题

果冻大砍刀

网页访问模块的cookie是自动管理的,如果你后边网页把这个cookie清空,或者你执行退出操作,cookie可能就没了,你可以看下精易模块网页访问的源代码.也可以把cookie后边那个session参数也填上输出看看

我是赌气才来的

  

子程序名	返回值类型	公开	备 注
批量获取cookie

变量名	类 型	静态	数组	备 注
句柄数组	整数型		0
n	整数型
网页句柄	整数型

线程_初始化COM库 ()
窗口_模糊遍历窗口 (, “Chrome_WidgetWin_1”, , 句柄数组)
计次循环首 (取数组成员数 (句柄数组), n)
网页句柄 ＝ 窗口_取IE浏览框句柄 (句柄数组 [n])
网页填表.初始化 (网页句柄)
如果真 (寻找文本 (网页填表.网页_取地址 (), “mail.qq.com”, , 假) ≠ -1)
如果真 (网页句柄 ≠ 0)
单次显示100个邮件 (网页句柄)
取cookie (网页句柄)


计次循环尾 ()
线程_取消COM库 ()

子程序名	返回值类型	公开	备 注
取cookie	逻辑型
参数名	类 型	参考	可空	数组	备 注
句柄	整数型

变量名	类 型	静态	数组	备 注
cookie	文本型
网址	文本型
文本	文本型
qq号	文本型

' 句柄 ＝ 到整数 (编辑框1.内容)
网页填表.初始化 (句柄)
网页_清除Cookie (“mail.qq.com”)
cookie ＝ 网页填表.网页_读取Cookie ()
网页填表.初始化 (句柄)
网址 ＝ 网页填表.网页_取地址 ()
网页填表.初始化 (句柄)
qq号 ＝ 网页填表.SPAN_取属性值 (“Id==useraddr”, “innerText”, , )
如果 (cookie ≠ “”)
写到文件 (取运行目录 () ＋ “\浏览器取到的cookie.txt”, 到字节集 (文本 ＋ 网址 ＋ “----” ＋ cookie ＋ “----” ＋ 文本_取左边 (qq号, “@”) ＋ #换行符 ))
文本 ＝ 到文本 (读入文件 (取运行目录 () ＋ “\浏览器取到的cookie.txt”))
文件保存.写出 (1, 网址 ＋ “----” ＋ cookie ＋ “----” ＋ 文本_取左边 (qq号, “@”))
日记.输出 (qq号 ＋ “写出cookie成功”)
返回 (真)

日记.输出 (qq号 ＋ “写出cookie失败”)
返回 (假)

.版本 2<br /> <br /> .子程序 批量获取cookie<br /> .局部变量 句柄数组, 整数型, , "0"<br /> .局部变量 n, 整数型<br /> .局部变量 网页句柄, 整数型<br /> <br /> 线程_初始化COM库 ()<br /> 窗口_模糊遍历窗口 (, “Chrome_WidgetWin_1”, , 句柄数组)<br /> <br /> .计次循环首 (取数组成员数 (句柄数组), n)<br />     网页句柄 ＝ 窗口_取IE浏览框句柄 (句柄数组 [n])<br />     网页填表.初始化 (网页句柄)<br />     .如果真 (寻找文本 (网页填表.网页_取地址 (), “mail.qq.com”, , 假) ≠ -1)<br />         .如果真 (网页句柄 ≠ 0)<br />             单次显示100个邮件 (网页句柄)<br />             取cookie (网页句柄)<br />         .如果真结束<br /> <br />     .如果真结束<br /> <br /> .计次循环尾 ()<br /> 线程_取消COM库 ()<br /> <br /> <br /> .子程序 取cookie, 逻辑型<br /> .参数 句柄, 整数型<br /> .局部变量 cookie, 文本型<br /> .局部变量 网址, 文本型<br /> .局部变量 文本, 文本型<br /> .局部变量 qq号, 文本型<br /> <br /> ' 句柄 ＝ 到整数 (编辑框1.内容)<br /> 网页填表.初始化 (句柄)<br /> 网页_清除Cookie (“mail.qq.com”)<br /> cookie ＝ 网页填表.网页_读取Cookie ()<br /> 网页填表.初始化 (句柄)<br /> 网址 ＝ 网页填表.网页_取地址 ()<br /> 网页填表.初始化 (句柄)<br /> qq号 ＝ 网页填表.SPAN_取属性值 (“Id==useraddr”, “innerText”, , )<br /> .如果 (cookie ≠ “”)<br />     写到文件 (取运行目录 () ＋ “\浏览器取到的cookie.txt”, 到字节集 (文本 ＋ 网址 ＋ “----” ＋ cookie ＋ “----” ＋ 文本_取左边 (qq号, “@”) ＋ #换行符))<br />     文本 ＝ 到文本 (读入文件 (取运行目录 () ＋ “\浏览器取到的cookie.txt”))<br />     文件保存.写出 (1, 网址 ＋ “----” ＋ cookie ＋ “----” ＋ 文本_取左边 (qq号, “@”))<br />     日记.输出 (qq号 ＋ “写出cookie成功”)<br />     返回 (真)<br /> <br /> .否则<br />     日记.输出 (qq号 ＋ “写出cookie失败”)<br />     返回 (假)<br /> .如果结束