50精币送出!InternetGetCookieExA获取Cookies问题

小生怕怕啊

InternetGetCookie 和 InternetGetCookieExA 不知道问题出在哪,忘指教!


  

果子

[e].子程序 网页_取cookie, 文本型, 公开
.参数 网址, 文本型
.参数 COOKIE名称, 文本型, 可空, 为空返回全部COOKIE
.局部变量 域名, 文本型
.局部变量 读取内容, 文本型
.局部变量 整数容器1, 整数型
.局部变量 整数容器2, 整数型
域名 ＝ 网页_取域名 (网址)
读取内容 ＝ 取空白文本 (250 × 30)
.如果 (API_InternetGetCookieA (“http://” ＋ 域名, 字符 (0), 读取内容, 250 × 30))
    .如果真 (COOKIE名称 ≠ “”)
        整数容器1 ＝ 寻找文本 (读取内容, COOKIE名称, 1, 真)
        .如果真 (整数容器1 ＝ -1)
            返回 (“”)
        .如果真结束
        整数容器2 ＝ 寻找文本 (读取内容, “;”, 整数容器1, 真)
        .如果 (整数容器2 ＞ 0)
            读取内容 ＝ 取文本中间 (读取内容, 整数容器1 ＋ 取文本长度 (COOKIE名称) ＋ 1, 整数容器2 － 整数容器1 － 取文本长度 (COOKIE名称) － 1)
        .否则
            读取内容 ＝ 取文本右边 (读取内容, 取文本长度 (读取内容) － 整数容器1 － 取文本长度 (COOKIE名称))
        .如果结束

    .如果真结束

    返回 (读取内容)
.否则
    返回 (“”)
.如果结束
[/e]


[e].子程序 网页_取域名, 文本型, 公开, 如：http://www.3600gz.cn/redirect.php，只取出www.3600gz.cn
.参数 网址, 文本型
.局部变量 域名, 文本型

域名 ＝ 子文本替换 (网址, “https://”, “”, , , 真)
域名 ＝ 子文本替换 (域名, “http://”, “”, , , 真)
.判断开始 (寻找文本 (域名, “/”, , 假) ＝ -1)
    域名 ＝ 到小写 (域名)
.默认
    域名 ＝ 到小写 (取文本左边 (域名, 寻找文本 (域名, “/”, , 假) － 1))
.判断结束
.判断开始 (寻找文本 (域名, “:”, , 假) ＝ -1)
    域名 ＝ 到小写 (域名)
.默认
    域名 ＝ 到小写 (取文本左边 (域名, 寻找文本 (域名, “:”, , 假) － 1))
.判断结束
返回 (到小写 (域名))[/e]

[e].DLL命令 API_InternetGetCookieA, 逻辑型, "wininet.dll", "InternetGetCookieA", , 读取COOKIE
    .参数 域名, 文本型
    .参数 名称, 文本型
    .参数 内容, 文本型, 传址
    .参数 尺寸, 整数型, 传址
[/e]

爱家的小懒虫

原来写在子程序里就可以了啊...

euy

肯定是系统的毛病。。。。。

小生怕怕啊

果子 发表于 2011-10-31 22:24

用 InternetGetCookieA  取新浪邮箱Cookies 取不出来?

小生怕怕啊

果子 发表于 2011-10-31 22:24

不知道 IE临时文件夹的COOKIES和当前用户文件夹下的cookies文件夹里面的cookies 有什么区别?

果子

qq578023708 发表于 2011-11-1 20:16
不知道 IE临时文件夹的COOKIES和当前用户文件夹下的cookies文件夹里面的cookies 有什么区别?

他们是关联在一起的,你试试删除掉一个,看看另一下文件夹会不会跟着自动删除

小生怕怕啊

果子 发表于 2011-11-1 21:15
他们是关联在一起的,你试试删除掉一个,看看另一下文件夹会不会跟着自动删除

为什么新浪邮箱的Cookies取不出来呢?

果子

qq578023708 发表于 2011-11-1 21:42
为什么新浪邮箱的Cookies取不出来呢?

你试试直接用 顶级域名取

zldq001

学习了，O(∩_∩)O谢谢