|
发表于 2023-11-1 10:06:59
|
显示全部楼层
贵州省黔东南苗族侗族自治州
.版本 2
.子程序 取跳转的最终地址, 文本型, , 获取一个网站重定向跳转的URL地址
.参数 地址, 文本型
.局部变量 http, 对象
.局部变量 p, 变体型
.如果真 (http.创建 (“WinHttp.WinHttpRequest.5.1”, ))
http.写属性 (“Option”, 6, 0)
http.方法 (“SetTimeouts”, 5000, 5000, 10000, 5000)
http.方法 (“open”, “GET”, 地址, 假)
http.方法 (“setRequestHeader”, “User-Agent”, “Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1)”)
http.方法 (“setRequestHeader”, “Accept-Language”, “zh-cn”)
http.方法 (“setRequestHeader”, “Connection”, “Keep-Alive”)
http.方法 (“setRequestHeader”, “Accept”, “image/gif, image/x-xbitmap, image/jpeg, image/pjpeg, application/x-shockwave-flash, application/x-silverlight, */*”)
http.方法 (“send”, )
p = http.读属性 (“GetResponseHeader”, “Location”)
返回 (p.取文本 ())
.如果真结束
返回 (“”)
缺少这个命令呢 大佬 是我这个不对吗 解析不出来呢
|
|