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

[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