Follow along with the video below to see how to install our site as a web app on your home screen.
Note: This feature may not be available in some browsers.
Dim rs As DAO.Recordset
strSQL="Select ID From MainTableName " _
& "Left Join SubTableName " _
& "On MainTableName.JoinFieldName=SubTableName.JoinFieldName " _
& "WHERE SubTableName.JoinFieldName Is Null"
Set rs=CurrentDB.OpenRecordset(strSQL)
Me.Recordset.FindFirst "ID=" & rs!ID