Crear un archivo txt con ASP clásico

Código ASP clásico

Objetos muy interesantes que pueden crearse con Server.CreateObject() son los de acceso a archivos de texto. En el siguiente ejemplo se crean dos objetos:

confile que es un objeto FileSystem que permite acceder al sistema de ficheros del servidor.

fich que es un objeto TextStream que permite acceder a un fichero de texto llamado texto.txt en modo lectura o escritura.

Crear un archivo TXT con ASP clásico es muy sencillo:

<%    
'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 & vbCrLf      
	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()    
%>

Para que funcione este código de ASP clásico es indispensable que la carpeta del servidor tenga permisos de escritura. En caso contrario nos arrojará un error.

tags: