Ver Mensaje Individual
  #2 (permalink)  
Antiguo 19/08/2008, 03:01
Avellaneda
Colaborador
 
Fecha de Ingreso: enero-2008
Ubicación: Unas veces aquí, otras veces allí
Mensajes: 1.482
Antigüedad: 17 años, 1 mes
Puntos: 37
Respuesta: Comparar caja contra base de datos

Cita:
Iniciado por marsatk Ver Mensaje
quisiera saber como puedo comparar el contenido de una caja de texto, contra algun campo de una base de datos al momento del keypress.
Lo puedes hacer en el evento TextChanged; en este ejemplo, mediante la referencia a ADO y espacio de nombres System.Data.OleDb, según se va tecleando en el TextBox, muestra las coincidencias de la tabla "Pedidos" en un control DataGridView:

Código:
Private Sub TextBox1_TextChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles TextBox1.TextChanged
        Dim sTable As String = "Pedidos"
        Dim sql As String = "Select * From " & sTable & " WHERE Proveedor LIKE '" & TextBox1.Text & "%'"

        rs.Open(Sql, oCon, ADODB.CursorTypeEnum.adOpenStatic, ADODB.LockTypeEnum.adLockOptimistic)

        Dim oDa As OleDbDataAdapter = New OleDbDataAdapter
        Dim oDs As New DataSet

        oDa.Fill(oDs, rs, sTable)
        DataGridView1.DataSource = oDs.Tables(0)
    End Sub
Nota: "oCon" es la conexion ADODB a la base de datos que ya está abierta.