lnRecNo = IIF( NOT EOF( thisform.grid1.RecordSource ) AND NOT BOF( thisform.grid1.RecordSource ), RECNO( thisform.grid1.RecordSource ), 0 ) SELECT ( thisform.grid1.RecordSource )