در موقع ايراد از اكسس خارج شود

[MOAHHAMDREZA RAMIN]

ما با قفل شركت سيمين كار ميكنيم
قفل (Tiny.ocx) بصورت ActiveX بايد در ويندوز Registere شود
اگر قفل در ويندوز رجيستر نشود برنامه اكسس باز شده و به كار خود ادامه ميدهد
ميخواهيم كدي بزنيم كه اگر قفل (Tiny.ocx) در ويندوز رجيستر نشد از شروع برنامه اكسس خودداري كرده و برنامه باز نشود. در حال حاضر كد ما بصورت زير است:

Tiny0.Initialize = True
If Tiny0.TinyErrCode = 0 Then
Else
Access.Application.Quit
End If

با اين كد اگر قفل رجيستر نشده باشد برنامه باز ميشود!!
كدي كه اول رجيستر شدن را چك كند و بعد به بقيه موارد بپردازد نياز است؟
يا كدي كه اگر هر ايرادي ديد، از برنامه خارج شود؟