Does anyone have any ideas?
Code:
Dim rs As Recordset
Set rs = frmsubAdminEdit.Form.Recordset
rs.MoveFirst
Dim rs As Recordset
Set rs = frmsubAdminEdit.Form.Recordset
rs.MoveFirst
Set subfrmResourceProposedInProject.Form.Recordset = rst
strQueryName = "SELECT
Dim ItemNumberWLO As String
Dim ItemNumberWLN As String
While Not WLO.EOF
If WLO.Fields.Item(1).Value