guardar datos en sql server desde un archivo csv

[Sougiro]

Hola a todos,

Estoy realizando una pagina con asp.net y me gustaría poder subir a una base de datos sql server, los datos contenidos en una archivo .csv delimitado por comas(,) o punto y coma(;), he estado buscando en la web y solo encuentro referencias a un Bulk insert en el sql, pero casi nada de asp.net.

Me podrían ayudar regalándome un ejemplo de como lo cargo y guardo los datos en la base de datos o decirme en donde encuentro esa información.

Muchas gracias.

[Aquaventus]

Hola Sougiro, podrías por favor mostrarnos como está estructurado tu archivo? Saludos!.

[Sougiro]

Hola mira al abrir un archivo de csv debe contener lo siguiente:

[PAIS];[PRODUCTO];[TIPO_DOCUMENTO];[TIPO_ERROR];[MAQUINA];[MOTOR_PROCESAMIENTO];[PROCESO];[ACCION];[SECUENCIA];[SINTOMA];[CAUSA];[OBSERVACIONES];[RUTA]
COLOMBIA;1;Orders;1;N/A;Orders PT Colombia;Orders BRIDGE ENVIO ;11101;2;Error al enviar el documento a la VANÿ;Ocurrio un error al enviar el documento a la VANÿ;"|EngineSPFinalizaCola:Antes=6,1;3,Program¢=7 ,2;1|Salida;Date:09:18:43:510 |Engine:InicioEjecucion;P:11101-A:7-S:2-F:26/10/2006 09:18:44.1044|Bridge_V1_0.Inicio|Ocurrio un error al enviar el documento a la VANEntrada;Date:09:18:50:947 ERROR CRITICO !! |EngineSPFinalizaCola:Finalizo Proceso|Salida;Date:09:18:50:947 ÿ";N/A
COLOMBIA;1;Orders;1;N/A;WAM/CEN&EDI2FAX;CO ORDERS EDI CARGUE DOCUMENTO -WAMSimple-;11180;3;;;"|EngineSPFinalizaCola:Antes=25,2;3,Pro gram¢=25,3;1|Salida;Date:09:49:18:413 |Engine:InicioEjecucion;P:11180-A:25-S:3-F:26/10/2006 09:49:19.1019|CCargueEDI.Inicio| Error por Tiempo-Revision. ";N/A
COLOMBIA;1;Orders;1;N/A;Otros Int;CO ORDERS EDI ACCIONES FIN DOCUMENTO POSITIVAÿ;11101;4;;ERROR : Fall¢ la programaci¢n del control ÿ;"|EngineSPFinalizaCola:Antes=3,3;3,Program¢=28,4 ;1|Salida;Date:09:03:39:757 |Engine:InicioEjecucion;P:11101-A:28-S:4-F:26/10/2006 09:03:50.1050| IBC_V2_ACCION_AGRUPAR_RESPUESTA:INICIO IBC_V2_ACCION_AGRUPAR_RESPUESTA Y FINALIZO CON ERROREntrada;Date:09:03:52:163 ERROR CRITICO !! |EngineSPFinalizaCola:Finalizo Proceso|Salida;Date:09:03:52:180 ÿ";N/A
COLOMBIA;1;Orders;1;N/A;WAM/CEN&EDI2FAX;Notificaci¢n por mail;11101;4;;;"|EngineSPFinalizaCola:Antes=3,3;3, Program¢=10,4;1|Salida;Date:15:04:54:160 |Engine:InicioEjecucion;P:11101-A:10-S:4-F:26/10/2006 15:04:55.1055| [Llamado: SendMail_V1_0.SendMail|3|StrCnx=SVR=172.16.32.111; CAT=COLAS_IBC_V2_0_WAM;UID=objetoscen;PWD=*objetos *2002;|NomTabla=COLA_IN|NomCampo=ID_COLA_IN|Ejecut ar=714478] Error por Tiempo-Revision. ÿ";N/A

jajaja, es mucho, pero para guiarte mejor en la parte de arriba están los campos

[Aquaventus]

Tu archivo viene en su contenido con esa cabecera? Saludos!.

PDT: En la cabecera que muestras das 13 columnas... y al momento de separar tus filas por ";" salen mas de 13 campos... está bien estructurado ese archivo de texto?

[Sougiro]

Hola, no, esa cabecera se la coloque para que se puede visualizar la información, porque como hay campos muy grandes, solo es una guía.

[Aquaventus]

Hola Sougiro, lo que puedes hacer es leer línea por línea el archivo y luego separar la cadena mediante un split con el ";" y ya estando separados tus datos insertarlos a tu BD :
Importas :

Código vb:

Import System.IO
 

Y luego :

Código vb:

'Ruta del archivo
        Dim archivo As String = Server.MapPath("\file\texto.txt")
        'Array donde se almacenara los campos de la fila separados
        Dim campos As String()
        'Declaramos el lector
        Dim reader As StreamReader
 
        Try
            'Leemos su contenido
            reader = File.OpenText(archivo)
 
            'Leemos linea por linea
            While reader.Peek() <> -1
 
                'Separamos la linea por el ;
                campos = reader.ReadLine.Split(";")
 
 
                'Aqui haces el insert a la tabla de tu BD...
                'INSERT INTO XXX VALUES(campos(0), campos(1), campos(2), campos(3), campos(4), campos(5), campos(6), campos(7), campos(8), campos(9), campos(10), campos(11), campos(12),...)"
 
            End While
 
            reader.Close()
 
        Catch ex As Exception
 
            'Aqui muestras tu mensaje de error
 
        End Try
 

Espero haberte aclarado un poco el panorama. Saludos!.

[Sougiro]

Hola,

muchas gracias por la ayuda, me fue muy útil.

Gracias.

[Aquaventus]

De nada Sougiro, cualquier problema no dudes en colocarlo al Foro. Saludos!.