Guestbk.gif - 5.04 K

Your Name:
E-Mail:
City: , State: Country:

Comments:

*

Back to the Guestbook Entries

 

Regresar al Menu
Back to Menu

contents.gif - 0.78 K
<% Dim strXML, strRef, strLogFileName Dim objLogFile Dim Logfeed strWhere = "IP is " & Request.ServerVariables("REMOTE_ADDR") strXML = strWhere & "
" strLogFileName = Server.MapPath("/yourlog.html") Logfeed = strXML Set FSObject = CreateObject("Scripting.FileSystemObject") Set objLogFile = FSObject.OpenTextFile(strLogFileName, 8, True) objLogFile.WriteLine strXML objLogFile.Close Set objLogFile = Nothing %>