Ver Mensaje Individual
  #3 (permalink)  
Antiguo 10/08/2005, 17:05
Avatar de sjam7
sjam7
 
Fecha de Ingreso: diciembre-2001
Ubicación: Guadalajara, Mexico
Mensajes: 3.672
Antigüedad: 23 años, 4 meses
Puntos: 16
Pues este es un pequeño contador en asp con archivo TXT
Código:
set fso = createobject("scripting.filesystemobject")
set act = fso.opentextfile(server.mappath("archivo.txt"))
counter = clng(act.readline)
if session("activo") <> "si" then
counter = counter + 1
end if
act.close
Set act = fso.CreateTextFile(server.mappath("contadores/"&user&".txt"), true)
act.WriteLine(counter)
act.Close
Primero se abre el archivo, se lee el dato y luego se graba el nuevo valor
Para mas info de FSO checa:
http://www.sloppycode.net/Reference/FSO/