Функция RegRead возвращает неправильное значение

Question

У меня есть скрипт для чтения значений реестра. Это работало до сих пор, но на этот раз это дает мне неправильный результат

Вот фактическое значение реестра вместе со значением, возвращаемым кодом ниже:

А вот код, который я использую:

FileExt = "HKEY_CLASSES_ROOT\CLSID\{F02C1A0D-BE21-4350-88B0- 
7367FC96EF3C}\ShellFolder\Attributes"
Set Shell = WScript.CreateObject("WScript.Shell")
St = Shell.RegRead(FileExt)
wscript.echo St

Answer 1

Значением в реестре является 32-битное без знака целое число, но VBScript интерпретирует его как 32-битное со знаком целое число (см., Например, здесь ).

Либо отобразить шестнадцатеричное значение:

WScript.Echo Hex(St)

или скорректируйте неверно истолкованное значение:

If St < 0 Then St = St + 2^32
WScript.Echo St