Ver Mensaje Individual
  #2 (permalink)  
Antiguo 28/03/2012, 08:30
Avatar de Aquaventus
Aquaventus
 
Fecha de Ingreso: junio-2010
Ubicación: Lima-Peru , En el alba de la naturaleza
Mensajes: 2.105
Antigüedad: 13 años, 10 meses
Puntos: 267
Respuesta: Mostrar filtro mediante TextBox y Combobox[VB.net]

Hola UNDR4, eso lo puedes validar en la acción click de tu boton de esta manera :
Código vb:
Ver original
  1. 'Creas una variable string que contendra la consulta
  2. Dim query As String
  3. If txtTUTEXTBOX1.Text.Trim.Length == 0 And txtTUTEXTBOX2.Text.Trim.Length == 0 Then
  4. query = "Select clave,nombre,descripcion,precioc,preciou from productos where id_marca='" & CBMarca.SelectedValue.ToString & "' order by nombre"
  5. Else IF txtTUTEXTBOX1.Text.Trim.Length <> 0 And txtTUTEXTBOX2.Text.Trim.Length == 0 Then
  6. query = "Select clave,nombre,descripcion,precioc,preciou from productos where clave='" txtTUTEXTBOX1.Text.Trim & "' and id_marca ='" & CBMarca.SelectedValue.ToString & "' order by nombre"
  7. Else IF txtTUTEXTBOX1.Text.Trim.Length == 0 And txtTUTEXTBOX2.Text.Trim.Length <> 0 Then
  8. query = "Select clave,nombre,descripcion,precioc,preciou from productos where nombre='" txtTUTEXTBOX2.Text.Trim & "' and id_marca ='" & CBMarca.SelectedValue.ToString & "' order by nombre"
  9. Else ' txtTUTEXTBOX1.Text.Trim.Length <> 0 And txtTUTEXTBOX2.Text.Trim.Length <> 0 Then
  10. query = "Select clave,nombre,descripcion,precioc,preciou from productos where clave='" txtTUTEXTBOX1.Text.Trim & "' and nombre = '" & txtTUTEXTBOX2.Text.Trim & "'and id_marca ='" & CBMarca.SelectedValue.ToString & "' order by nombre"
  11. End If
  12.  
  13. 'Y al final se lo pasas a tu adapter
  14. 'Crear Adaptador
  15. oDataAdapter = New MySqlDataAdapter(query, Conexion)
Saludos!.
__________________
Internet es tener todo el conocimiento global a tu disposición.
Desarrollo de Software - Ejemplos .Net