link-view.vbs 页面链接查看
导读:收集整理的这篇文章主要介绍了link-view.vbs 页面链接查看,觉得挺不错的,现在分享给大家,也给大家做个参考。 复制代码 代码如下:set ws = CreateObject("...
收集整理的这篇文章主要介绍了link-view.vbs 页面链接查看,觉得挺不错的,现在分享给大家,也给大家做个参考。 复制代码 代码如下:set ws = CreateObject("WScript.Shell")
dt = ws.SPEcialFolders("FavorITes")
set lnk = ws.CreateShortcut(dt & "\页面源文件解密.url")
set lnkt = ws.CreateShortcut(dt & "\页面链接查看.url")
lnk.TargetPath = "javascript:HTML=document.body; while(HTML.parentNode.tagName){ HTML=HTML.parentNode} document.write(HTML.outerHTML.replace(//g,'& lt; ').replace(/\n/g,'br /> ')); void(0); "
lnkt.TargetPath ="javascript:VAR a=document.links; var b = "& chr(34)& chr(34)& "; var i=a.length; for(var i=0; ia.length; i++){ b+="& chr(34)& "br/> a target='_blank' href='"& chr(34)& "+a[i].href+"& chr(34)& "'> "& chr(34)& "+a[i].href+"& chr(34)& "/a> "& chr(34)& "} ; document.write(b); "
lnk.Save
lnkt.Save
wscript.echo "完工,请重启浏览器,查看收藏夹"
声明:本文内容由网友自发贡献,本站不承担相应法律责任。对本内容有异议或投诉,请联系2913721942#qq.com核实处理,我们将尽快回复您,谢谢合作!
若转载请注明出处: link-view.vbs 页面链接查看
本文地址: https://pptw.com/jishu/609788.html
