我想把访问服务器端的客户机的IP记录在记事本上 以下的代码运行的结果记录在记事本上IP当成了乱码，谢谢高手指点


<% Set fs = CreateObject("Scripting.FileSystemObject")
ForReading = 1
ForAppending = 8
TristateUseDefault = -2
TristateTrue = -1
TristateFalse = 0
servertemp=server.MapPath("\tt\")
if not fs.folderexists(servertemp) then
fs.createfolder(Servertemp)
end if
dim systxt
dim filename
dim num
num=2
filename="aa"
systxt=servertemp&filename&".txt"
rec=Now&"&"&Request.ServerVariables("REMOTE_ADDR")
if fs.FileExists(systxt) then
Set ss=fs.OpenTextFile(systxt,Forappending)
ss.WriteLine(li)
ss.writeblanklines(num)
else
Set ss=fs.createtextfile(systxt,ForWriting,true)
end if
ss.WriteLine(rec)
ss.writeblanklines(num)
ss.Close
%>