Can anyone tell me if this will append the the iperrors.txt file?
ipaddress = Request.servervariables("REMOTE_ADDR"
strIpFileName = Server.MapPath("iperrors.txt"
Set IPObj = Server.CreateObject("Scripting.FileSystemObject"
if IPObj.FileExists (strIpFileName) then
Set objIpTs = IPObj.OpenTextFile(strIpFileName,8,true)
else
Set objIpTs = IPObj.CreateTextFile(strIpFileName,true)
end if
objIpTs.WriteLine ipaddress
objIpTs.close
set objIpTs = Nothing
I need it to open save contents and then add some
ipaddress = Request.servervariables("REMOTE_ADDR"
strIpFileName = Server.MapPath("iperrors.txt"
Set IPObj = Server.CreateObject("Scripting.FileSystemObject"
if IPObj.FileExists (strIpFileName) then
Set objIpTs = IPObj.OpenTextFile(strIpFileName,8,true)
else
Set objIpTs = IPObj.CreateTextFile(strIpFileName,true)
end if
objIpTs.WriteLine ipaddress
objIpTs.close
set objIpTs = Nothing
I need it to open save contents and then add some