% IPAddress=Request.ServerVariables ("REMOTE_ADDR") Set objFSO = CreateObject("Scripting.FileSystemObject") Set objFile = objFSO.OpenTextFile("log.txt", forappending) objFile.WriteLine (IPAddress) objFile.close Set objFile=nothing Set objFSO=nothing %>
|
|
|||||||||
|