Hola, tengo el siguiente problema, tengo que convertir una TXT que tiene
datos de una base de datos, separadas por tabulacion, a access, estoy usando
el siguiente codigo.
Dim cnn As New OleDb.OleDbConnection
Dim cmd As New OleDb.OleDbCommand
Dim SQL As String
cnn.ConnectionString = "Provider=Microsoft.JET.OLEDB.4.0;" & _
"Data Source=D:\basedemo.mdb;"
' Abrimos la base de datos de Access
cnn.Open()
' Construimos la consulta SQL
SQL = "SELECT * INTO [Mi_Tabla1] FROM [demostracion.txt] IN
''[TEXT;DATABASE=D:\]"
' Importamos los datos
With cmd
.Connection = cnn
.CommandText = SQL
.ExecuteNonQuery()
End With
' Cerramos la conexión
cnn.Close()
que crea un solo campo.. y cada linea del txt lo toma como 1 registro.
Desde ya, muchas gracias por su ayuda.
Leer las respuestas