مدیریت خطا در اکسس

[pedram_ns]

با سلام
فکر کنم کد زیر برای مدیریت خطا ها در اکسسه

On Error GoTo endcode

//MYCODE

endcode:

DoCmd.Close

با این کد انتظار دارم اگه اروری در قسمت mycode اتفاق افتاد، دستور بسته شدن فرم انجام بشه و اگر هم ارور داده نشد فرم بسته نشه. ولی اگر ارور نده باز هم فرم بسته میشه چطور باید بنویسم تا حالت دلخواه من ایجاد بشه؟

با سپاس

[Abbas Amiri]

حالت عمومی تر به شکل زیر است

Sub SubName(Args) ' Or Function

On Error GoTo endcode

'Some Codes



Exit Sub    'Function

endcode:

If Err.Num=x then     ' Or Select Case



Else



End If

End Sub    'Function