ASP Lee TXT y Guarda en Access: Solucionado

El arte de importar datos a Access desde archivos TXT con ASP

Para aquellos quienes frecuentemente manipulan datos, ASP se convierte en un recurso invaluable. En el escenario en que se necesiten leer y guardar datos de un formato TXT a Access, ASP se comporta excepcionalmente bien. El proceso único que ASP maneja para leer archivos TXT y guardarlos en Access es uno que todos los programadores deberían tener a mano.

Trabajando con ASP y archivos TXT

Comenzaremos por abordar la función de ASP al interactuar con archivos TXT. Este lenguaje de scripts permite abrir, leer y finalmente cerrar estos archivos de forma eficiente. El código siguiente es un ejemplo claro.

Set fs=Server.CreateObject("Scripting.FileSystemObject")
Set f=fs.OpenTextFile(Server.MapPath("test.txt"), 1)
Response.write(f.ReadAll)
f.Close

En el fragmento anterior, el script abre el archivo test.txt, lee todo su contenido y luego lo cierra. La simplicidad de ASP para abrir y leer archivos TXT es realmente impresionante.

ASP y Access unidos

Continuando con el proceso, nos adentramos en el terreno de Access. En este apartado, ASP se encarga de establecer una conexión con la base de datos y realizar las acciones necesarias para guardar la información.

Set conn=Server.CreateObject("ADODB.Connection")
conn.Provider="Microsoft.Jet.OLEDB.4.0"
conn.Open Server.MapPath("test.mdb")
Set rs=Server.CreateObject("ADODB.Recordset")
rs.Open "TableName", conn, 2, 3
rs.AddNew
rs("Field1")=f.ReadAll
rs.Update

El script previo abre la base de datos test.mdb y añade un nuevo registro en el campo Field1 con los datos leídos del archivo TXT. De esta faena, ASP se encarga de la logística.

Combinando ASP, TXT y Access

Ahora, para completar el proceso, tenemos que combinar ambas partes del código: la que lee el archivo TXT y la que guarda la información en Access.

Set fs=Server.CreateObject("Scripting.FileSystemObject")
Set f=fs.OpenTextFile(Server.MapPath("test.txt"), 1)
Set conn=Server.CreateObject("ADODB.Connection")
conn.Provider="Microsoft.Jet.OLEDB.4.0"
conn.Open Server.MapPath("test.mdb")
Set rs=Server.CreateObject("ADODB.Recordset")
rs.Open "TableName", conn, 2, 3
rs.AddNew
rs("Field1")=f.ReadAll
rs.Update
f.Close

Este último fragmento de código deja en evidencia la potente combinación de ASP con TXT y Access. En un solo bloque se gestiona la apertura y lectura de un archivo TXT y posteriormente se guarda su contenido en Access.

El camino hacia la maestría con ASP

Como hemos visto, la capacidad de ASP para trabajar con archivos TXT y guardar la información en Access es poderosa y directa. Este método es altamente útil en situaciones donde se requiere un manejo masivo de datos de forma eficiente.

Esta web utiliza cookies propias y de terceros para su correcto funcionamiento y para fines analíticos y para mostrarte publicidad relacionada con sus preferencias en base a un perfil elaborado a partir de tus hábitos de navegación. Al hacer clic en el botón Aceptar, acepta el uso de estas tecnologías y el procesamiento de tus datos para estos propósitos. Más información
Privacidad