我的脚本中有这个子例程,当值实际上是十六进制的 0xfffffff 时,它返回 -1 作为 strIPV6Status 的值。
任何想法为什么会发生这种情况?
'**************************************************************************
'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