|
¿Como colocar un contador?
Sólo es necesario colocar este código en la
página que se desea utilizar para contar la cantidad de usuarios que
ingresan, crear un archivo de texto llamado hits.txt y escribir "1"
en el archivo, como el hit inicial.
El Server.MapPath is el directorio bajo tu root, en donde el archivo
el grabado. Este ejemplo utiliza una carpeta llamada counter en el
root, donde hits.txt es guardado.
-<%
Set FileObject = Server.CreateObject("Scripting.FileSystemObject")
HitsFile = Server.MapPath ("/counter") & "\hits.txt"
Set InStream= FileObject.OpenTextFile (HitsFile, 1, false )
OldHits = Trim(InStream.ReadLine)
NewHits = OldHits + 1
Set OutStream= FileObject.CreateTextFile (HitsFile, True)
OutStream.WriteLine(NewHits)
%>-
Para ver la cantidad de hits, sólo necesitamos ejecutar algo como
esto.
Esta página ah sido accedida -<%=NewHits%>- Veces.
|
 |

|