Hello (again )

firstly thanks to all for the help am getting on here.

now to the question....

i have the following

Private Sub Toggle66_Click()

On Error GoTo Err_Toggle66_Click

Dim stDocName As String
Dim stLinkCriteria As String
stDocName = "SIR"
DoCmd.OpenForm stDocName, , , stLinkCriteria
DoCmd.OpenQuery "SIR-Append"



Exit_Toggle66_Click:
Exit Sub

Err_Toggle66_Click:
MsgBox Err.description
Resume Exit_Toggle66_Click

End Sub

but i dont want the form to open if the append query has an error, any solutions to this?

ADAM

Dont open the form before the query.

Be carefull of the "stLinkCriteria" I dont see you passing anything to it or clearing it.

thanks that worked and i removed the "stLinkCriteria"

is there anyway to get access from displaying the default warning and options and replacing it with just a simple comment like

"cannont perform operation"

??

thanks

ADAM