<%@ Language=VBScript %>
<%
ipaddress = Request.ServerVariables("remote_addr")
remotehost = Request.ServerVariables("remote_host")
dim fs,f
set fs=Server.CreateObject("Scripting.FileSystemObject")
set f=fs.OpenTextFile("log.txt",8,true)
f.WriteLine("SIMINN - " & ipaddress & " - " & remotehost & " - " & Date() & " - " & Time())
f.Close
set f=Nothing
set fs=Nothing
%>
VISKAN.NET