En besöksräknare håller reda på dagens alla besök
Förord
Om du har en hemsida så är du såklart intresserad av att veta hur många som besöker den, men ibland kan den informationen bli för lite och då är det bra att kunna se hur många som besökt sidan under dagen. Då kan man också se hur många besökare mer eller mindre man hade igår.Innehåll
»»
»
Relaterade artiklar
» Använd global.asa för din webbserver i asp
Databasen besokare.mdb
Här behövs det inte särskilt mycket, bara en tabell som ska heta besokare, i den ska det finnas två fält, d_datum text och besokare number Default Value ska vara 1.
raknare.asp
<%
'Skapa Connection & två recordset
Set Conn = Server.CreateObject("Adodb.Connection")
Conn.Open "Driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.Mappath("besokare")
Set RS = Server.CreateObject("Adodb.RecordSet")
Set RS2 = Server.CreateObject("Adodb.RecordSet")
'Kolla ifall datumet finns
Sql = "Select * from besokare Where d_datum = '" & date & "'"
Set RS = Conn.Execute(Sql)
If RS.Eof Then
'Datumet finns inte, lägg till det
Sql2 = "Insert Into besokare (d_datum) Values ('" & date & "')"
Set RS2 = Conn.Execute(Sql2)
Else
'Datumet finns, uppdatera med en besökare till
Sql2 = "Update besokare Set besokare = besokare + 1 Where d_datum = '" & date & "'"
Set RS2 = Conn.Execute(Sql2)
End If
'En variabel för antalet besökare idag
besokare = RS("besokare")
' frigör objekten
set rs = nothing
set rs2 = nothing
set conn = nothing
%>
Vad händer här då?
Först så deklarerar vi En connection till besokare.mdb, sedan deklarerar vi två RecordSet, ett för att kolla om datumet redan finns i databasen och en för att uppdatera databasen om datumet finns eller Lägga till en ny post i databasen om datumet inte finns.Sedan använder vi SQL för att kolla om dagens datum finns i databasen, gör den inte det så lägger vi till en ny post i databasen och om dagens datum redan finns så uppdaterar vi den.
Till sist deklarerar vi variabeln besokare som är antalet besökare idag. Där du sedan vill ha texten med antalet besökare idag skriver du bara:
<%=besokare%>
Det var allt för den här gången!
0 Kommentarer