COM-класс для каждого пользователя

Question

Необходимо внедрить регистрацию COM-класса для каждого пользователя, добавив записи реестра в куст реестра HKCU (XP SP3, Windows 7, Windows 8). Каков минимальный набор требуемых записей реестра для создания экземпляра объекта, вызвав функцию VBScript CreateObject?

UPD: реализация VBScript

Sub RegisterComObject(Path, ProgId, ClsId) 
    Dim Shell 
    Set Shell = WScript.CreateObject("WScript.Shell") 

    Shell.RegWrite "HKCU\Software\Classes\" & ProgId & "\", "" 
    Shell.RegWrite "HKCU\Software\Classes\" & ProgId & "\CLSID\", ClsId 

    Shell.RegWrite "HKCU\Software\Classes\CLSID\" & ClsId & "\", "" 
    Shell.RegWrite "HKCU\Software\Classes\CLSID\" & ClsId & "\InprocServer32\", Path 
    Shell.RegWrite "HKCU\Software\Classes\CLSID\" & ClsId & "\ProgID\", ProgID 
End Sub 

Sub UnregisterComObject(ProgId, ClsId) 
    Dim Shell 
    Set Shell = WScript.CreateObject("WScript.Shell") 

    Shell.RegDelete "HKCU\Software\Classes\CLSID\" & ClsId & "\InprocServer32\" 
    Shell.RegDelete "HKCU\Software\Classes\CLSID\" & ClsId & "\ProgId\" 
    Shell.RegDelete "HKCU\Software\Classes\CLSID\" & ClsId & "\" 

    Shell.RegDelete "HKCU\Software\Classes\" & ProgId & "\CLSID\" 
    Shell.RegDelete "HKCU\Software\Classes\" & ProgId & "\" 
End Sub 

Answer 1

Понадобится:

1. HKEY_CURRENT_USER\Software\Classes\CLSID\{your-CLSID-goes-here} ветвь с подразделом InprocServer32 (или, LocalServer32) с its regular syntax
2. HKEY_CURRENT_USER\Software\Classes\{your-ProgID-goes-here} для отображения вашего ProgID в CLSID для того, чтобы CreateObject преуспеть.