3 svar · 248 visningar · startad av Ceeron
Ska ta o göra mig en lite bättre räknare nu som även sparar lite info om besökarna...
Har typ två idéer i huvudet:
1.
Man har en tabell som loggar varje person som kommer o sedan räknar man de unika genom att kolla likadana IPn
Man måste även på nåt sätt sätta en cookie o ha något fält i databasen för att de som sitter på vanligt modem inte ska räknas som unika hela tiden...
2.
Man gör en ny post för varje IP samt skriver in i databasen hur många gånger en o samma person besökt sidan...
Här kan man lätt göra en check om användaren har en cookie innan så slipper man helt enkelt skriva in dom...
Vet inte riktigt va man ska ha =bFörsta förslaget verkar ok men finns det nån begränsning i antal poster i en tabell? eftersom den typ kommer logga varje besökare...
Jag tycker andra förslaget verkar förnuftigt. Frågan om vad som är det unika som ska loggas har varit uppe på tapeten ett antal gånger.
Begränsingen i antalet poster behöver du inte tänka på... men du kan ju försöka leta rätt på hur mycket information som kan lagras (det är väldigt mycket...).
ser detta ok ut då?
If Not Session("raknad") = "ja" Then
strIP = Request.ServerVariables("REMOTE_ADDR")
strWebb = Request.ServerVariables("HTTP_USER_AGENT")
strHost = Request.ServerVariables("HTTP_HOST")
If Request.Cookies("alkisarna.com")("raknad") = "ja" Then
strIP = Request.Cookies("alkisarna.com")("raknarIP")
End If
sql = "insert into raknare (IP, Tid, Webb, Host) values ('" & strIP & "', #" & Now() & "#, '" & strWebb & "', '" & strHost & "')"
objConnect.Execute(sql)
Session("raknad") = "ja"
Response.Cookies("alkisarna.com")("raknarIP") = strIP
Response.Cookies("alkisarna.com")("raknad") = "ja"
End If
o sen kollar man hur många som har besökt...
sql = "select count(*) as besokare, (select count(*) from (select distinct IP from raknare)) as unika from raknare"
Set objRS = objConnect.Execute(sql)
Write "v1.0, " & objRS("besokare") & " besökare"
Write ", " & objRS("unika") & " unika"
objRS.Close : Set objRS = Nothing
Det tycker jag ser helt ok ut :)