Hey all,
Here's a snippet of code I'm having trouble with:
I'm having trouble where it tries to open the file partNoSearchIPs.txt. It says that it can't find the file, but I know that it's there. What am I missing?
Thanks,
- MT
Here's a snippet of code I'm having trouble with:
Code:
Dim objFSO, objFile, objTextStream, objCaptureString, ipAddress
ipAddress = Request.ServerVariables("HTTP_X_FORWARDED_FOR")
If ipAddress = "" Then
ipAddress = Request.ServerVariables("REMOTE_ADDR")
End If
Set objFSO = CreateObject("Scripting.fileSystemObject")
Set objFile = objFSO.OpenTextFile("partNoSearchIPs.txt")
Set objTextStream = objFile.OpenAsTextStream(ForAppending, TristateFalse)
Set objCaptureString = ipAddress & "\n"
objTextStream.Close
I'm having trouble where it tries to open the file partNoSearchIPs.txt. It says that it can't find the file, but I know that it's there. What am I missing?
Thanks,
- MT