Opløsningen kommer ikke med ind i databasen

ud fra det kode du har vist bliver variablen  oploesning  aldrig sat.

Hvordan skal den så se ud og hvad kan grunden være til, at den virkede i flere måneder for derefter ikke at virke, hvad mangler jeg?

Nu ved jeg ikke hvordan din side virker men du mangler en linje som starter sådan her:

oploesning =


Så variablen oploesning kommer til at indeholde noget. Hvis det har virket så er der blevet rette i koden på et tidspunkt ellers viser du ikke hele koden for det som gemmer i databasen.

Nu har jeg fundet en ældre version af min Hit counter, den ser ud som neden stående, men opløsningen kommer stadig ikke med. :-(

Hov! Glemte at paste den ind.
<%
Function GetInput(i)
    GetInput=""
    if i<>"" then
        GetInput=Request.QueryString(i)
        if GetInput="" or IsNull(GetInput) then GetInput=Request.Form(i)
    end if
End Function

%>

<%
page= "http://" & request.servervariables("SERVER_NAME")
page= page & request.servervariables("script_name")
qstring= request.servervariables("query_string")
if trim(qstring) <> "" then
page= page & "?" & qstring
end if ' end querystring routine

accessdb="hit/mindb"
cn="DRIVER={Microsoft Access Driver (*.mdb)};"
cn=cn & "DBQ=" & server.mappath(accessdb)
Set rs = Server.CreateObject("ADODB.Recordset")

sql = "insert into hitcounter (page,hit,ip,browser,oploesning)"
sql = sql & " values( '" & page & "',1, '" & Request.servervariables("REMOTE_ADDR") & "', '" & Request.servervariables("HTTP_USER_AGENT") & "', '" & GetInput("opl") & "')"
rs.Open sql, cn
%>

Nå, du havde dybest set ret. Jeg havde fået slettet noget af scriptet, nu fungerer det igen. Du er velkommen til, at få pointene hvis du vil have dem.
Mvh. Marie

Da du ikke har smidt et svar lukker jeg nu, men tak for hjælpen.