スクリプトにこのサブルーチンがあり、strIPV6Status の値が実際には 16 進数で 0xffffffff の場合、値として -1 が返されます。
なぜこれが起こっているのですか?
'**************************************************************************
'IP Address Configuration: Check if ipv6 is disabled
'**************************************************************************
Sub CheckIPV6()
WScript.Echo("Check if IPv6 is disabled")
WScript.Echo("------------------------------------")
Const strIPV6Key = "SYSTEM\CurrentControlSet\services\TCPIP6\Parameters\"
strValueName = "DisabledComponents"
Set objRegistry = GetObject("winmgmts:\\" & strComputer & "\root\default:StdRegProv")
objRegistry.GetDWORDValue HKEY_LOCAL_MACHINE, strIPV6Key,strValueName,strIPV6Status
WScript.Echo(strIPV6Key & strValueName & " = " & strIPV6Status & vbCrLf)
End Sub