Ver Mensaje Individual
  #4 (permalink)  
Antiguo 26/08/2010, 10:36
eloy_ameneiros
 
Fecha de Ingreso: julio-2010
Mensajes: 93
Antigüedad: 13 años, 9 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.