Hi all,

since I'm having problems with the packet deployment wizard of VB, and since I believe it's not customizeable enough, I'm using a freeware setup program that greatly does the job.

At the end of the setup I launch a little program to register ocx on the computers that have the "component comdlg32.ocx: file missing or incorreclty registered" error.

I'm using this code but it does not seem to work, please HELP!!!! I need a code that really DOES register an OCX (like regsrv32.exe does!).

I need this last step to release my program.

Code:
      Public Declare Function RegComCtl32 Lib "ComCtl32.OCX" _
         Alias "DllRegisterServer" () As Long

      Public Declare Function UnRegComCtl32 Lib "ComCtl32.OCX" _
         Alias "DllUnregisterServer" () As Long

      Public Const S_OK = &H0

      Sub RegisterComCtl32()
         On Error GoTo Err_Registration_Failed
         If RegComCtl32 = S_OK Then
            MsgBox "Registered Successfully"
         Else
            MsgBox "Not Registered"
         End If
      Exit Sub
      Err_Registration_Failed:
         MsgBox "Error: " & Err.Number & " " & Err.Description
      End Sub

      Sub UnRegisterComCtl32()
         On Error GoTo Err_Unregistration_Failed
         If UnRegComCtl32 = S_OK Then
            MsgBox "Unregistered Successfully"
         Else
            MsgBox "Not Unregistered"
         End If
      Exit Sub
      Err_Unregistration_Failed:
         MsgBox "Error: " & Err.Number & " " & Err.Description
      End Sub
Thank you in advance,

W.