30/08/2002, 06:23
|
| | | Fecha de Ingreso: diciembre-2001
Mensajes: 62
Antigüedad: 23 años, 5 meses Puntos: 0 | |
| Funcion en el Global.asa
¿Como debo introducir el siguente código en Session_OnStrart del Global.asa?¿Se introduce tal cual o hay que crear una función dentro (Sub)?
strRuta = Server.MapPath("admin/archivos/visitasTotales.txt")
Set fso = Server.CreateObject("Scripting.FileSystemObje ct") //crea el descriptor de ficheros
Set file = fso.OpenTextFile(strRuta, 1, false) //abre el fichero de sólo-lectura
visitasAntes = trim(file.ReadLine)
visitasAhora = visitasAntes + 1
Set nuevoTexto = fso.CreateTextFile(strRuta, 2, false) //abre el fichero de lectura/escritura
nuevoTexto.writeLine(visitasAhora)
Set file = Nothing
Set nuevoTexto = Nothing
Un saludo |