open form based on value in a field

[delta456]

Hi

I have one form that is based on a table with only one records in it. On this form, I want to evaluate the value in the Environment field. If the value = "TEST" then I want to open one form, if the value in the field is "DEV" then I want to open a different form. I am trying to do this on the close function of the first form.

So far i have
Private Sub Form_Close()
if me.environment = "TEST" then
docmd.openreport rpt_recon_summary_hdr, acviewnormal
else
docmd.openreport rpt_recon_summary_trans,acviewnormal
end if

end sub

I am getting an error run-time error '13'
type mismatch on the line of if me.environment = "TEST"

any suggestions.
thanks

 

[fneily]

Private Sub Form_Close()
If Me![environment] = "TEST" Then
DoCmd.OpenReport "rpt_recon_summary_hdr", acViewPreview
Else
DoCmd.OpenReport "rpt_recon_summary_trans", acViewPreview
End If
End Sub

You forgot the "'s and you want acViewPreview

 

[TheAceMan1]

How are ya delta456 . . .

First, you should move your code to the forms [blue]On UnLoad[/blue] event. All your form controls are still in scope here (accessible!).

Now:

[blue]If the value = "TEST" then [purple]I want to open one form[/purple], if the value in the field is "DEV" then [purple]I want to open a different form[/purple].[/blue]

You say you want to open forms but your code uses the [blue]OpenReport[/blue] method of [blue]DoCmd![/blue] You'll have to switch to the [blue]OpenForm[/blue] method and [blue]set syntax proper[/blue] if you really meant forms.

[blue]Your Thoughts? . . .[/blue]

See Ya! . . . . . .

Be sure to see thread181-473997
Also faq181-2886

 

[kjv1611]

delta456,

Did any of this ever work for you? What did you end up with for a solution?

--

"If to err is human, then I must be some kind of human!" -Me