jeg skal have lavet en referrer side!! H J Æ L P

' skal tomme referrers også gemmes i logfil ?
    logTomme = true

    ' find logfilens navn ud fra dags dato
    'filename = right("0" & year(now), 2) & right("0" & month(now), 2) & right("0" & day(now), 2) & ".log"
   
    'En samlet logfil istedet for en pr dag
    filename = "tracker.log"
       
    ' opret system objektet til filhåndtering
    Set fs = CreateObject("Scripting.FileSystemObject")

    ' opret en reference til vores logfil - enten eksisterende ellers oprettes en ny
    Set a = fs.OpenTextFile(server.mappath(filename), 8, True, False)

    ' hvis der er nogen referrer, så gemmes denne
    if request.servervariables("HTTP_REFERER") <> "" then
        a.writeline(time & " : [" & request.servervariables("REMOTE_ADDR") & "] - " & request.servervariables("HTTP_REFERER") & " - " & request.servervariables("HTTP_USER_AGENT"))
    else
        if logTomme then
            a.writeline(time & " : [" & request.servervariables("REMOTE_ADDR") & "] - " & request.servervariables("HTTP_REFERER") & " - " & request.servervariables("HTTP_USER_AGENT"))
        end if
    end if

    a.close

Here you go... håber du kan bruge det..!
//>Rune

ja tak.. den har jeg også selv fundet... men hvordan sætter jeg det ind???  når jeg bare sætter det ind i min index.asp fil.. så skriver den Permission denied... med hensyn til den linie hvor der står: Set a = fs.OpenTextFile(server.mappath(filename), 8, True, False)

helst et andet end det der.. må gerne være med database..

du får sikkert fejlen fordi du ikke har skriverettigheder der hvor du ligger filen...

hmmm jaaah.. det fandt jeg ud af.. men er der ik en der kan hjælpe mig med at finde en med database??

Vær venlig at lukke spm'et hvis du har fundet svar!

//>Rune

Thx 4 Poinz

//>Rune