contatore visite

[yro]

ciao ho questo contatore che scrive su un txt.

'-------------------contatore visite----------------------------------------------------------
Dim nomefile, filestream
nomefile = Server.MapPath("/dati/public/immobiliare/contatore/"&rs("id")&".txt")
Set objFile = CreateObject("Scripting.FileSystemObject")

'se il file non esiste, crealo
if not objFile.FileExists(nomefile) then
  Set filestream = objFile.OpenTextFile(nomefile, 2, true)
  filestream.WriteLine("20")
end if

'legge il numero attuale di visite
Set filestream = objFile.OpenTextFile(nomefile, 1, true)
Dim visite
visite = filestream.ReadLine()
filestream.Close 

'se non è ancora presente la variabile di sessione
if Session("visiting")<>1 then
  Session("visiting") = 1  'crea la variabile di sessione
  visite = visite + 3  'incrementa  gli accessi al sito
end if

'scrive nel file il valore aggiornato di visite
Set filestream = objFile.CreateTextFile(nomefile, true)
filestream.WriteLine(visite)
filestream.Close

Set filestream = Nothing
Set objFile = Nothing

'visualizza sul browser il numero totale di visite
response.Write("<tr><td colspan='3'>Visitatori che hanno valutato il tuo articolo: "&visite&"
")

vorrei che se io faccio il refresh il contatore continuasse ad incrementare il numero... è possibile?

grazie!

[teejay]

probabilmente Explorer (o altro browser) nn ti ricaricano la pagina...prova con queste righe:

Response.Expires = -1 
Response.AddHeader "pragma", "no-cache" 
Response.AddHeader "cache-control", "private" 
Response.CacheControl = "private"

così nn cacha la pagina ed è costretto a ricaricare

[yro]

Originariamente inviato da teejay
probabilmente Explorer (o altro browser) nn ti ricaricano la pagina...prova con queste righe:

Response.Expires = -1 
Response.AddHeader "pragma", "no-cache" 
Response.AddHeader "cache-control", "private" 
Response.CacheControl = "private"

così nn cacha la pagina ed è costretto a ricaricare

grazie... vanno nell'head o dove??

grazie!!

[yro]

ho trovato!!
barstava togliere la sessione!!