Kig lige på dette !

Jeg er igang med at lave et større link/Statistik System og er gået lidt sort på følgende :

<%
Set Conn = Server.CreateObject(\"ADODB.Connection\")
DBPath = \"DBQ=\" & server.mappath(\"referal.mdb\")
Conn.Open \"DRIVER={Microsoft Access Driver (*.mdb)}; \" & DBPath

Sql = \"Select * From Referal Where Referent =\'\" & Request.ServerVariables(\"HTTP_REFERER\") & \"\'\"
Set Rs = Conn.Execute(Sql)

If( Not Rs.BOF And Not Rs.EOF ) then
  SQLCount = \"SELECT hit FROM Referal WHERE Referent = \'\" & Request.ServerVariables(\"HTTP_REFERER\") & \"\'\"
    countRS = Conn.Execute( SQLCount )
    hit = countRS(\"hit\")
  SqlHit = \"Update Referal set hit = \" & (CInt(hit)+ 1) & \" Where Referent = \'\" & Request.ServerVariables(\"HTTP_REFERER\") & \"\'\"
    Conn.Execute(SqlHit)
  Else
    SqlHitNy = \"Insert Into Referal (Referent) Values (\'\" & Request.ServerVariables(\"HTTP_REFERER\") & \"\')\"
    Conn.Execute(SqlHitNy)
End If

Sql = \"Select * FROM Referal ORDER BY Hit DESC\"
Set RsTop10 = Conn.Execute(Sql)
%>

Mit problem er at vis folk taster www adressen i deres browser og altså ikke har klikket på et link så skal der ikke skrives noget db´en. Nogen foreslag til det ?

/WebSam