VW COM server on Vista 64

I have used COM Connect to create a COM server that works on Windows XP. I am having trouble running the COM server in Vista 64bit OS. What changes must I make to the *.reg or any settings to get the COM server to work in Vista 64.

Thanks,

Aik-Siong Koh

Registry file.
Windows Registry Editor Version 5.00

[HKEY_CLASSES_ROOT\INMotion2010.Application]
@="INMotion2010"

[HKEY_CLASSES_ROOT\INMotion2010.Application\CLSID]
@="{ED317822-C9AC-400E-91C7-222B52919092}"

[HKEY_CLASSES_ROOT\INMotion2010.1]
@="INMotion2010 1.1"

[HKEY_CLASSES_ROOT\INMotion2010.1\CLSID]
@="{ED317822-C9AC-400E-91C7-222B52919092}"

[HKEY_CLASSES_ROOT\CLSID\{ED317822-C9AC-400E-91C7-222B52919092}]
@="INMotion2010 1.1"

[HKEY_CLASSES_ROOT\CLSID\{ED317822-C9AC-400E-91C7-222B52919092}\ProgID]
@="INMotion2010.1"

[HKEY_CLASSES_ROOT\CLSID\{ED317822-C9AC-400E-91C7-222B52919092}\VersionIndependentProgID]
@="INMotion2010.Application"

[HKEY_CLASSES_ROOT\CLSID\{ED317822-C9AC-400E-91C7-222B52919092}\LocalServer32]
@="\"C:\\askoh\\CAD\\Inventor\\in-motion\\setup\\INMotion2010\\COMCADSM\\visual.exe\" \"C:\\askoh\\CAD\\Inventor\\in-motion\\setup\\INMotion2010\\COMCADSM\\INMotion2010.im\" \"/Automation\""

[HKEY_CLASSES_ROOT\CLSID\{ED317822-C9AC-400E-91C7-222B52919092}\TypeLib]
@="{B90F2C78-429D-4CFB-BA46-2052A235884B}"

[HKEY_CLASSES_ROOT\CLSID\{ED317822-C9AC-400E-91C7-222B52919092}\Programmable]

Error log:
==2010/2/15==9:40:18==BEGIN RUNTIME DIAGNOSTIC DUMP
Note: this file stored in VisualWorks #source (UTF-8) encoding

Cause of Dump: Unhandled exception: Error accessing the OLE registry. ( HRESULT 16r8002801C )
Image Identification: 'Image created December 30, 2009  2:27:49 pm'
Smalltalk Version: 'VisualWorks®, 7.5 of April 16, 2007'
Object Memory versionId: #[62 41 62 96 75 0 0 0 62 41 62 96]
Class creating this dump: RuntimeImageDumper
Command Line: C:\askoh\CAD\Inventor\in-motion\setup\INMotion2010\COMCADSM\visual.exe C:\askoh\CAD\Inventor\in-motion\setup\INMotion2010\COMCADSM\INMotion2010.im /Automation -Embedding
------------------------------------------------------------
Active Process
Context Stack:
[1] COMError class>>hresult:
[2] OLEAutomationDLL(COMDynamicLinkLibrary)>>signalExceptionForHRESULT:
[3] OLEAutomationDLL(COMDynamicLinkLibrary)>>externalAccessFailedWith:
[4] OLEAutomationDLL>>invokeRegisterTypeLibrary:_:_:
[5] ExternalMethod>>unlinkedCall:arguments:
[6] OLEAutomationDLL>>RegisterTypeLibrary:_:_:
[7] ITypeLib>>registerTypeLibrary:helpDirectory:
[8] COMTypeLibrary>>register
[9] [] in COMTypeLibrary>>updateRegistration
[10] BlockClosure>>ensure:
[11] COMTypeLibrary>>updateRegistration
[12] optimized [] in CADSM.UI.COM.COMCADSMItem class>>updateTypeLibraries
[13] Dictionary>>do:
[14] CADSM.UI.COM.COMCADSM class(CADSM.UI.COM.COMCADSMItem class)>>updateTypeLibraries
[15] CADSM.UI.COM.COMCADSM class(CADSM.UI.COM.COMCADSMItem class)>>startUpApplication
[16] MessageSend>>value
[17] MessageSend>>evaluate
[18] ImageManager class(Object)>>triggerEvent:
[19] ImageManager class>>triggerSessionEventFor:
[20] ImageManager class>>update:with:from:
[21] DependentsCollection>>update:with:from:
[22] ObjectMemory class(Object)>>changed:with:
[23] ObjectMemory class(Object)>>changed:
[24] InterestNotificationSystem>>setUp
[25] InterestNotificationSystem(Subsystem)>>runActivationActions
[26] InterestNotificationSystem(Subsystem)>>privateActivate
[27] InterestNotificationSystem class(Subsystem class)>>activate
[28] optimized [] in Subsystem>>ensurePrerequisitesAreActive
[29] Set>>do:
[30] ImageConfigurationSystem(Subsystem)>>ensurePrerequisitesAreActive
[31] ImageConfigurationSystem(Subsystem)>>privateActivate
[32] ImageConfigurationSystem class(Subsystem class)>>activate
[33] optimized [] in Subsystem>>ensurePrerequisitesAreActive
[34] Set>>do:
[35] RuntimeSystem(Subsystem)>>ensurePrerequisitesAreActive
[36] RuntimeSystem(Subsystem)>>privateActivate
[37] RuntimeSystem class(Subsystem class)>>activate
[38] optimized [] in Subsystem>>ensurePrerequisitesAreActive
[39] Set>>do:
[40] UserApplication(Subsystem)>>ensurePrerequisitesAreActive
[41] UserApplication(Subsystem)>>privateActivate
[42] UserApplication class(Subsystem class)>>activate
[43] UserApplication class(Subsystem class)>>reactToEvent:
[44] optimized [] in Subsystem class>>signalEvent:to:
[45] Set>>do:
[46] Subsystem class>>signalEvent:to:
[47] Subsystem class>>signalEvent:
[48] Snapshot>>signalSystemEvent:
[49] Snapshot>>postSnapshotBootstrap
[50] Snapshot>>privateSnapshot
[51] optimized [] in [] in Snapshot>>snapshot
[52] BlockClosure>>ensure:
[53] Cursor>>showWhile:
[54] optimized [] in Snapshot>>snapshot
[55] BlockClosure>>ensure:
[56] Snapshot class>>withSnapshot:do:
[57] Snapshot>>snapshot
[58] ObjectMemory class>>snapshotAs:thenQuit:withLoadPolicy:
[59] RuntimePackager.RuntimeManager class>>doOneStepFinalImageSave
[60] RuntimePackager.RuntimeManager class>>createAndSaveFinalImage
[61] optimized [] in RuntimePackager.RuntimeStartupController>>controlTerminate
[62] BlockClosure>>on:do:
[63] optimized [] in Process class>>forBlock:priority:

------------------------------------------------------------
Unhandled Exception:
        class: UnhandledException
        creator: UnhandledException
        errorString: Unhandled exception: Error accessing the OLE registry. ( HRESULT 16r8002801C )
        parameter: a COMError

------------------------------------------------------------
Initial Context Stack Arguments:
[1] COMError class>>hresult:
        Receiver: (id=11873) COMError
        Arg1: (id=14597) -2147319780
[2] OLEAutomationDLL(COMDynamicLinkLibrary)>>signalExceptionForHRESULT:
        Receiver: (id=8338) an OLEAutomationDLL
        Arg1: (id=14597) -2147319780
[3] OLEAutomationDLL(COMDynamicLinkLibrary)>>externalAccessFailedWith:
        Receiver: (id=8338) an OLEAutomationDLL
        Arg1: (id=12204) a SystemError(#'hresult error',-2147319780)
[4] OLEAutomationDLL>>invokeRegisterTypeLibrary:_:_:
        Receiver: (id=8338) an OLEAutomationDLL
        Arg1: (id=3552) a CPointer {005C1E50} (void * )
        Arg2: (id=7418) a CPointer {001C3058} (unsigned char * )
        Arg3: (id=1) nil
[5] ExternalMethod>>unlinkedCall:arguments:
        Receiver: (id=14787) ExternalMethod OLEAutomationDLL>>invokeRegisterTypeLibrary:_:_:
        Arg1: (id=8338) an OLEAutomationDLL
        Arg2: (id=1159) #(a CPointer {005C1E50} (void * ) a CPointer {001C3058} (unsigned char * ) nil)
[6] OLEAutomationDLL>>RegisterTypeLibrary:_:_:
        Receiver: (id=8338) an OLEAutomationDLL
        Arg1: (id=8891) an ITypeLib on: an ITypeLibPointer  {005C1E50}
        Arg2: (id=2632) 'c:\askoh\visualworks\vw7.5\askoh\cadsm\INMotion2010\current\TypeLibrary\INMo...
        Arg3: (id=1) nil
[7] ITypeLib>>registerTypeLibrary:helpDirectory:
        Receiver: (id=8891) an ITypeLib on: an ITypeLibPointer  {005C1E50}
        Arg1: (id=2632) 'c:\askoh\visualworks\vw7.5\askoh\cadsm\INMotion2010\current\TypeLibrary\INMo...
        Arg2: (id=1) nil
[8] COMTypeLibrary>>register
        Receiver: (id=5578) a COMTypeLibrary (INMotion2010: IINMotion2010 Interface)
[10] BlockClosure>>ensure:
        Receiver: (id=15703) BlockClosure [] in COMTypeLibrary>>updateRegistration
        Arg1: (id=9444) BlockClosure [] in COMTypeLibrary>>updateRegistration
[11] COMTypeLibrary>>updateRegistration
        Receiver: (id=5578) a COMTypeLibrary (INMotion2010: IINMotion2010 Interface)
[13] Dictionary>>do:
        Receiver: (id=2265) Dictionary (1033->a COMTypeLibrary (INMotion2010: IINMotion2010 Interface) )
        Arg1: (id=397) BlockClosure [] in CADSM.UI.COM.COMCADSMItem class>>updateTypeLibraries
[14] CADSM.UI.COM.COMCADSM class(CADSM.UI.COM.COMCADSMItem class)>>updateTypeLibraries
        Receiver: (id=2315) CADSM.UI.COM.COMCADSM
[15] CADSM.UI.COM.COMCADSM class(CADSM.UI.COM.COMCADSMItem class)>>startUpApplication
        Receiver: (id=2315) CADSM.UI.COM.COMCADSM
[16] MessageSend>>value
        Receiver: (id=16256) a MessageSend with receiver: CADSM.UI.COM.COMCADSM, selector: #startUpApplica...
[17] MessageSend>>evaluate
        Receiver: (id=16256) a MessageSend with receiver: CADSM.UI.COM.COMCADSM, selector: #startUpApplica...
[18] ImageManager class(Object)>>triggerEvent:
        Receiver: (id=2122) ImageManager
        Arg1: (id=1008) #deploymentStartup
[19] ImageManager class>>triggerSessionEventFor:
        Receiver: (id=2122) ImageManager
        Arg1: (id=2208) #returnFromSnapshot
[20] ImageManager class>>update:with:from:
        Receiver: (id=2122) ImageManager
        Arg1: (id=2208) #returnFromSnapshot
        Arg2: (id=1) nil
        Arg3: (id=14813) ObjectMemory
[21] DependentsCollection>>update:with:from:
        Receiver: (id=9997) #(ExternalInterface CEnvironment IndexedFileMessageCatalog Notifier Locale Us...
        Arg1: (id=2208) #returnFromSnapshot
        Arg2: (id=1) nil
        Arg3: (id=14813) ObjectMemory
[22] ObjectMemory class(Object)>>changed:with:
        Receiver: (id=14813) ObjectMemory
        Arg1: (id=2208) #returnFromSnapshot
        Arg2: (id=1) nil
[23] ObjectMemory class(Object)>>changed:
        Receiver: (id=14813) ObjectMemory
        Arg1: (id=2208) #returnFromSnapshot
[24] InterestNotificationSystem>>setUp
        Receiver: (id=11129) an InterestNotificationSystem
[25] InterestNotificationSystem(Subsystem)>>runActivationActions
        Receiver: (id=11129) an InterestNotificationSystem
[26] InterestNotificationSystem(Subsystem)>>privateActivate
        Receiver: (id=11129) an InterestNotificationSystem
[27] InterestNotificationSystem class(Subsystem class)>>activate
        Receiver: (id=11670) InterestNotificationSystem
[29] Set>>do:
        Receiver: (id=3738) Set (InterestNotificationSystem)
        Arg1: (id=12012) BlockClosure [] in Subsystem>>ensurePrerequisitesAreActive
[30] ImageConfigurationSystem(Subsystem)>>ensurePrerequisitesAreActive
        Receiver: (id=8103) an ImageConfigurationSystem
[31] ImageConfigurationSystem(Subsystem)>>privateActivate
        Receiver: (id=8103) an ImageConfigurationSystem
[32] ImageConfigurationSystem class(Subsystem class)>>activate
        Receiver: (id=5688) ImageConfigurationSystem
[34] Set>>do:
        Receiver: (id=13863) Set (ImageConfigurationSystem)
        Arg1: (id=12012) BlockClosure [] in Subsystem>>ensurePrerequisitesAreActive
[35] RuntimeSystem(Subsystem)>>ensurePrerequisitesAreActive
        Receiver: (id=7604) a RuntimeSystem
[36] RuntimeSystem(Subsystem)>>privateActivate
        Receiver: (id=7604) a RuntimeSystem
[37] RuntimeSystem class(Subsystem class)>>activate
        Receiver: (id=15405) RuntimeSystem
[39] Set>>do:
        Receiver: (id=1345) Set (RuntimeSystem)
        Arg1: (id=12012) BlockClosure [] in Subsystem>>ensurePrerequisitesAreActive
[40] UserApplication(Subsystem)>>ensurePrerequisitesAreActive
        Receiver: (id=15578) an UserApplication
[41] UserApplication(Subsystem)>>privateActivate
        Receiver: (id=15578) an UserApplication
[42] UserApplication class(Subsystem class)>>activate
        Receiver: (id=8219) UserApplication
[43] UserApplication class(Subsystem class)>>reactToEvent:
        Receiver: (id=8219) UserApplication
        Arg1: (id=2208) #returnFromSnapshot
[45] Set>>do:
        Receiver: (id=11470) Set (EarlyInterestNotificationSystem DelaySystem BasicGraphicsSystem Developm...
        Arg1: (id=5211) BlockClosure [] in Subsystem class>>signalEvent:to:
[46] Subsystem class>>signalEvent:to:
        Receiver: (id=14634) Subsystem
        Arg1: (id=2208) #returnFromSnapshot
        Arg2: (id=11470) Set (EarlyInterestNotificationSystem DelaySystem BasicGraphicsSystem Developm...
[47] Subsystem class>>signalEvent:
        Receiver: (id=14634) Subsystem
        Arg1: (id=2208) #returnFromSnapshot
[48] Snapshot>>signalSystemEvent:
        Receiver: (id=15336) a Snapshot
        Arg1: (id=2208) #returnFromSnapshot
[49] Snapshot>>postSnapshotBootstrap
        Receiver: (id=15336) a Snapshot
[50] Snapshot>>privateSnapshot
        Receiver: (id=15336) a Snapshot

------------------------------------------------------------
Quiescent Processes
Process priority: 10 (id=1571)
Context Stack:
[1] optimized [] in [] in Process>>terminate
[2] Semaphore>>wait
[3] ObjectMemory class>>idleLoop
[4] optimized [] in ObjectMemory class>>installIdleLoopProcess
[5] BlockClosure>>on:do:
[6] optimized [] in Process class>>forBlock:priority:

Process priority: 10 (id=12943)
Context Stack:
[1] optimized [] in Process class>>forBlock:priority:

Process priority: 50 (id=6684)
Context Stack:
[1] optimized [] in [] in Process>>terminate
[2] Semaphore>>wait
[3] EventQueue>>next
[4] WindowManager>>processNextEvent
[5] optimized [] in [] in WindowManager>>newProcess
[6] BlockClosure>>on:do:
[7] optimized [] in WindowManager>>newProcess
[8] BlockClosure>>on:do:
[9] optimized [] in Process class>>forBlock:priority:

------------------------------------------------------------
Suspended Processes
Process priority: 91 (id=4291)
Context Stack:
[1] Semaphore>>wait
[2] ObjectMemory class>>lowSpaceLoop
[3] optimized [] in ObjectMemory class>>installLowSpaceProcess
[4] BlockClosure>>on:do:
[5] optimized [] in Process class>>forBlock:priority:

Process priority: 100 (id=14416)
Context Stack:
[1] Semaphore>>wait
[2] optimized [] in Delay class>>initializeTimingProcess
[3] BlockClosure>>on:do:
[4] optimized [] in Process class>>forBlock:priority:

Process priority: 85 (id=8157)
Context Stack:
[1] Semaphore>>wait
[2] optimized [] in CCallback class>>installForeignCallbackProcess
[3] BlockClosure>>on:do:
[4] optimized [] in Process class>>forBlock:priority:

Process priority: 10 (id=1571)
Context Stack:
[1] optimized [] in [] in Process>>terminate
[2] Semaphore>>wait
[3] ObjectMemory class>>idleLoop
[4] optimized [] in ObjectMemory class>>installIdleLoopProcess
[5] BlockClosure>>on:do:
[6] optimized [] in Process class>>forBlock:priority:

Process priority: 50 (id=6684)
Context Stack:
[1] optimized [] in [] in Process>>terminate
[2] Semaphore>>wait
[3] EventQueue>>next
[4] WindowManager>>processNextEvent
[5] optimized [] in [] in WindowManager>>newProcess
[6] BlockClosure>>on:do:
[7] optimized [] in WindowManager>>newProcess
[8] BlockClosure>>on:do:
[9] optimized [] in Process class>>forBlock:priority:

Process priority: 98 (id=1898)
Context Stack:
[1] Semaphore>>wait
[2] WeakArray class>>outerFinalizationLoop
[3] optimized [] in WeakArray class>>installFinalizationMechanism
[4] BlockClosure>>on:do:
[5] optimized [] in Process class>>forBlock:priority:

Process priority: 90 (id=12023)
Context Stack:
[1] Semaphore>>wait
[2] InputState>>run
[3] optimized [] in InputState class>>install
[4] BlockClosure>>on:do:
[5] optimized [] in Process class>>forBlock:priority:

Process priority: 85 (id=5764)
Context Stack:
[1] Semaphore>>wait
[2] optimized [] in CCallback class>>installForeignCallbackProcess
[3] BlockClosure>>on:do:
[4] optimized [] in Process class>>forBlock:priority:

Process priority: 89 (id=15889)
Context Stack:
[1] Semaphore>>wait
[2] optimized [] in [] in [] in CCallback class>>installCallbackProcess
[3] BlockClosure>>on:do:
[4] optimized [] in [] in CCallback class>>installCallbackProcess
[5] BlockClosure>>on:do:
[6] optimized [] in CCallback class>>installCallbackProcess
[7] BlockClosure>>on:do:
[8] optimized [] in Process class>>forBlock:priority:

Process priority: 10 (id=12943)
Context Stack:
[1] optimized [] in Process class>>forBlock:priority:

Process priority: 90 (id=9630)
Context Stack:
[1] Semaphore>>wait
[2] optimized [] in ObjectMemory class>>installScavengeNotification
[3] BlockClosure>>on:do:
[4] optimized [] in Process class>>forBlock:priority:

------------------------------------------------------------
Transcript:
<<<BEGIN TRANSCRIPT>>>

c:\askoh\visualworks\vw7.5\askoh\cadsm\INMotion2010\current\TypeLibrary\INMotion2010.im created at December 30, 2009 2:30:06 pm
<<<END TRANSCRIPT>>>

------------------------------------------------------------
Scheduled Windows:

==2010/2/15==9:40:18==END RUNTIME DIAGNOSTIC DUMP