Как создать переменный путь реестра в VB скрипт

Question

Мне нужна помощь, чтобы создать путь к реестру, который будет использовать переменную для входа в систему пользователя SID.Путь подобен - HKEY_USERS\'%UserSID%'\Software\Microsoft\Office\16.0\Outlook

SID пользователя должен быть выбран для любого пользователя, который в данный момент вошел в систему.

Я не знаю, как создать эту переменную?

Я хочу использовать эту переменную в моем массиве скриптов.

KEY_PATHS = Array("HKEY_USERS\S-1-5-21-4054882774-118064744-2143271696-500\Software\Microsoft\Office\16.0\Outlook", _
"HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\ProfileList\S-1-5-21-2660683129-3636505375-3381148637-65620")

DEBUG_PRINTING = False 

MASTER_EXECUTION 

Sub MASTER_EXECUTION()
    ' WMI Class Management
    MAINTAIN_WMI_CLASS()

    ' Registry Key Storage
    For Each KEY_PATH In KEY_PATHS
        STORE_KEYS(KEY_PATH)
    Next

    If Err.Number <> 0 Then
        EVENT_WRITER "ERROR","Storing Registry Keys Failed " & Err.Number & " | " & Err.Description
    Else
        EVENT_WRITER "INFO", "Storing Registry Keys Completed Successfully"                    
    End If
End Sub

Function CONVERT_HIVE(HIVE)
    ' Check and return a system name based on a friendly name
    If UCase(HIVE) = "HKEY_LOCAL_MACHINE" Then
        CONVERT_HIVE = &H80000002
    ElseIf UCase(HIVE) = "HKEY_USERS" Then
        CONVERT_HIVE = &H80000002
    ElseIf UCase(HIVE) = "HKEY_CURRENT_CONFIG" Then
        CONVERT_HIVE = &H80000005
    Else
        EVENT_WRITER "ERROR","Converting Hive " & HIVE & " failed - " & Err.Number & " | " & Err.Description
        WScript.Quit
    End If
End Function

Answer 1

Я получил ответ в одной из веток Microsoft:

Ниже код VB будет извлекать зарегистрированного пользователя sid, и мы можем использовать эту переменную для наших целей:

VBS код в изображении И путь переменной, который я искал, будет выглядеть как

KEY_PATHS = Array ("HKEY_USERS \" & Sid & "\ Software \ Microsoft \ Office \ 16.0 \ Outlook \ PST")