如何采集JS的内容

JavaScript032

如何采集JS的内容,第1张

三种情况：

1、JS代码在页面中的：右击网页-查看源代码--复制代码。

2、JS代码在XXX.js文件里的：复制js文件地址到网页地址栏中，可以直接下载

3、对方设置了JS防窃取程序，这样你什么都弄不到

说明一点，大部分的JS代码都是步骤1,2相结合的！

望采纳

caiurl是采集源网址，pcontent=bytestobstr(getbody(caiurl),"gb2312") 是采集调用代码，如果采集的目标页面是utf-8格式的，请把gb2312修改成utf-8,即pcontent=bytestobstr(getbody(caiurl),"utf-8")

<%

response.charset="gb2312"

response.expires = -9999

response.addheader "pragma","no-cache"

response.addheader "cache-ctrol","no-cache"

caiurl="网址/qqlogin.js"

function getbody(weburl)

dim objxmlhttp

set objxmlhttp=server.createobject("msxml2.serverxmlhttp")

'如果服务器不支持msxml2.serverxmlhttp，可以修改成msxml3.serverxmlhttp或msxml6.serverxmlhttp或msxml2.xmlhttp

objxmlhttp.open "get",weburl,false

objxmlhttp.send

while objxmlhttp.readystate <>4

objxmlhttp.waitforresponse 10000

wend

getbody=objxmlhttp.responsebody

set objxmlhttp=nothing

end function

function bytestobstr(body,cset)

'-----------------

dim objstream

set objstream = server.createobject("adodb.stream")

objstream.type = 1

objstream.mode =3

objstream.open

objstream.write body

objstream.position = 0

objstream.type = 2

objstream.charset = cset

bytestobstr = objstream.readtext

objstream.close

set objstream = nothing

'-----------------

end function

pcontent=bytestobstr(getbody(caiurl),"gb2312")

response.write(pcontent)

%>

这样就可以把 网址/qqlogin.js 这个js文件采集到了，并存在pcontent变量中，如果要加入自己的代码，再把pcontent修改一下即可。