/ Forside / Teknologi / Udvikling / ASP / Nyhedsindlæg
Login
Glemt dit kodeord?
Brugernavn

Kodeord


Reklame
Top 10 brugere
ASP
#NavnPoint
smorch 9259
Harlekin 1866
molokyle 1040
Steffanst.. 758
gandalf 657
smilly 564
gibson 560
cumano 530
MouseKeep.. 480
10  Random 410
Feil i dato
Fra : Ståle


Dato : 13-03-04 21:23

Koden under er et teller skript med database som teller totalt
hits og hits pr.dag. Jeg har også forsøkt å lage en teller som
skal telle hits pr. mnd. uten hell.
Noen som kan rette opp i koden slik at den også kan telle antal
treff pr. mnd.

Det hele kan ses i bruk her: www.playball.no

Hvis noen ønsker å bygge videre på koden slik at jeg kan trekke
treff pr. dag /mnd/år ut av databasen og skrive ut litt
statistkk.
så hadde det vært fint.
Databasen og resten av koden kan du få av meg , bare send meg en
mail.



<%
strConn ="Driver={Microsoft Access Driver (*.mdb)}; DBQ=" &
Server.MapPath("../db/counter.mdb")
Set objRS = Server.CreateObject("ADODB.RecordSet")
If (Session("Antal") = "") Then   
objRS.Open "SELECT * FROM counter", strConn, 2, 3, &H0001
      objRS("Antal") = objRS("Antal") + 1
Session("Antal") = objRS("Antal")

      If (date = objRS("Dato")) Then
       objRS("Antal_dag") = objRS("Antal_dag") + 1
      else
       objRS("Dato") = date
       objRS("Antal_dag") = 1
      End if

      If (date = objRS("Dato")) Then
       objRS("Antal_mnd") = objRS("Antal_mnd") + 1
      else
      objRS("Dato") = month
       objRS("Antal_mnd") = 1
       end if
      
      Session ("Dag") = objRS("Antal_dag")
      Session("Antal_mnd") = objRS("Antal_mnd")
      objRS.Update

      objRS.Close
      Set objRS = Nothing
End If
%>

--
Vil du lære at kode HTML, XHTML, CSS, SSI eller ASP?
- Pædagogiske tutorials på dansk
- Kom godt i gang med koderne
KLIK HER! => http://www.html.dk/tutorials

 
 
Søg
Reklame
Statistik
Spørgsmål : 177558
Tips : 31968
Nyheder : 719565
Indlæg : 6408929
Brugere : 218888

Månedens bedste
Årets bedste
Sidste års bedste