Foros del Web » Programando para Internet » ASP Clásico »

Ayuda con un contador de visitas

Estas en el tema de Ayuda con un contador de visitas en el foro de ASP Clásico en Foros del Web. Holas una pregutna, este es mi contador de visitas, y op rmas que refresco el fcount nunca tiene un valor. No funciona que esta mal? ...
  #1 (permalink)  
Antiguo 29/10/2004, 13:27
 
Fecha de Ingreso: diciembre-2001
Ubicación: Peru
Mensajes: 376
Antigüedad: 22 años, 6 meses
Puntos: 0
Ayuda con un contador de visitas

Holas una pregutna, este es mi contador de visitas, y op rmas que refresco el fcount nunca tiene un valor. No funciona que esta mal?
Gracias
<html>
<body>
<p>
Esya pagina fue vista <%=fcount%> veces.
</p>
</body>
</html>

<%
Set FS=Server.CreateObject("Scripting.FileSystemObject ")
Set RS=FS.OpenTextFile(Server.MapPath("contador.txt"))
fcount=RS.ReadLine
fcount= fcount + 1
RS.Close


fcount=fcount+1

'This code is disabled due to the write access security on our server:
'Set RS=FS.OpenTextFile(Server.MapPath("counter.txt"), 2, False)
'RS.Write fcount
'RS.Close

Set RS=Nothing
Set FS=Nothing

%>
  #2 (permalink)  
Antiguo 29/10/2004, 21:18
Avatar de sjam7  
Fecha de Ingreso: diciembre-2001
Ubicación: Guadalajara, Mexico
Mensajes: 3.672
Antigüedad: 22 años, 5 meses
Puntos: 16
Intenta usando este contador, que en escencia es lo mismo:

activo = session("activo")
on error resume next
set fso = createobject("scripting.filesystemobject")
set act = fso.opentextfile(server.mappath("asp_count.txt"))
counter = clng(act.readline)
if session("activo") <> "si" then
counter = counter + 1
end if
act.close
Set act = fso.CreateTextFile(server.mappath("asp_count.txt") , true)
act.WriteLine(counter)
act.Close
Response.Write "VISITANTE: " & counter

session("activo") = "si"

'Sub LimpiaObj(objeto)
On Error Resume Next

If isObject(objeto) Then
If (objeto.State=1) Then 'comprueba si esta abierto
objeto.Close
End If

Set objeto = Nothing
End If
'End Sub


Solo que este genera una variable de session con la que, si esta activa te genera un hit en el contador, esto es para que un mismo visitante no te este haciendo hits mientras navega.

En cuanto al problema, hasta donde creo es que no llamabas a la funcion qe tenia los datos
__________________
CreandoWebs.com
www.creandowebs.com
PLANTILLAS TEMPLATEMONSTER CON 10% DE DESCUENTO
Atención: Estás leyendo un tema que no tiene actividad desde hace más de 6 MESES, te recomendamos abrir un Nuevo tema en lugar de responder al actual.
Respuesta




La zona horaria es GMT -6. Ahora son las 12:36.