Esa es la intencion pero primero probar hacerlo sin cargar a una base de datos como para verlos nada mas. El objeetivo como dije antes es ponerlo en una base de datos. El 10/01/2013 11:13, "Cristian" <[email protected]> escribió:
> 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**** > > > >
