Set rs = CurrentDb().OpenRecordset("SELECT dbo_Prospects.*, dbo_Deals.*, dbo_DPInsurance.*, dbo_DPFinance.*, dbo_DPInventory.*
FROM dbo_Prospects
INNER JOIN dbo_Deals ON dbo_Prospects.ProspectID = dbo_Deals.ProspectID
INNER JOIN dbo_DPFinance ON dbo_Deals.OrderNo = dbo_DPFinance.OrderNo
INNER JOIN dbo_DPInventory ON dbo_Deals.OrderNo = dbo_DPInventory.OrderNo
INNER JOIN dbo_DPInsurance ON dbo_Deals.OrderNo = dbo_DPInsurance.OrderNo"
, dbOpenDynaset, dbSeeChanges)
|