找回密码  加入

AUTOIT CN

搜索
楼主: heavenm

[AU3基础] 正则获取网址主域名的方法

[复制链接]
 楼主| 发表于 2018-8-17 01:41:14 | 显示全部楼层
(?i)(f|https?:\/\/)(?:\w+\.)?(\w+)((?:\.\w+(?:.cn)?$)|(?:\.\w+(?:.cn)?))
好像这个可以完美处理
 楼主| 发表于 2018-8-17 01:45:36 | 显示全部楼层
(?i)(f|https?:\/\/)(?:\w+\.)?((?:\w+\.\w+(?:.cn)?$)|(?:\w+\.\w+(?:.cn)?))

跟AFAN学习的改进版本,这样子显示感觉更适用!
发表于 2018-8-17 14:31:02 | 显示全部楼层
heavenm 发表于 2018-8-17 01:45
[mw_shl_code=applescript,true](?i)(f|https?:\/\/)(?:\w+\.)?((?:\w+\.\w+(?:.cn)?$)|(?:\w+\.\w+(?:.cn) ...

如果不能正确分解这两个网址,可能都不正确
http://qqq.[url]www.eee.example.com.cc:1234/test/test.htm#part1[/url]
https://qqq.[url]www.eee.example.com.cc:1234/test/test.asp?f=search[/url]
协议:http:
子域名:qqq.www.eee
主域名:example.com.cc
端口:1234
路径:test/test.htm
锚/查询:part1/f=search

如果只要qqq.www.eee.example.com.cc还有可能,这个再分解就难咯。
 楼主| 发表于 2018-8-17 21:43:13 | 显示全部楼层
志艺风云 发表于 2018-8-17 14:31
如果不能正确分解这两个网址,可能都不正确
http://qqq.www.eee.example.com.cc:1234/test/test.htm#par ...

没有com.cc这个域名后缀
我只听说过二级域名,没见过三级,甚至四级域名过!
发表于 2018-8-18 02:27:38 | 显示全部楼层
你百度一下 域名



本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?加入

x
发表于 2018-8-18 09:20:57 | 显示全部楼层
(?:f|https?://|https?://\w+?\.|\w+?\.)?([^\.\?\+:/]+(?:\.cn|\.com|\.edu|\.gov|\.int|\.mil|\.net|\.org|\.biz|\.info|\.pro|\.name|\.museum|\.coop|\.aero|\.xxx|\.idv|\.al|\.dz|\.af|\.ar|\.ae|\.aw|\.om|\.az|\.eg|\.et|\.ie|\.ee|\.ad|\.ao|\.ai|\.ag|\.at|\.au|\.mo|\.bb|\.pg|\.bs|\.pk|\.py|\.ps|\.bh|\.pa|\.br|\.by|\.bm|\.bg|\.mp|\.bj|\.be|\.is|\.pr|\.ba|\.pl|\.bo|\.bz|\.bw|\.bt|\.bf|\.bi|\.bv|\.kp|\.gq|\.dk|\.de|\.tl|\.tp|\.tg|\.dm|\.do|\.ru|\.ec|\.er|\.fr|\.fo|\.pf|\.gf|\.tf|\.va|\.ph|\.fj|\.fi|\.cv|\.fk|\.gm|\.cg|\.cd|\.co|\.cr|\.gg|\.gd|\.gl|\.ge|\.cu|\.gp|\.gu|\.gy|\.kz|\.ht|\.kr|\.nl|\.an|\.hm|\.hn|\.ki|\.dj|\.kg|\.gn|\.gw|\.ca|\.gh|\.ga|\.kh|\.cz|\.zw|\.cm|\.qa|\.ky|\.km|\.ci|\.kw|\.cc|\.hr|\.ke|\.ck|\.lv|\.ls|\.la|\.lb|\.lt|\.lr|\.ly|\.li|\.re|\.lu|\.rw|\.ro|\.mg|\.im|\.mv|\.mt|\.mw|\.my|\.ml|\.mk|\.mh|\.mq|\.yt|\.mu|\.mr|\.us|\.um|\.as|\.vi|\.mn|\.ms|\.bd|\.pe|\.fm|\.mm|\.md|\.ma|\.mc|\.mz|\.mx|\.nr|\.np|\.ni|\.ne|\.ng|\.nu|\.no|\.nf|\.na|\.za|\.aq|\.gs|\.eu|\.pw|\.pn|\.pt|\.jp|\.se|\.ch|\.sv|\.ws|\.yu|\.sl|\.sn|\.cy|\.sc|\.sa|\.cx|\.st|\.sh|\.kn|\.lc|\.sm|\.pm|\.vc|\.lk|\.sk|\.si|\.sj|\.sz|\.sd|\.sr|\.sb|\.so|\.tj|\.tw|\.th|\.tz|\.to|\.tc|\.tt|\.tn|\.tv|\.tr|\.tm|\.tk|\.wf|\.vu|\.gt|\.ve|\.bn|\.ug|\.ua|\.uy|\.uz|\.es|\.eh|\.gr|\.hk|\.sg|\.nc|\.nz|\.hu|\.sy|\.jm|\.am|\.ac|\.ye|\.iq|\.ir|\.il|\.it|\.in|\.id|\.uk|\.vg|\.io|\.jo|\.vn|\.zm|\.je|\.td|\.gi|\.cl|\.cf|\.yr|\.ac\.cn|\.ah\.cn|\.bj\.cn|\.com\.cn|\.cq\.cn|\.fj\.cn|\.gd\.cn|\.gov\.cn|\.gs\.cn|\.gx\.cn|\.gz\.cn|\.ha\.cn|\.hb\.cn|\.he\.cn|\.hi\.cn|\.hk\.cn|\.hl\.cn|\.hn\.cn|\.jl\.cn|\.js\.cn|\.jx\.cn|\.ln\.cn|\.mo\.cn|\.net\.cn|\.nm\.cn|\.nx\.cn|\.org\.cn))(?:[^\.\w]|/|$|\v)
发表于 2018-8-18 09:21:20 | 显示全部楼层
你得把上面的后缀全部添加进去才可以
 楼主| 发表于 2018-9-16 00:33:44 | 显示全部楼层
haijie1223 发表于 2018-8-18 09:20
(?:f|https?://|https?://\w+?\.|\w+?\.)?([^\.\?\+:/]+(?:\.cn|\.com|\.edu|\.gov|\.int|\.mil|\.net|\.or ...

这个可以匹配三级,四级域名,但是我想了半天,想不到
怎么把协议匹配出来

怎么匹配HTTP://出来?
HTTP://
xxx.com
发表于 2018-9-16 22:03:27 | 显示全部楼层
heavenm 发表于 2018-9-16 00:33
这个可以匹配三级,四级域名,但是我想了半天,想不到
怎么把协议匹配出来

不懂你的意思
 楼主| 发表于 2018-9-20 01:26:28 | 显示全部楼层

现在匹配返回的结果只有 XXX.COM
能不能返回
协议
HTTP://XXX.COM
这两个结果哈!
发表于 2018-9-20 07:13:07 | 显示全部楼层
(?:f|(https?://)|(https?://)\w+?\.|\w+?\.)?([^\.\?\+:/]+(?:\.cn|\.com|\.edu|\.gov|\.int|\.mil|\.net|\.org|\.biz|\.info|\.pro|\.name|\.museum|\.coop|\.aero|\.xxx|\.idv|\.al|\.dz|\.af|\.ar|\.ae|\.aw|\.om|\.az|\.eg|\.et|\.ie|\.ee|\.ad|\.ao|\.ai|\.ag|\.at|\.au|\.mo|\.bb|\.pg|\.bs|\.pk|\.py|\.ps|\.bh|\.pa|\.br|\.by|\.bm|\.bg|\.mp|\.bj|\.be|\.is|\.pr|\.ba|\.pl|\.bo|\.bz|\.bw|\.bt|\.bf|\.bi|\.bv|\.kp|\.gq|\.dk|\.de|\.tl|\.tp|\.tg|\.dm|\.do|\.ru|\.ec|\.er|\.fr|\.fo|\.pf|\.gf|\.tf|\.va|\.ph|\.fj|\.fi|\.cv|\.fk|\.gm|\.cg|\.cd|\.co|\.cr|\.gg|\.gd|\.gl|\.ge|\.cu|\.gp|\.gu|\.gy|\.kz|\.ht|\.kr|\.nl|\.an|\.hm|\.hn|\.ki|\.dj|\.kg|\.gn|\.gw|\.ca|\.gh|\.ga|\.kh|\.cz|\.zw|\.cm|\.qa|\.ky|\.km|\.ci|\.kw|\.cc|\.hr|\.ke|\.ck|\.lv|\.ls|\.la|\.lb|\.lt|\.lr|\.ly|\.li|\.re|\.lu|\.rw|\.ro|\.mg|\.im|\.mv|\.mt|\.mw|\.my|\.ml|\.mk|\.mh|\.mq|\.yt|\.mu|\.mr|\.us|\.um|\.as|\.vi|\.mn|\.ms|\.bd|\.pe|\.fm|\.mm|\.md|\.ma|\.mc|\.mz|\.mx|\.nr|\.np|\.ni|\.ne|\.ng|\.nu|\.no|\.nf|\.na|\.za|\.aq|\.gs|\.eu|\.pw|\.pn|\.pt|\.jp|\.se|\.ch|\.sv|\.ws|\.yu|\.sl|\.sn|\.cy|\.sc|\.sa|\.cx|\.st|\.sh|\.kn|\.lc|\.sm|\.pm|\.vc|\.lk|\.sk|\.si|\.sj|\.sz|\.sd|\.sr|\.sb|\.so|\.tj|\.tw|\.th|\.tz|\.to|\.tc|\.tt|\.tn|\.tv|\.tr|\.tm|\.tk|\.wf|\.vu|\.gt|\.ve|\.bn|\.ug|\.ua|\.uy|\.uz|\.es|\.eh|\.gr|\.hk|\.sg|\.nc|\.nz|\.hu|\.sy|\.jm|\.am|\.ac|\.ye|\.iq|\.ir|\.il|\.it|\.in|\.id|\.uk|\.vg|\.io|\.jo|\.vn|\.zm|\.je|\.td|\.gi|\.cl|\.cf|\.yr|\.ac\.cn|\.ah\.cn|\.bj\.cn|\.com\.cn|\.cq\.cn|\.fj\.cn|\.gd\.cn|\.gov\.cn|\.gs\.cn|\.gx\.cn|\.gz\.cn|\.ha\.cn|\.hb\.cn|\.he\.cn|\.hi\.cn|\.hk\.cn|\.hl\.cn|\.hn\.cn|\.jl\.cn|\.js\.cn|\.jx\.cn|\.ln\.cn|\.mo\.cn|\.net\.cn|\.nm\.cn|\.nx\.cn|\.org\.cn))(?:[^\.\w]|/|$|\v)

评分

1

查看全部评分

 楼主| 发表于 2018-9-21 15:03:41 | 显示全部楼层
haijie1223 发表于 2018-9-20 07:13
(?:f|(https?://)|(https?://)\w+?\.|\w+?\.)?([^\.\?\+:/]+(?:\.cn|\.com|\.edu|\.gov|\.int|\.mil|\.net| ...
  1. (https?://).*?([^\.\?\+:/]++(?:\.cn|\.com|\.edu|\.gov|\.int|\.mil|\.net|\.org|\.biz|\.info|\.pro|\.name|\.museum|\.coop|\.aero|\.xxx|\.idv|\.al|\.dz|\.af|\.ar|\.ae|\.aw|\.om|\.az|\.eg|\.et|\.ie|\.ee|\.ad|\.ao|\.ai|\.ag|\.at|\.au|\.mo|\.bb|\.pg|\.bs|\.pk|\.py|\.ps|\.bh|\.pa|\.br|\.by|\.bm|\.bg|\.mp|\.bj|\.be|\.is|\.pr|\.ba|\.pl|\.bo|\.bz|\.bw|\.bt|\.bf|\.bi|\.bv|\.kp|\.gq|\.dk|\.de|\.tl|\.tp|\.tg|\.dm|\.do|\.ru|\.ec|\.er|\.fr|\.fo|\.pf|\.gf|\.tf|\.va|\.ph|\.fj|\.fi|\.cv|\.fk|\.gm|\.cg|\.cd|\.co|\.cr|\.gg|\.gd|\.gl|\.ge|\.cu|\.gp|\.gu|\.gy|\.kz|\.ht|\.kr|\.nl|\.an|\.hm|\.hn|\.ki|\.dj|\.kg|\.gn|\.gw|\.ca|\.gh|\.ga|\.kh|\.cz|\.zw|\.cm|\.qa|\.ky|\.km|\.ci|\.kw|\.cc|\.hr|\.ke|\.ck|\.lv|\.ls|\.la|\.lb|\.lt|\.lr|\.ly|\.li|\.re|\.lu|\.rw|\.ro|\.mg|\.im|\.mv|\.mt|\.mw|\.my|\.ml|\.mk|\.mh|\.mq|\.yt|\.mu|\.mr|\.us|\.um|\.as|\.vi|\.mn|\.ms|\.bd|\.pe|\.fm|\.mm|\.md|\.ma|\.mc|\.mz|\.mx|\.nr|\.np|\.ni|\.ne|\.ng|\.nu|\.no|\.nf|\.na|\.za|\.aq|\.gs|\.eu|\.pw|\.pn|\.pt|\.jp|\.se|\.ch|\.sv|\.ws|\.yu|\.sl|\.sn|\.cy|\.sc|\.sa|\.cx|\.st|\.sh|\.kn|\.lc|\.sm|\.pm|\.vc|\.lk|\.sk|\.si|\.sj|\.sz|\.sd|\.sr|\.sb|\.so|\.tj|\.tw|\.th|\.tz|\.to|\.tc|\.tt|\.tn|\.tv|\.tr|\.tm|\.tk|\.wf|\.vu|\.gt|\.ve|\.bn|\.ug|\.ua|\.uy|\.uz|\.es|\.eh|\.gr|\.hk|\.sg|\.nc|\.nz|\.hu|\.sy|\.jm|\.am|\.ac|\.ye|\.iq|\.ir|\.il|\.it|\.in|\.id|\.uk|\.vg|\.io|\.jo|\.vn|\.zm|\.je|\.td|\.gi|\.cl|\.cf|\.yr|\.ac\.cn|\.ah\.cn|\.bj\.cn|\.com\.cn|\.cq\.cn|\.fj\.cn|\.gd\.cn|\.gov\.cn|\.gs\.cn|\.gx\.cn|\.gz\.cn|\.ha\.cn|\.hb\.cn|\.he\.cn|\.hi\.cn|\.hk\.cn|\.hl\.cn|\.hn\.cn|\.jl\.cn|\.js\.cn|\.jx\.cn|\.ln\.cn|\.mo\.cn|\.net\.cn|\.nm\.cn|\.nx\.cn|\.org\.cn))(?:[^\.\w]|/|$|\v)
复制代码

返回结果还是有问题,修改了下
其实前面只要特别简单就能处理搞定了
(https?://).*?
感觉现在蛮完美的了
 楼主| 发表于 2018-9-21 15:15:24 | 显示全部楼层
这个东东的作用是为了清理域名的COOKIE!
  1. Func _IEEx_ClearCookie($_object, $_mode = 0)
  2.         Local $_url
  3.         If IsObj($_object) Then
  4.                 $_url = $_object.locationurl
  5.         Else
  6.                 $_url = $_object
  7.         EndIf
  8.         $_url = StringRegExp($_url, '(https?://).*?([^\.\?\+:/]++(?:\.cn|\.com|\.edu|\.gov|\.int|\.mil|\.net|\.org|\.biz|\.info|\.pro|\.name|\.museum|\.coop|\.aero|\.xxx|\.idv|\.al|\.dz|\.af|\.ar|\.ae|\.aw|\.om|\.az|\.eg|\.et|\.ie|\.ee|\.ad|\.ao|\.ai|\.ag|\.at|\.au|\.mo|\.bb|\.pg|\.bs|\.pk|\.py|\.ps|\.bh|\.pa|\.br|\.by|\.bm|\.bg|\.mp|\.bj|\.be|\.is|\.pr|\.ba|\.pl|\.bo|\.bz|\.bw|\.bt|\.bf|\.bi|\.bv|\.kp|\.gq|\.dk|\.de|\.tl|\.tp|\.tg|\.dm|\.do|\.ru|\.ec|\.er|\.fr|\.fo|\.pf|\.gf|\.tf|\.va|\.ph|\.fj|\.fi|\.cv|\.fk|\.gm|\.cg|\.cd|\.co|\.cr|\.gg|\.gd|\.gl|\.ge|\.cu|\.gp|\.gu|\.gy|\.kz|\.ht|\.kr|\.nl|\.an|\.hm|\.hn|\.ki|\.dj|\.kg|\.gn|\.gw|\.ca|\.gh|\.ga|\.kh|\.cz|\.zw|\.cm|\.qa|\.ky|\.km|\.ci|\.kw|\.cc|\.hr|\.ke|\.ck|\.lv|\.ls|\.la|\.lb|\.lt|\.lr|\.ly|\.li|\.re|\.lu|\.rw|\.ro|\.mg|\.im|\.mv|\.mt|\.mw|\.my|\.ml|\.mk|\.mh|\.mq|\.yt|\.mu|\.mr|\.us|\.um|\.as|\.vi|\.mn|\.ms|\.bd|\.pe|\.fm|\.mm|\.md|\.ma|\.mc|\.mz|\.mx|\.nr|\.np|\.ni|\.ne|\.ng|\.nu|\.no|\.nf|\.na|\.za|\.aq|\.gs|\.eu|\.pw|\.pn|\.pt|\.jp|\.se|\.ch|\.sv|\.ws|\.yu|\.sl|\.sn|\.cy|\.sc|\.sa|\.cx|\.st|\.sh|\.kn|\.lc|\.sm|\.pm|\.vc|\.lk|\.sk|\.si|\.sj|\.sz|\.sd|\.sr|\.sb|\.so|\.tj|\.tw|\.th|\.tz|\.to|\.tc|\.tt|\.tn|\.tv|\.tr|\.tm|\.tk|\.wf|\.vu|\.gt|\.ve|\.bn|\.ug|\.ua|\.uy|\.uz|\.es|\.eh|\.gr|\.hk|\.sg|\.nc|\.nz|\.hu|\.sy|\.jm|\.am|\.ac|\.ye|\.iq|\.ir|\.il|\.it|\.in|\.id|\.uk|\.vg|\.io|\.jo|\.vn|\.zm|\.je|\.td|\.gi|\.cl|\.cf|\.yr|\.ac\.cn|\.ah\.cn|\.bj\.cn|\.com\.cn|\.cq\.cn|\.fj\.cn|\.gd\.cn|\.gov\.cn|\.gs\.cn|\.gx\.cn|\.gz\.cn|\.ha\.cn|\.hb\.cn|\.he\.cn|\.hi\.cn|\.hk\.cn|\.hl\.cn|\.hn\.cn|\.jl\.cn|\.js\.cn|\.jx\.cn|\.ln\.cn|\.mo\.cn|\.net\.cn|\.nm\.cn|\.nx\.cn|\.org\.cn))(?:[^\.\w]|/|$|\v)', 3)
  9.         Switch $_mode
  10.                 Case 0
  11.                         RunWait('RunDll32.exe InetCpl.cpl,ClearMyTracksByProcess 255')
  12.                         Return 1
  13.                 Case 1
  14.                         $__cookie = $_object.document.cookie
  15.                 Case 2
  16.                         $__cookie = _WinINet_InternetGetCookieEx($_url[0] & $_url[1], Null, 8192)
  17.         EndSwitch
  18.        
  19.         $__cookie = StringRegExp($__cookie, "\S*=", 3)
  20.         If @error Then Return 0
  21.         For $i = 0 To UBound($__cookie) - 1
  22.                 Switch $_mode
  23.                         Case 1
  24.                                 $_object.document.cookie = $__cookie[$i] & '; Domain=' & $_url[1] & '; Expires=Thu, 01-Jan-1970 00:00:10 GMT; Path=/'
  25.                         Case 2
  26.                                 _WinINet_InternetSetCookie($_url[0] & $_url[1], $__cookie[$i] & '; Expires=Thu, 01-Jan-1970 00:00:10 GMT; Path=/')
  27.                 EndSwitch
  28.         Next
  29. EndFunc   ;==>_IEEx_ClearCookie
复制代码
 楼主| 发表于 2018-9-21 15:16:17 | 显示全部楼层
可以清除浏览器的COOKIE,不过好像清除掉,刷新还是在!不是很好用!
 楼主| 发表于 2018-9-23 21:37:55 | 显示全部楼层
本帖最后由 heavenm 于 2018-9-23 21:40 编辑

Func _IEEx_ClearCookie($_object, $_mode = 0)
        Local $_url
        If IsObj($_object) Then
                $_url = $_object.locationurl
        Else
                $_url = $_object
        EndIf
        $_url = StringRegExp($_url, '(https?://).*?([^\.\?\+:/]++(?:\.cn|\.com|\.edu|\.gov|\.int|\.mil|\.net|\.org|\.biz|\.info|\.pro|\.name|\.museum|\.coop|\.aero|\.xxx|\.idv|\.al|\.dz|\.af|\.ar|\.ae|\.aw|\.om|\.az|\.eg|\.et|\.ie|\.ee|\.ad|\.ao|\.ai|\.ag|\.at|\.au|\.mo|\.bb|\.pg|\.bs|\.pk|\.py|\.ps|\.bh|\.pa|\.br|\.by|\.bm|\.bg|\.mp|\.bj|\.be|\.is|\.pr|\.ba|\.pl|\.bo|\.bz|\.bw|\.bt|\.bf|\.bi|\.bv|\.kp|\.gq|\.dk|\.de|\.tl|\.tp|\.tg|\.dm|\.do|\.ru|\.ec|\.er|\.fr|\.fo|\.pf|\.gf|\.tf|\.va|\.ph|\.fj|\.fi|\.cv|\.fk|\.gm|\.cg|\.cd|\.co|\.cr|\.gg|\.gd|\.gl|\.ge|\.cu|\.gp|\.gu|\.gy|\.kz|\.ht|\.kr|\.nl|\.an|\.hm|\.hn|\.ki|\.dj|\.kg|\.gn|\.gw|\.ca|\.gh|\.ga|\.kh|\.cz|\.zw|\.cm|\.qa|\.ky|\.km|\.ci|\.kw|\.cc|\.hr|\.ke|\.ck|\.lv|\.ls|\.la|\.lb|\.lt|\.lr|\.ly|\.li|\.re|\.lu|\.rw|\.ro|\.mg|\.im|\.mv|\.mt|\.mw|\.my|\.ml|\.mk|\.mh|\.mq|\.yt|\.mu|\.mr|\.us|\.um|\.as|\.vi|\.mn|\.ms|\.bd|\.pe|\.fm|\.mm|\.md|\.ma|\.mc|\.mz|\.mx|\.nr|\.np|\.ni|\.ne|\.ng|\.nu|\.no|\.nf|\.na|\.za|\.aq|\.gs|\.eu|\.pw|\.pn|\.pt|\.jp|\.se|\.ch|\.sv|\.ws|\.yu|\.sl|\.sn|\.cy|\.sc|\.sa|\.cx|\.st|\.sh|\.kn|\.lc|\.sm|\.pm|\.vc|\.lk|\.sk|\.si|\.sj|\.sz|\.sd|\.sr|\.sb|\.so|\.tj|\.tw|\.th|\.tz|\.to|\.tc|\.tt|\.tn|\.tv|\.tr|\.tm|\.tk|\.wf|\.vu|\.gt|\.ve|\.bn|\.ug|\.ua|\.uy|\.uz|\.es|\.eh|\.gr|\.hk|\.sg|\.nc|\.nz|\.hu|\.sy|\.jm|\.am|\.ac|\.ye|\.iq|\.ir|\.il|\.it|\.in|\.id|\.uk|\.vg|\.io|\.jo|\.vn|\.zm|\.je|\.td|\.gi|\.cl|\.cf|\.yr|\.ac\.cn|\.ah\.cn|\.bj\.cn|\.com\.cn|\.cq\.cn|\.fj\.cn|\.gd\.cn|\.gov\.cn|\.gs\.cn|\.gx\.cn|\.gz\.cn|\.ha\.cn|\.hb\.cn|\.he\.cn|\.hi\.cn|\.hk\.cn|\.hl\.cn|\.hn\.cn|\.jl\.cn|\.js\.cn|\.jx\.cn|\.ln\.cn|\.mo\.cn|\.net\.cn|\.nm\.cn|\.nx\.cn|\.org\.cn))(?:[^\.\w]|/|$|\v)', 3);正则由,haijie1223提供!
        Switch $_mode
                Case 0
                        RunWait('RunDll32.exe InetCpl.cpl,ClearMyTracksByProcess 255')
                        Return 1
                Case 1
                        $__cookie = $_object.document.cookie
                Case 2
                        $__cookie = _WinINet_InternetGetCookieEx($_url[0] & $_url[1], Null, 8192)
        EndSwitch
        
        $__cookie = StringRegExp($__cookie, "\S*=", 3)
        If @error Then Return 0
        For $i = 0 To UBound($__cookie) - 1
                Switch $_mode
                        Case 1
                                $_object.document.cookie = $__cookie[$i] & '; Domain=' & $_url[1] & '; Expires=Thu, 01-Jan-1970 00:00:10 GMT; Path=/'
                        Case 2
                                _WinINet_InternetSetCookie($_url[0] & $_url[1], $__cookie[$i] & '; Expires=Thu, 01-Jan-1970 00:00:10 GMT; Path=/')
                EndSwitch
        Next
EndFunc   ;==>_IEEx_ClearCookie
您需要登录后才可以回帖 登录 | 加入

本版积分规则

QQ|小黑屋|手机版|AUTOIT CN ( 鲁ICP备15028933号-3 )谷歌 百度

GMT+8, 2018-10-16 12:43 , Processed in 0.097383 second(s), 16 queries .

Powered by Discuz! X3.4 Licensed

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表