Hur gör man en räknare i ASP.
Counter
4 svar · 508 visningar · startad av cgi
Hinner inte skriva mycket men tex kan du ju bara plussa på 1 för varje gång sidan laddas och sen lägger du in det i ett databas fält. På det sättet ökar det ju hela tiden, sen kan man ju göra räknaren mer eller mindre komplicerad, tex "unika" besökare eller statistik per dag osv.
Hinner inte skriva något exempel nu, men skriv gärna vad du vill ha så skall jag försöka få ner några rader :)
------------------
Mvh
Patrik
aka Brimba
Det skall följa med en komponent i Option Pack samt PWS som kan sköta sånt. Tror det heter något med "PageCounter".
I alla fall nåt...
------------------
/ Torbjörn Hansson, webbutvecklare/gränssnittsprogrammerare
Spetsdata AB
*Tata* http://www.tcp-ip.com/Weblinks.asp?cat=ASPCounters
Annars så kan man ju alltid göra en tabell som lägger in en post per IP nummer. DÅ kan man ju t.ex föra statistik på webläsare, OS och sånt 3vligt.
------------------
Daniel Olsson - Teknisk Internetkonsult
/N
Ett exempel på en relativt enkel räknare:
<%
Set Connection = Server.CreateObject("ADODB.Connection")
Connection.Open "driver={Microsoft Access Driver (*.mdb)};dbq=d:\databas\raknare.mdb"
SQLeller = "SELECT datum FROM raknare"
SET RS = Connection.Execute(SQLeller)
RS.MoveFirst
i=false
Do Until i=true If RS.EOF then
SQLStmt = "INSERT INTO raknare"
SQLStmt = SQLStmt & "(antal, datum)"
SQLStmt = SQLStmt & "VALUES('" & 1 & "','" & date & "')"
i=true
Elseif RS("datum") = date Then
SQLStmt = "UPDATE raknare SET antal = antal +1 WHERE datum = #" & date & "#"
i=true
End If
If i=true Then RS.MoveFirst
RS.MoveNext
Loop
Connection.Execute(SQLStmt)
%>
Den kollar först om det finns någon post på det datumet annars får den lägga till en så att den kan updatera den.
Hoppas det var till lite hjälp :)
Det är kanske inte den snyggaste koden, men jag har provat lite olika lösningar men har inte lyckats lösa det på smidigare sätt, någon som vet?
------------------
Mvh
Patrik
aka Brimba
www.datormaklarna.se
patrik@datormaklarna.se
[Redigerat av Brimba den 29 feb 2000]