Mensaje enviado por "JANO" <cmtsist@terra.com.pe>

Hola Eduardo para trabajar con Maestro-Detalles yo lo hago de esta forma

creo dos recordset :
dim withevents rsMaestro as ADODB.recordset
dim rsDetalle as ADODB.recordset
dim FieldLink as string ' variable del campo de enlace

Abro los recordset con los datos necesarios y en el evento

Private Sub rsMaestro_MoveComplete(ByVal adReason As ADODB.EventReasonEnum,
ByVal pError As_ ADODB.Error, adStatus As _
ADODB.EventStatusEnum, ByVal pRecordset As ADODB.Recordset)

if adstatus = adStatusOK then
    rsdetalle.filter = adfilternone
    rsDetalle.filter = "FieldLink = " & rsMaestro(FieldLink)
end if
End Sub




con esto es suficiente


Salu2 JANO
Sistemas CMAC-TACNA S.A.
mail: jano@cmactacna.com.pe, cmtsist@terra.com.pe
Fono: 727807; 725305 Anexo 232

"No subestime la capacidad de un lenguaje de programación, el poder está más en la lógica del programador que en las facilidades que brinde la herramienta"
Harvey Triana