<%
'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!!!!!!
