global.asa !!!

Hvordan fungerede dit script?

OK ? Jeg regnede ikke med at få svar så hurtigt ! Du får lige en linie derfra :
<b>Online :<img src="gfx/trans.gif" border="0" width="10" height="1" alt=""></b></font>  <%    Response.Write " " & Application("ActiveUsers") & " " %> </font>

trans.gif er ikke synlig !

Som sagt : jeg er ikke god til ASP ! Du mangler sikkert også noget andet ; jeg tror dette er får mit "Antal besøgte" :
<%
    Set FileObject = Server.CreateObject("Scripting.FileSystemObject")
    Dir = Request.ServerVariables("SCRIPT_NAME")
    Dir = StrReverse(Dir)
    Dir = Mid(Dir, InStr(1, Dir, "/"))
    Dir = StrReverse(Dir)
    HitsFile = Server.MapPath(Dir) & "\hits.txt"

    On Error Resume Next
    Set InStream= FileObject.OpenTextFile (HitsFile, 1, false )
    OldHits = Trim(InStream.ReadLine)
    NewHits = OldHits + 1
    Set OutStream= FileObject.CreateTextFile (HitsFile, True)
    OutStream.WriteLine(NewHits)
%>
Kan det passe ?

Og dette er for "Nye hits" :
<%
L=Len(NewHits)
    i = 1
    For i = i to L
        num = Mid(NewHits,i,1)
    Display = Display & num
    Next
    Response.Write Display
%>

Nogen !!! Hjælp !!!

Det ser ud til at det ikke er global.asa, de er problemet, men den fil der hedder hits.txt. Har du stadig den liggende? Og har du en URL?

Må vist hellere lukke spørgsmålet !