
26/08/2010, 10:36
|
| | Fecha de Ingreso: julio-2010
Mensajes: 93
Antigüedad: 14 años, 8 meses Puntos: 0 | |
Respuesta: Importar .TXT a SQL en C# Les añado la extensión .txt ya que cuando se descomprimen no son archivos reconocidos por el sistema.
Necesito algo como esto:
Public Sub insertar_en_tabla()
Dim base As Database
Dim tabla As Recordset
Dim nombre As String
nombre = ""
Set base = CurrentDb
Set tabla = base.OpenRecordset("tablas")
tabla.MoveFirst
Do While tabla.EOF = False
nombre = tabla.Fields(1)
DoCmd.TransferText acImportDelim, "IMPORTACION ARCHIVO CMT", "temporal", nombre, False
DoCmd.RunSQL ("INSERT INTO NUEVA ( CONMODIF, NOMBRE, APELLIDO, APELLIDO2, ABCALLE, NUMERO, CPPOSTAL, POBLACION, PROVINCIA, TELEFONO, ABVENTA, tabla )SELECT temporal.CONMODIF, temporal.NOMBRE, temporal.APELLIDO, temporal.APELLIDO2, temporal.ABCALLE, temporal.NUMERO, temporal.CPPOSTAL, temporal.POBLACION, temporal.PROVINCIA, temporal.TELEFONO, temporal.ABVENTA, '" & nombre & "' AS Expr1 FROM temporal;")
DoCmd.RunSQL ("delete * from temporal")
tabla.MoveNext
Loop
End Sub
Este código es el que tengo en un módulo de Access para importar los archivos a una tabla access. |