#INCLUDE REGISTRY.H >SET CLASSLIB TO REGISTRY ADDITIVE >oReg = CREATEOBJECT('REGISTRY') >RELEASE CLASSLIB REGISTRY >* lcServer is server Object - (ie. mydll.myserver) >IF oReg.OpenKey(lcserver + '\CLSID') = ERROR_SUCCESS > lcCLSID = "" > lnerr = oReg.GetKeyValue("", @lcCLSID) > IF lnerr = ERROR_SUCCESS > oReg.CloseKey() > lckey = "Software\Classes\CLSID\" + lcCLSID + "\InProcServer32" > IF oReg.OpenKey(lckey, HKEY_LOCAL_MACHINE) = ERROR_SUCCESS > lcdll = "" > lnerr = oReg.GetKeyValue("", @lcdll) > IF lnerr = ERROR_SUCCESS > ? lcdll > ELSE > ? lnerr > ENDIF > oReg.CloseKey() > ELSE > ? "Can't open CLSID key" > ENDIF > ELSE > ? lnerr > ENDIF > oReg.CloseKey() >ELSE > ? "Can't open key" >ENDIFWill this work for you?