Visual Basic - Buscar un registro

Life is soft - evento anual de software empresarial
 
Vista:

Buscar un registro

Publicado por Alfredo (Matus) (3 intervenciones) el 02/08/2002 15:34:14
Si alguien pudiera ayudarme. Como puedo localizar un registro de una tabla.

Por ejemplo:
Que al escribir el numero de control y al hacer clic en un boton me localice el registro.

Gracias.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Buscar un registro

Publicado por gogoz (38 intervenciones) el 02/08/2002 20:19:20
Private Sub CmdBuscar_Click()
dim StrSQL as String
dim StrCon as String
dim Conex As New ADODB.Connection
dim RstResult As New ADODB.Recordset

On Error GoTo Err_CmdBuscar_Click

StrCon= "Provider=SQLOLEDB;Data Source=MiServidor;" & _
"Initial Catalog=MiBaseDeDatos;" & _
"User ID=MiIDdUsuario;Password=MiContraseña;"
Conex.open StrCon

StrSQL="SELECT * FROM MiTabla WHERE Codigo= " & Numero

RstResult .open StrSQL, StrCon

If Not RstResult.EOF then
txtNombre.text = RstResult.Fields("NombreCliente")
....
end if

Set RstResult.ActiveConnection =nothing
RstResult .close

Err_CmdBuscar_Click:
MsgBox "Error en la rutina 'Err_CmdBuscar_Click': " & Err.Number _
& " " & Err.Description
Set Conex.ConnectionString=nothing
Conex.close

End Sub
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Buscar un registro

Publicado por Orlando Vasquez (1 intervención) el 10/08/2002 20:23:20
Yo cree un formulario que me ayuda a crear consultas SQL, basandose en el número de campos de la tabla (puede utilizar AND, OR < > like, etc) y hasta ahora ha funcionado bien creando consultas a Oracle y Acces. Si quieres escribeme y te paso la información de manera mas explicita.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar