Contar fotos
Me gustaría saber como pedo poner un contador de manera que cuente las veces que se ha visto una foto.
Gracias.
Gracias.
1 Respuesta
Respuesta de Jorge Vila
1
La solución en ASP es sencilla, te paso esta que he encontrado y que además lo hace sin Bases de Datos:
<%
on error resume next
' Creamos el objeto
set fso = createobject("scripting.filesystemobject")
' Seteamos el archivo txt
set act = fso.opentextfile(server.mappath("asp_count.txt"))
' Leemos el valor del archivo
counter = clng(act.readline)
' Sumamos uno a ese valor
counter = counter + 1
' Cerramos el objeto
act.close
' Creamos un nuevo archivo de texto
Set act = fso.CreateTextFile(server.mappath("asp_count.txt"), true)
' Escribimos el nuevo valor del contador
act.WriteLine(counter)
' Cerramos el objeto
act.Close-
' Y decimos la cantidad de visitas
Response.Write "Eres el visitante Nº: " & counter
%>
Allá donde pongas la imagen, aumentará en uno su valor:
<!--#INCLUDE FILE="contador.asp"-->
<%
on error resume next
' Creamos el objeto
set fso = createobject("scripting.filesystemobject")
' Seteamos el archivo txt
set act = fso.opentextfile(server.mappath("asp_count.txt"))
' Leemos el valor del archivo
counter = clng(act.readline)
' Sumamos uno a ese valor
counter = counter + 1
' Cerramos el objeto
act.close
' Creamos un nuevo archivo de texto
Set act = fso.CreateTextFile(server.mappath("asp_count.txt"), true)
' Escribimos el nuevo valor del contador
act.WriteLine(counter)
' Cerramos el objeto
act.Close-
' Y decimos la cantidad de visitas
Response.Write "Eres el visitante Nº: " & counter
%>
Allá donde pongas la imagen, aumentará en uno su valor:
<!--#INCLUDE FILE="contador.asp"-->
