Loggning... asp hjääälpp

[Jonte_nr_1]

HAr ett problem... vill logga alla som försöker gå in på vissa sidor på min hemsida...

den ska logga ip-nummer samt datum, tidpunkt..

men jag vet inte hur man gör för att spara det på rad i en textfil...

Skulle ni kunna hjälpa mig är jag tacksam...

ni kan utgå ifrån den här koden!...

 

<% Response.Buffer = True

dim run, logg, ip

set ip = request.servervariables("remote_addr")

set run = Server.CreateObject("scripting.filesystemobject")

set logg = run.createtextfile(Server.MapPath("/Textfiler/logg.txt"))

logg.writeline (" Ip nummer: ") &amp; request.servervariables("remote_addr") &amp; (" | Datum: ") &amp; Date &amp; (" | Klockslag: ") &amp; Time

logg.writeblanklines(0)

logg.close

%>

 

[inlägget ändrat 2001-09-23 14:51:05 av Jonte_nr_1]

[m a r c u s]

<%

Set fs = CreateObject( "Scripting.FileSystemObject" )
Set logg = fs.OpenTextFile( Server.MapPath( "textfiler/logg.txt" ), 8, True )

logg.writeline( "IP: " ) &amp; Request.ServerVariables( "REMOTE_ADDR") &amp; " Tid: " &amp; Now

Set logg = Nothing
Set fs = Nothing

%>

 

8:an betyder ForAppending, d v s att data skrivs till slutet av filen. True anger att en ny fil skapas om textfiler/logg.txt inte finns.

[inlägget ändrat 2001-09-23 15:33:43 av m a r c u s]

[Jonte_nr_1]

TAck!