مشکل با ریجستر کامپوننت

[yashar_2006]

سلام دوستان
من یه مبتدی هستم و از 3 تا کامپوننت تو برنامم استفاده کردم
و طبق فرمان که زیر نوشتم اونا رو ریجستر کردم
ولی بازم موقع اجرا ارور نبودن فایل میده
لطفاً راهنمایی کنید
متشکر میشم


Private Sub Form_Initialize()
Shell "regsvr32 SimpleLoading.ocx /s"
Shell "regsvr32 VistaProgressBar.ocx /s"
Shell "regsvr32 vkUserControlsXP.ocx /s"
End Subدانلود برنامه مشکل دار (http://www.4shared.com/file/UjSAZCDi/New_Folder__2_.html)
.
.
.

[mmssoft]

از این استفاده کن. فقط باید کامپوننت ها تو مسیر برنامت باشه.

ببشخید من نمی تونم از تگ کد استفاده کنم. انگار غیر فعاله. همین کد رو کپی کنید.

Private Sub Form_Initialize()
Shell "RegSvr32 /s " & App.Path & "\SimpleLoading.ocx", vbNormalFocus
Shell "RegSvr32 /s " & App.Path & "\VistaProgressBar.ocx", vbNormalFocus
Shell "RegSvr32 /s " & App.Path & "\vkUserControlsXP.ocx", vbNormalFocus
End Sub