Consultas a dos bases de datos relacionadas
Mi problema es que cuando hago un join entre dos tablas puedo hacer la consulta pero no recuperar la clave primaria de cada una.
Este es el caso
Set rsfam = base.OpenRecordset("SELECT * FROM Familia INNER JOIN Familia_Integrantes ON Familia.Rut_Rep = Familia_Integrantes.Rut_Rep")
If rsfam.RecordCount <> 0 Then
rsfam.MoveFirst
Do While Not rsfam.EOF
If rsfam!Rut_rep = MaskEdBox1 Then ' Aqui me caigo pues no encuantrael objeto Rut_Rep
Combo55 = rsfam!RUT
End If
rsfam.MoveNext
Loop
End If
Este es el caso
Set rsfam = base.OpenRecordset("SELECT * FROM Familia INNER JOIN Familia_Integrantes ON Familia.Rut_Rep = Familia_Integrantes.Rut_Rep")
If rsfam.RecordCount <> 0 Then
rsfam.MoveFirst
Do While Not rsfam.EOF
If rsfam!Rut_rep = MaskEdBox1 Then ' Aqui me caigo pues no encuantrael objeto Rut_Rep
Combo55 = rsfam!RUT
End If
rsfam.MoveNext
Loop
End If
En primer lugar, ¿Para que hacés el JOIN, si no recuperás ningún campo de la tabla Familia_Integrantes?
SerÃa más lógico buscar sólo la tabla Familia y si necesitás filtrarla hacerlo usando la cláusula WHERE.
¿Que valor tiene RecordCount? Puede ser -1 Y no estar devolviendo ningún registro.
Sacale todo el bloque if del RecordCount, si no hay registros va a salir directamente por EOF.
SerÃa más lógico buscar sólo la tabla Familia y si necesitás filtrarla hacerlo usando la cláusula WHERE.
¿Que valor tiene RecordCount? Puede ser -1 Y no estar devolviendo ningún registro.
Sacale todo el bloque if del RecordCount, si no hay registros va a salir directamente por EOF.
