Mira si te vale este en este ejemplo se tomand dos tablas de una base que esta conectada con Jet
si te puedes dar cuenta en el from, y puedes trabajar con el rec_view que es el resultado que arroja
SqlView = "Select C.codigo, S.apellidos, S.nombres, C.nivel, C.mes, C.pension, C.saldo, C.fecha, C.estado " & _
"From sine1 as C, Students as S " & _
"where C.MES LIKE '" & Trim(CboMes) & " ' and S.STATUS='ACTIVO' AND C.CODIGO=S.NUMEROEST and C.Nivel LIKE '" &
Trim(CboCobros(1)) & " ' order by S.Apellidos"
Set Rec_View = Base_de_datos.OpenRecordset(SqlView, dbOpenDynamic, 0, dbOptimistic) ' Students
Rec_View.MoveFirst
__________________
hI
|