%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%> <% strSQLSelect = "Select * from VisitCounter" set strRS = con.execute(strSQLSelect) Dim UserNumber if (not strRS.eof and not strRS.bof) then UserNumber = strRS("intVst_NrOfVisits") else ' Det finns ingen post i databasen vilket inte borde ske, så vi sätter det till 1.... UserNumber = 1 end if con.close : set con = nothing %>
|
|