Autor
|
Tema: Buscar dentro de una base de datos (Leído 9,256 veces)
|
andaluz
Desconectado
Mensajes: 333
|
hola tengo un pequeño problemilla el cual al recorren una base de datos que ya tengo creada solo me accede al primer registro. les pongo el codigo haber si encuentran algo mal y me pueden ayudar. Private Sub btn_Buscar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btn_Buscar.Click Dim nombre, dni As String Dim edad As Integer For i = 0 To UsuTableAdapter.GetData.Rows.Count - 1 nombre = UsuTableAdapter.GetData.Rows(i).Item(0) dni = UsuTableAdapter.GetData.Rows(i).Item(1) edad = UsuTableAdapter.GetData.Rows(i).Item(2) If dni <> txt_DNI_Buscar.Text Then fila = i MessageBox.Show("DNI encontrado: " & UsuTableAdapter.GetData.Rows(i).Item(1), "Informacion", MessageBoxButtons.OK, MessageBoxIcon.Information) lbl_DNI_Encontrado.ForeColor = Color.Green lbl_Nombre.Text = nombre lbl_DNI.Text = dni lbl_Nombre.Text = edad Exit Sub Else fila = i MessageBox.Show("ERROR") 'Exit Sub End If Next End Sub
saludos
|
|
|
En línea
|
|
|
|
andaluz
Desconectado
Mensajes: 333
|
tiene algun fallo el código???
|
|
|
En línea
|
|
|
|
andaluz
Desconectado
Mensajes: 333
|
me gustaria saber porque si le introduzco un dni correcto me devuelve la misma información que si le introduzco un dni incorrecto???
espero que me puedan ayudar!!!!
saludos
|
|
|
En línea
|
|
|
|
Novlucker
Ninja y
Colaborador
Desconectado
Mensajes: 10.683
Yo que tu lo pienso dos veces
|
Private Sub btn_Buscar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btn_Buscar.Click Dim nombre, dni As String Dim edad As Integer For i = 0 To UsuTableAdapter.GetData.Rows.Count - 1 nombre = UsuTableAdapter.GetData.Rows(i).Item(0) dni = UsuTableAdapter.GetData.Rows(i).Item(1) edad = UsuTableAdapter.GetData.Rows(i).Item(2) If dni <> txt_DNI_Buscar.Text Then fila = i MessageBox.Show("DNI encontrado: " & UsuTableAdapter.GetData.Rows(i).Item(1), "Informacion", MessageBoxButtons.OK, MessageBoxIcon.Information) lbl_DNI_Encontrado.ForeColor = Color.Green lbl_Nombre.Text = nombre lbl_DNI.Text = dni lbl_Nombre.Text = edad Exit Sub Else fila = i MessageBox.Show("ERROR") 'Exit Sub End If Next End Sub
Saludos
|
|
|
En línea
|
Contribuye con la limpieza del foro, reporta los "casos perdidos" a un MOD XD "Hay dos cosas infinitas: el Universo y la estupidez humana. Y de la primera no estoy muy seguro." Albert Einstein
|
|
|
andaluz
Desconectado
Mensajes: 333
|
este codigo es el mismo que he publicado yo en primer lugar o tiene algun cambio??
|
|
|
En línea
|
|
|
|
Novlucker
Ninja y
Colaborador
Desconectado
Mensajes: 10.683
Yo que tu lo pienso dos veces
|
Te he marcado la línea incorrecta, aunque todo el else tampoco es necesario
Saludos
|
|
« Última modificación: 25 Febrero 2012, 19:11 pm por Novlucker »
|
En línea
|
Contribuye con la limpieza del foro, reporta los "casos perdidos" a un MOD XD "Hay dos cosas infinitas: el Universo y la estupidez humana. Y de la primera no estoy muy seguro." Albert Einstein
|
|
|
andaluz
Desconectado
Mensajes: 333
|
porque esta incorrecta esa linea???
|
|
|
En línea
|
|
|
|
Novlucker
Ninja y
Colaborador
Desconectado
Mensajes: 10.683
Yo que tu lo pienso dos veces
|
Si estas buscando el DNI, por que la comparación es "distinto" (<>)?
Saludos
|
|
|
En línea
|
Contribuye con la limpieza del foro, reporta los "casos perdidos" a un MOD XD "Hay dos cosas infinitas: el Universo y la estupidez humana. Y de la primera no estoy muy seguro." Albert Einstein
|
|
|
andaluz
Desconectado
Mensajes: 333
|
eso me he dado cuenta, pero esque si le pongo igual = me salga al else y si le pongo dintinto <> me lo hace bien, es algo que no comprendo.
a que puede ser devido eso???
aunque ya he solucionado esa duda haciendo la busqueda de otra forma.
Saludos
|
|
« Última modificación: 25 Febrero 2012, 21:01 pm por andaluz »
|
En línea
|
|
|
|
Novlucker
Ninja y
Colaborador
Desconectado
Mensajes: 10.683
Yo que tu lo pienso dos veces
|
Te salta el ELSE porque tiene que ir recorriendo las filas hasta llegar a la correcta, cuando la encuentre ya no saltará. De cualquier modo, TODO el ELSE es incorrecto, no debería de ir.
Saludos
|
|
|
En línea
|
Contribuye con la limpieza del foro, reporta los "casos perdidos" a un MOD XD "Hay dos cosas infinitas: el Universo y la estupidez humana. Y de la primera no estoy muy seguro." Albert Einstein
|
|
|
|
Mensajes similares |
|
Asunto |
Iniciado por |
Respuestas |
Vistas |
Último mensaje |
|
|
como buscar palabras en una base de datos access?
Programación Visual Basic
|
jorkaes
|
4
|
6,901
|
3 Septiembre 2008, 19:01 pm
por fofolbich
|
|
|
Buscar dentro de una tabla en base de Datos...
PHP
|
IvanUgu
|
6
|
5,039
|
15 Septiembre 2009, 23:39 pm
por IvanUgu
|
|
|
necesito un programa para buscar dentro de una base de datos
Foro Libre
|
BK201
|
1
|
2,990
|
21 Mayo 2012, 02:16 am
por m0rf
|
|
|
como puedo buscar dentro de una de base datos
Bases de Datos
|
General Dmitry Vergadoski
|
2
|
3,565
|
3 Febrero 2015, 14:11 pm
por General Dmitry Vergadoski
|
|
|
Buscar datos en una base de datos externa con Batch
Scripting
|
Mauricio De Abreu
|
4
|
3,443
|
17 Febrero 2022, 16:41 pm
por Mauricio De Abreu
|
|