Visual Basic - INCLUIR OCX Y/O DLL EN EXE

Tengo un proyecto muy sencillo que voy a distribuir en varios equipos, lo que necesito es que al crear el exe ya me incluya los ocx y dll necesarias, dejarlo en un directorio compartido y no tener que ir ordenador a ordenador instalando las ocx o dll's.

Muchas gracias.

Pero creando tu Instalador desde el Visual Basic agregas los DLLs que necesite tu proyecto y listo! o a que te refieres??

Y si solo es un ejecutable, cómo hago para llevar todas las librerías que necesita mi aplicación a las otras máquinas que no tienen???....

Gracias por la ayuda.

Alx.

Crea una aplicación de entrada que cada vez que se inicie registre el control OCX y la DLL en la máquina y luego llame a tu verdadera aplicación.
Private Declare Function FreeLibrary Lib "kernel32" (ByVal hLibModule As Long) As Long
Private Declare Function LoadLibrary Lib "kernel32" Alias "LoadLibraryA" (ByVal lpLibFileName As String) As Long
Private Declare Function GetProcAddress Lib "kernel32" (ByVal hModule As Long, ByVal lpProcName As String) As Long
Private Declare Function CallWindowProc Lib "user32" Alias "CallWindowProcA" (ByVal lpPrevWndFunc As Long, ByVal hWnd As Long, ByVal Msg As Any, ByVal wParam As Any, ByVal lParam As Any) As Long
Public Function RegisterServer(hWnd As Long, DllServerPath As String, bRegister As Boolean)
On Error Resume Next
' Tenés que estar seguro que el path es correcto sino Crash
Dim lb As Long, pa As Long
lb = LoadLibrary(DllServerPath)
If bRegister Then
pa = GetProcAddress(lb, "DllRegisterServer")
Else
pa = GetProcAddress(lb, "DllUnregisterServer")
End If
If CallWindowProc(pa, hWnd, ByVal 0&, ByVal 0&, ByVal 0&) = &H0 Then
MsgBox IIf(bRegister = True, "Registration", "Unregistration") + " Successful"
Else
MsgBox IIf(bRegister = True, "Registration", "Unregistration") + " Unsuccessful"
End If
FreeLibrary lb
End Function
'Registras Call RegisterServer(Me.hWnd, "C:\COMCTL32.OCX", True)
'DesRegistras Call RegisterServer(Me.hWnd, "C:\COMCTL32.OCX", False)

Gracias por la ayuda, voy a hacer la prueba.

Alx.