| Usuario |
agregar commandboton buscar en vb |
Desconocido
|
| Enviado - 23/4/2003 |
| |
nessesito saber como buscar un registro en vb
[email protected]
estoy dispuesto a dar las grasias
|
| |
|
Zell
89 Mensaje(s)
|
| Enviado - 23/4/2003 |
| |
Bien si lo que entendi es que tenes que buscar una clave en el registro de windows, lo podes hacer con las apis de windows, sobre esto podes encontar mucha info en la pagina de microsoft,
www.msdn.com
busca las apis que empicen con Reg, como
RegCreateKey, RegDeleteKey, etc.
zell |
| |
|
Desconocido
|
| Enviado - 25/4/2003 |
| |
bueno de principio mi msn es [email protected]
esto funciona con los datas ADO, DAO, RDO
Private Sub cmdBuscar_Click()
Dim Buscado As String, Criterio As String
Dim r As Integer
On Error GoTo RutinaDeError
Buscado = InputBox("Ingrese el Codigo del Vehículo")
Criterio = "Codigo Like '*" & Buscado & "*'"
Data1.Recordset.MoveNext
Data1.Recordset.FindFirst Criterio
If Data1.Recordset.NoMatch Then
Data1.Recordset.MoveLast
MsgBox ("No se encontro el Vehículo '" & Buscado)
End If
Exit Sub
RutinaDeError:
r = MsgBox(Error, vbOKOnly + 16, "Se ha producido un error:")
Data1.UpdateControls
End Sub |
| |
|
|
|