Conditional Responses in Form

[jheintz57]

I have one main form, frm_Manifest that has 2 yes/no boxes. if one box is checked, I have frm_RCRA opening, if this box is not checked, and the other yes/no is, I have another form opening. There are instances where both boxes will be checked. Where these happen, I am getting an error saying I cannot edit that value.

[pbaldy]

It would probably help to see the code, and at what point you get the error.

[jheintz57]

The error is coming up in the receiving form:

Private Sub Form_Load()
If Not IsNull(Me.OpenArgs) Then
Me.Manifest_ID = Me.OpenArgs
End If
End Sub

The sending form has this:

Private Sub Manifest_Continue_Click()

Dim stForm As String
Dim stDocName As String
Dim stTable As String
Dim stID As String
Dim intCounter As Integer


If Me.[solid_waste?] = True Then

stForm = "frm_RCRA"
stTable = "tbl_RCRA_inventory"
stID = "RCRA_ID"

Else

stForm = "frm_DOT"
stTable = "tbl_DOT_inventory"
stID = "DOT_ID"

End If


intCounter = IIf(IsNull(DCount(stID, stTable, "[Manifest_id]=" & Me.Manifest_ID)), 0, DCount(stID, stTable, "[Manifest_id]=" & Me.Manifest_ID))

Select Case intCounter

Case Is = 0
DoCmd.OpenForm stForm, , , , , acFormAdd, Me.Manifest_ID


Case Is >= 1
DoCmd.OpenForm stForm, , , "[Manifest_ID] =" & Me![Manifest_ID]

End Select

Exit_select_site_Click:
Exit Sub

End Sub

[pbaldy]

So the error is in the load code with the OpenArgs? Is the source of that form editable? What is the control source of

Me.Manifest_ID

[jheintz57]

It is the Manifest_ID carried over from the previous form. When a certain project is selected in the previous form, a manifest is created in a subform. That Manifest_ID is from that subform. There isn't already an Manifest_ID for that project, one is created, if there is, it is opened in the subform which is where one checks the appropriate boxes mentioned before. There is a Manifest_Continue button that opens either the frm_RCRA or the frm_DOT depending on if the solid_Waste? box was checked. The Manifest_ID in the second form should not be allowed to be edited unless a new one has to be created.

Hope I am not totally confusing.

[pbaldy]

Can you post the db?

[jheintz57]

I would rather just send it directly to you if need be and not post online.

[pbaldy]

You can send it to

pbaldy
gmail
com