Cómo crear un archivo TXT con ASP clásico

Cómo crear un archivo TXT con ASP clásico

Código ASP clásico

Por ASP clásico / 17/09/2014 @ 14:32:10 / 1794 visitas

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.

Descubre más sobre cómo simplificar y optimizar tu trabajo empresarial en el Blog de CoreASP.

crear archivo TXT ASP clásico, evitar errores 500, manejo de errores ASP clásico, programación defensiva, control de errores en ASP clásico