Busqueda orenada alfabeticamente
Necesitaria saber si me pudieran ayudar, estoy aprendiendo, y quisiera saber como acceder a una base de datos, que cuando voy ingresando letras automaticamente me va posicionando en el nombre asociado, estoy trabajando con visual 6, gracias !!!!
Fijate haber que onda
espero que ande rey
Private Sub txtbusca_Change()
Dim dato As String
dato = txtbusca.Text
If dato = "" Then Exit Sub
With dtetecno.rsart ' este es el recorset
' .MoveFirst
.Filter = "detalle LIKE '" + Trim(dato) + "*'"
If .EOF Then
MsgBox "No se han ensontrado coincidencias", vbExclamation, "TecnoAgro"
txtbusca.Text = ""
End If
End With
End Sub
espero que ande rey
Private Sub txtbusca_Change()
Dim dato As String
dato = txtbusca.Text
If dato = "" Then Exit Sub
With dtetecno.rsart ' este es el recorset
' .MoveFirst
.Filter = "detalle LIKE '" + Trim(dato) + "*'"
If .EOF Then
MsgBox "No se han ensontrado coincidencias", vbExclamation, "TecnoAgro"
txtbusca.Text = ""
End If
End With
End Sub