webForumDet fria alternativet

Uppdatering av räknare

ASP

2 svar · 236 visningar · startad av mcfoist

Medlem sedan feb. 200244 inlägg
Frågan#1

Tjenixen.

Har ett problem som jag inte får bukt med. Har en räknare på min sida som är uppbyggd av två tabeller. En tabell för att logga datum och ip samt en tabell för att lägga in antal besökare.

Nu har jag gjort en updaring enligt nedan:

ip = request.servervariables("remote_addr")

'KONTROLLERA OM IP FINNS I LOGG
sql = "SELECT datum FROM logg WHERE '"& ip &"'"
set rs = db.execute(sql)

if rs.eof then
	'OM NEJ
	sql = "INSERT INTO logg (datum,ip) VALUES (Now(),'"& ip &"')"
	db.execute(sql)
	
	sql = "UPDATE raknare SET unic=unic+1, hitz=hitz+1 WHERE id = 1"
	db.execute(sql)
	
else
	'OM JA
	datum2 = DateAdd("n",-120,Now())
	
	if rs("datum") < datum2 then
		'OM DATUM I LOGG ÄR MER ÄN 2 TIM GAMMALT			
		sql = "UPDATE raknare SET hitz = hitz+1 WHERE id = 1"
		db.execute(sql)

		sql = "UPDATE logg SET datum = #"& Now &"# WHERE ip = '"& ip &"'"
  		db.execute(sql)

	else
		'OM DATUM I LOGG ÄR MINDRE ÄN 2 TIM GAMMALT
	
	end if
end if

Allt funkar bra utom att jag inte lyckas updatera datumet i logg-tabellen vilket resulterar i att samtliga besök uppdaterar "hitz" med 1.

Övrig fakta; jag kör med Access och scriptet körs innan min frameset (i default.asp).

...visst borde det funka? :p

Medlem sedan juni 200032 967 inlägg
#2

Re: Uppdatering av räknare

mcfoist skrev:

...visst borde det funka? :p

Nä. :)

sql = "SELECT datum FROM logg WHERE [b]ip = [/b]'"& ip &"'"
Medlem sedan feb. 200244 inlägg
#3

argh. :x

Tror jag tar mig en kopp kaffe...

Tack för den bortslösade timmen..

..och tack för hjälpen! :bire

267 ms totalt · 4 externa anrop · v20260731065814-full.86ec41c2
123 ms — deklarationer (db)
0 ms — hämta statistik (cache)
141 ms — hämta tråd, inlägg och bilagor (db)
123 ms — ändringar (db)