Tito, si no entiendo mal, lo que estás intentando hacer por ahora es cargar el contenido del archivo línea por línea a la base de datos, para hacer eso es mejor hacerlo directamente desde los comandos de la base de datos. sería mucho más rápido que hacerlo desde .net y por otro lado si tu archivo es muy grande levantarlo todo a memoria con .ReadAllLines puede traerte problemas.
________________________________ De: Tito Molina <[email protected]> Para: vbnet List Member <[email protected]> Enviado: jueves, 10 de enero de 2013 8:33 Asunto: [vbnet] consulta sobre archivo de texto Hola, gracias por la ayuda. Esto que estoy tratando de resolver es simplemente ver cómo puedo separar una cadena de texto que contiene varios datos como habras visto en el codigo. Ahora voy por mostrar la linea que yo quiera ver sea la primera o la cuarta, etc. Todo es para aprender como hacerlo pero el objetivo final es exportar el txt a una base de datos, modificar uno o dos registros y luego exportarla a un nuevo txt. El tema en cuestion es que lo vengo haciendo con excel pero luego tengo que completar manualmente con ceros cada fila para alcanzar el numero de caracteres obligatorio que nos exigen. Gracias El 09/01/2013 18:34, "Angel "Java" Lopez" <[email protected]> escribió: Hola gente! > > >Tito, te muestra el ultimo, porque estas haciendo un while, que cada vez lee >una línea y la coloca en los campos de texto que tienes en el formulario. >O sea, lee línea 1 y pone el contenido en el formulario. >Lee línea 2 y pone el contenido en el formulario. >Lee línea 3 …. >Lee ultima línea y pone el contenido en el formulario. > >Con lo que siempre queda visible la ultima línea. > >No se cual es el problema a resolver, pero veria de usar, como “baby step”, >simplemente > >System.IO.File.ReadAllLines(DGBox.FileName) > >Que te devuelve un arreglo con todas las lineas. Ahí vas a estar mas comodo >para procesar lo que quieras, en el orden que quieras y demás. > >Nos leemos! > > >Angel “Java” Lopez >@ajlopez >github:ajlopez > >From:[email protected] [mailto:[email protected]] On Behalf Of Tito Molina >Sent: Wednesday, January 09, 2013 11:14 AM >To: vbnet List Member >Subject: [vbnet] consulta sobre archivo de texto > >Hola, resulta que quiero recorrer todas las lineas de un archivo de texto. >Cuando ejecuto el siguiente código me muestra el último > > Private Sub btnCargarArchivo_Click(ByVal sender As System.Object, ByVal e >As System.EventArgs) Handles btnCargarArchivo.Click > Dim DGBox As New OpenFileDialog > DGBox.Filter = "Archivos de texto plano (.txt)|*.txt" > DGBox.Multiselect = False > DGBox.ShowDialog() > If DGBox.FileName.Length > 0 Then > Using Archivo As New System.IO.StreamReader(DGBox.FileName) > Dim Columna() As String > While Not Archivo.EndOfStream > Columna = Archivo.ReadLine.Split(";") > > txtCasa.Text = String.Format("{0}", Columna(0)) > txtOficina.Text = String.Format("{0}", Columna(1)) > txtCuenta.Text = String.Format("{0}", Columna(2)) > txtAño.Text = String.Format("{0}", Columna(3)) > txtMes.Text = String.Format("{0}", Columna(4)) > txtImporte.Text = String.Format("{0:C}", Columna(5)) > txtNumeroCuota.Text = String.Format("{0}", Columna(6)) > txtDNI.Text = String.Format("{0}", Columna(7)) > txtReparticion.Text = String.Format("{0}", Columna(8)) > txtBoleta.Text = String.Format("{0}", Columna(9)) > txtAfiliado.Text = String.Format("{0}", Columna(10)) > End While > End Using > End If > End Sub > >Me interesaría saber como hacer para leer la primera fila de dicho registro. >Luego yo me daría maña para leer cualquier fila que es lo que en realidad >quiero hacer. Muchas gracias > >-- >Roberto Miguel Molina
