don't understand "there is no object in this control" message

[sk8er1]

In the following routine, I am getting an error message..."There is no object in this control" on the txtDateOn = recServices!DateOn

Can someone shed some light here....


Private Sub LoadControls()
' If the file is not empty load up
If Not recServices.BOF Then

' examine the filed under group
cboFiledUnder = recServices!FiledUnder
If recServices!FiledUnder = "Civic Group" Then
CGName.Visible = True
CGName.Enabled = True
CGName.SetFocus
CGName.BackColor = vbYellow
CGName = recServices!CivicGroupName
Else
CGName.Visible = False
CGName.Enabled = False
End If

txtDateOn = recServices!DateOn
txtLastName = recServices!LastName
txtFirstName = recServices!FirstName
txtAddress = recServices!Address
cboCity = recServices!City
cboIssues = recServices!Issues
txtZip = recServices!Zip
txtPhone = recServices!Phone
txtTakenBy = recServices!TakenBy
cboAgency = recServices!Agency
txtReferredTo = recServices!ReferredTo
txtNotes = recServices!Note
txtOrganization = recServices!Organization
txtResolution = recServices!Resolution
txtDays = recServices!DaysActive
txtRecord = recServices.RecordCount & " Records"
txtReviewDate = recServices!DateOn + txtDays
sbrStatus.Panels(3) = txtFirstName & " " & txtLastName & " " & cboIssues & " " & CDate(txtDateOn) + CInt(txtDays)
Else
sbrStatus.Panels(3) = "There are no records on file"
End If
End Sub

 

[ZmrAbdulla]

Normally these type of message pops up if there is an Activex control inserted on the form/report and that is not registered (available) in the user's PC.

________________________________________
Zameer Abdulla
Visit Me
A child may not be able to lift too much.
But it can certainly hold a marriage together

 

[sk8er1]

That is correct and it was exactly that.
Thanks for the confirmation.