Ver Mensaje Individual
  #6 (permalink)  
Antiguo 22/06/2004, 18:15
mmarti
 
Fecha de Ingreso: abril-2004
Ubicación: Cdoro. Rivadavia
Mensajes: 83
Antigüedad: 20 años, 7 meses
Puntos: 0
solucionado

Gracias por tu ayuda Fonsypool, al fin pude hacerlo funcionar con la siguiente consulta.
Era solo un error de sintaxis
El código completo me quedó así:

Private Sub Form_Load()

Dim conexion As New ADODB.Connection

Dim record As New ADODB.Recordset
Dim strConn As String
strConn = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="
strConn = strConn & "D:\materiales de estudio\viba\taxicom\clientes.mdb"
conexion.ConnectionString = strConn
conexion.Open
Set record = conexion.Execute("Select * from clientes where cli_nrotel = '" & vgtelefono & "'")

lblnrotel.Caption = record!cli_nrotel
lblnombre.Caption = record!cli_apellido + ", " + record!cli_nom
lbldireccion.Caption = record!cli_dir
End Sub