Ver Mensaje Individual
  #1 (permalink)  
Antiguo 21/09/2007, 12:02
atreyu_
 
Fecha de Ingreso: julio-2006
Mensajes: 12
Antigüedad: 17 años, 9 meses
Puntos: 0
combo que muestre dos campos de una tabla y ocupar solo uno para consulta

este es el codigo el cual me muestra los datos pero la idea es que al seleccionar 1 me mande solo el campo clave para una cnsulta sql va el codigo:
Private Sub cboTrabajador_DropDown()
Const sPathBase As String = "D:\bd\medio_ambiente.MDB"
Set cnn = New ADODB.Connection
Set rst = New ADODB.Recordset


With cnn
.ConnectionString = _
"Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=" & sPathBase & ";"
.Open
End With

rst.Open "SELECT * FROM trabajadores, encargado_area where encargado_area.f_id_trabajador=trabajadores.id_tra bajador", cnn, adOpenDynamic, adLockOptimistic
cboTrabajador.Clear

Do While Not rst.EOF
cboTrabajador.AddItem rst(2) & " " & rst(3)
rst.MoveNext
Loop
'MsgBox (paso)
rst.Close
cnn.Close
End Sub