Salve ragazzi,
avevo bisogno di un vostro aiuto, stavo cercando un codice asp
preciso o che venga aggiornato subito per quanto riguarda 2 contatori, quello delle visite e quello di utenti connessi.
Mi spiego, ho creato un piccolo box flash che richiama 2 campi testo,
uno per ogni contatore.
Il codice del contatore visite che ho trovato e che richiama un file txt messo nella cartella con permessi public è:
<%
Set objFSO = Server.CreateObject("Scripting.FileSystemObject")
strPath = Server.MapPath("public/contatore.txt")
Set objCounterFile = objFSO.OpenTextFile(strPath)
Contare = objCounterFile.ReadLine
If Session("Contiamolo") = "" Then
Session("Contiamolo") = Contare
Contare = Contare + 1
objCounterFile.Close
Set objCounterFile = objFSO.CreateTextFile(strPath, True)
objCounterFile.WriteLine(Contare)
End If
objCounterFile.Close
Set objCounterFile = Nothing
Set objFSO = Nothing
Response.Write("contami=" & Contare)
%>
-----------------------------------------------
Mentre quello di utenti connessi contemporaneamente è:
<%
Response.Expires = 0
Set fs = CreateObject("Scripting.FileSystemObject")
Path = server.mappath("/public/connessi.txt")
Set a = fs.OpenTextFile(path)
conta = a.ReadLine
'Controllo gli aggiornamenti di pagina
If Session("conta") = "" then
Session("conta") = conta
'Incremento di 1 il valore presente nel file di testo
conta = conta + 1
a.close
'Scrivo sul file di testo il nuovo valore
Set a = fs.CreateTextFile(path, True)
a.WriteLine(conta)
End If
a.Close
response.write("&outputuno=" &(conta) )
%>
--------------------------------------------
Purtroppo però non vanno bene,il contatore di utenti connessi non è affatto preciso,a volte mi segna tanti utenti quando ci sono solo io ke lo sto visitando, forse perchè non ha un codice che permette di aggiornare ogni tot secondi, stessa cosa per il contatore visite.
Mi chiedo se esiste un codice più preciso che permetta, non dico con estrema precisione, ma almeno con un pò più criterio il funzionamento dei contatori.
Mille grazie a chi potrà aiutarmi
Linda
