Realizar busqueda a la base de datos con varios campos de un formulario

[Carlojas]

Que tal compañeros buenos dias, al hacer el tipico SELECT de busqueda por un solo campo de un formulario ejemplo un TextBox no hay ningún problema, pero mi inquietud es como sería para por ejemplo plantear busquedas por cualquiera de los campos que tengo en mi formulario , busquedas por código y nombre y descripcion o solo por código y nombre o por todos los campos ETC., sin lugar a dura abria que recorrer todos los controles del formulario y verificar cual o cuales no estas vacios e ir armando una cadena de consulta a partir de los mismos, obviamente es un decir porque estoy un poco enredado con esto agradesco sus respuestas al respecto.



Saludos.

[Carlojas]

Alguna idea al respecto compañeros?






Saludos.

[Fueguino]

Y si, la unica que queda es segun lo que haya ingresado el usuario armar la consulta sql de esos campos.

[Carlojas]

Si en eso estoy pensando este es el código que llevo pero estoy un poco atascado, ubique en la propiedad Tag de los textbox el nombre de cada campo de la tabla para armar la estructura deL SELECT, pero tengo un inconveniente necesito verificar si lo introducido en los TextBox es un numero o un caracter y dependiendo de esto ubicar o no las comillas sencillas y dobles para crear la consulta correctamente ejemplo
codigo = " & codigo.text & " y así sucesivamente, este es lo que llevo hasta el momento

Código:

Dim cControl As Control, contador As Integer, cCriterio As String = ""
        contador = 0
        For Each cControl In Me.Controls
            If TypeOf cControl Is System.Windows.Forms.TextBox Then
                If cControl.Text <> "" Then
                    contador = contador + 1
                    If contador > 1 Then
                        cCriterio = cCriterio + " AND " + cControl.Tag + " = " + cControl.Text
                        'MessageBox.Show("Control Vacio" & cControl.Name)
                    Else
                        cCriterio = cControl.Tag + " = " + cControl.Text
                    End If
                    MessageBox.Show(cCriterio)
                End If
            End If
        Next

Agradesco sus colaboraciones al respecto.


Saludos.

[Carlojas]

El otro incoveniente es el operador LIKE para las busquedas por nombre o ciudad ETC.


Saludos.

[chcma]

Yo por ejemplo lo haría asi:

Código:

select * from usuarios where
                                    NOMBRE     LIKE ISNULL( '%' + txtNombre.Text + '%') AND
                                    APELLIDOS LIKE ISNULL( '%' + txtApellidos.Text + '%')

Si metes algo en la caja de texto de nombre (txtNombre) filtrará, sino.. hará un like de %% que es lo mismo que decir que te coja todo.

Y luego, esta haciendo lo mismo con el apellido, y asi sucesivamente podrías hacer.

[Carlojas]

Gracias por la repuesta, voy probarla.




Saludos.

[Carlojas]

Esta fue la solución que plantee de todas maneras gracias

Código:

Dim cControl As Control, cCriterio As String = ""
        For Each cControl In Me.Controls
            If (TypeOf cControl Is System.Windows.Forms.TextBox) Or (TypeOf cControl Is System.Windows.Forms.ComboBox) Then
                If cControl.Text <> "" Then
                    If cControl.Tag = "nombre" Or cControl.Tag = "direccion" Or cControl.Tag = "pais" Or cControl.Tag = "profesion" Then
                        cCriterio = cCriterio + cControl.Tag + " LIKE " + "'" + "%" + cControl.Text + "%" + "'" + " AND "
                    Else
                        cCriterio = cCriterio + cControl.Tag + " = " + cControl.Text + " AND "
                    End If
                End If
            End If
        Next cControl
        cCriterio = Mid(cCriterio, 1, cCriterio.Length - 4)
        ConsultarDatos("empleados", cCriterio) 
        Me.listado.DataSource = Sdatatable

Saludos.

[chcma]

Yo creo que sería mejor y más mantenible la solución que te propuse amigo, pero bueno... si te funciona, pues nada.

Saludos.