
14/08/2002, 17:38
|
| | Fecha de Ingreso: abril-2002
Mensajes: 432
Antigüedad: 23 años, 1 mes Puntos: 0 | |
Que le pasa ha este contador asp?? Hola amigos.
Tengo un contador hecho en asp, el cual funciona con variables de sesion.Almacenando las visitas en un archivo txt con permiso de escritura.
En xp funciona muy bien pero cuando lo subo al servidor no funciona, me dice pagina no encontrada os pongo el codigo y le echis un vistazo..
<%
'primero indicamos el path virtual donde se localiza el archivo
fp = Server.MapPath("http://www.inmobiliaria-almanzora.com/contador.txt")
'Creamos el objeto FileSystem que es con el cual vamos a pòder accesar el archivo
Set fs = CreateObject("Scripting.FileSystemObject" ;)
'Abrimos el archivo
Set a = fs.OpenTextFile(fp)
'Leemos el archivo
ct = Clng(a.ReadLine)
'Checamos si existe la variable de sesion "ct" si no existe la crea. Le aumenta el valor a la variable
if Session("ct") = "" then
Session("ct") = ct
ct = ct + 1
'Escribimos y guardamos el archivo el archivo
'Cerramos el archivo
a.close
'Abrimos el archivo para grabarlo
Set a = fs.CreateTextFile(fp, True)
a.WriteLine(ct)
end if
'Cerramos el archivo
a.Close
'Mostramos el contador
Response.Write ct
%>
;) ;) |