El problema consiste en que necesito tomar la información de un archivo de texto y agregarla a una tabla de una base de datos ACCESS, utilizando el método "DoCmd.TransferText".
He hecho el intento, pero la información del archivo de texto no la agrega sino que borra la información existente en la tabla y coloca la del archivo de texto.
He aquí la forma como lo estoy haciendo:
Dim dbs As Database
Dim AppAccess As Access.Application
Set AppAccess = CreateObject("Access.Application")
With AppAccess
.OpenCurrentDatabase sDbs
.Visible = True ' Muestra la aplicación ACCESS
.DoCmd.TransferText acImportFixed, sDbsEspecificaciones, sDbsTableName, sTxtFileName
End With
Muchas gracias...
|