CLR: .Net / Mono / Boo / Otros CLR > VB .NET
buscar algun texto dentro de un archivo .txt// duda con un codigo
(1/1)
carlosariash:
hola a todos soy nuevo en el foro. y lo encontre bastante bueno para todos los informaticos del mundo. bueno voy al grano
explicare todo lo que estoy haciendo para que me entiendan mejor :D :ayuda:
tengo un form1 que donde ingreso los productos marcas, etc y se guardan en c:\Test\certamen.txt // dejo el codigo guardado
Dim sw As New StreamWriter("c:\Test\certamen.txt", True)
sw.WriteLine(tx_NombreP.Text & " ; " & tx_marcaP.Text & " ; " & tx_CodigoP.Text & " ; " & NU_PrecioP.Value & " ; " & cb_tipop.SelectedItem)
sw.Close()
limpiarDatos()
MsgBox("El Producto se Guardo Correctamente ", MsgBoxStyle.Information)
y me deja el txt guadado de esta forma cada linea
m&m ; ambrosoli ; 4a5678 ; 2600 ; chocolates
luego en un form2 tengo un boton mostrar todos los productos guardados en certamen.txt dentro de un listview // dejo el codigo
Private Sub Button2_Click(sender As System.Object, e As System.EventArgs) Handles Button2.Click
If File.Exists("c:\Test\certamen.txt") Then
ListView1.Items.Clear()
Dim sr As New StreamReader("c:\Test\certamen.txt")
Dim linea = sr.ReadLine
Do While Not linea Is Nothing
Dim arreglo() As String = linea.Split(";")
ListView1.Items.Add(New ListViewItem(New String() {arreglo(0), arreglo(2), arreglo(1), arreglo(3), arreglo(4)}))
linea = sr.ReadLine
Loop
sr.Close()
Else
MsgBox("Error,No existen Productos.debe registrar algun producto", MsgBoxStyle.Critical)
End If
hasta aqui todo bien,pero cuando quiero hacer una busqueda de una palabra que fue ingresada por un textbox y buscar dentro del archivo .txt no me a funcionado ningun codigo que e visto en las librerias de microsoft
EJ: si en el textbox pusiera m&m y apreto el boton buscar tendria que encontrar
m&m ; ambrosoli ; 4a5678 ; 2600 ; chocolates o solamente m&m
ojala me ayuden! :D :ayuda: :ayuda: :ayuda: :ayuda: :ayuda: :ayuda: :ayuda: :ayuda:
Thanatos-chan:
saludos,
si te fijas,
--- Cita de: carlosariash ---quiero hacer una busqueda de una palabra que fue ingresada por un textbox y buscar dentro del archivo
y buscar dentro del archivo .txt
--- Fin de la cita ---
pero no estas indicando que haces en el textbox o como estas buscando.dado que tu fuente de datos es el txt. al igual que este codigo que indicas debes ir leyendo linea por linea. hasta leer todo el archivo. cada vez que generes un search.
en caso b, ya que estas cargando el txt a un listview. puedes hacer las busqueda en el listview.
--- Código: vb.net ---Private Sub Button2_Click(sender As System.Object, e As System.EventArgs) Handles Button2.Click If File.Exists("c:\Test\certamen.txt") Then ListView1.Items.Clear() Dim sr As New StreamReader("c:\Test\certamen.txt") [b] Dim linea = sr.ReadLine Do While Not linea Is Nothing[/b] Dim arreglo() As String = linea.Split(";") ListView1.Items.Add(New ListViewItem(New String() {arreglo(0), arreglo(2), arreglo(1), arreglo(3), arreglo(4)})) [b] linea = sr.ReadLine[/b] Loop sr.Close() Else MsgBox("Error,No existen Productos.debe registrar algun producto", MsgBoxStyle.Critical) End Ifend sub
Navegación
Ir a la versión completa