Ver Mensaje Individual
  #1 (permalink)  
Antiguo 27/02/2004, 17:07
Sergyus
 
Fecha de Ingreso: febrero-2004
Mensajes: 2
Antigüedad: 21 años, 2 meses
Puntos: 0
Pbl. al escribir en fichero

Hola, utilizo el siguiente código para escribir en un nuevo fichero:


<%
'creamos el nombre del archivo
archivo= request.serverVariables("APPL_PHYSICAL_PATH") & "pruebas.txt"

'conectamos con el FSO
set confile = createObject("scripting.filesystemobject")

'creamos el objeto TextStream
set fich = confile.CreateTextFile(archivo)

'escribimos los números del 0 al 9
for i=0 to 9
fich.write(i)
next

'cerramos el fichero
fich.close()

'volvemos a abrir el fichero para lectura
set fich = confile.OpenTextFile(archivo)

'leemos el contenido del fichero
texto_fichero = fich.readAll()

'imprimimos en la página el contenido del fichero
response.write(texto_fichero)

'cerramos el fichero
fich.close()
%>


pero el maldito no funciona, no da ningun error, simplemente parece quedarse en un bucle infinito hasta que finaliza el tiempo de ejecución, y ni si quiera llega a generar el fichero.

Muchas gracias de antemano!!!!!!