Windows产品密钥 - 来自不同技术的不同答案

时间:2016-09-19 12:44:36

标签: powershell vbscript cmd wsh

this question(询问如何检索Windows产品密钥)之后,似乎存在从各种方法获得的冲突信息。这个问题询问为什么它们都应该返回相同的值时会有区别?

这两种方法......

POWERSHELL

(Get-WmiObject -query ‘select * from SoftwareLicensingService’).OA3xOriginalProductKey

CMD

wmic path softwarelicensingservice get OA3xOriginalProductKey

向此VBS脚本返回不同的结果...

Set WshShell = CreateObject("WScript.Shell")
MsgBox ConvertToKey(WshShell.RegRead("HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\DigitalProductId"))

Function ConvertToKey(Key)
    Const KeyOffset = 52
    i = 28
    Chars = "BCDFGHJKMPQRTVWXY2346789"
    Do
        Cur = 0
        x = 14
        Do
            Cur = Cur * 256
            Cur = Key(x + KeyOffset) + Cur
            Key(x + KeyOffset) = (Cur \ 24) And 255
            Cur = Cur Mod 24
            x = x - 1
        Loop While x >= 0
        i = i - 1
        KeyOutput = Mid(Chars, Cur + 1, 1) & KeyOutput
        If (((29 - i) Mod 6) = 0) And (i <> -1) Then
            i = i - 1
            KeyOutput = "-" & KeyOutput
        End If
    Loop While i >= 0
    ConvertToKey = KeyOutput
End Function

POWERSHELL和CMD相互认同,但VBS脚本显示不同的价值。

为什么会出现这种情况?

更新 - 差不多!!

以下PowerShell脚本获取与PowerShell和Cmd命令相同的产品密钥。似乎值的编码方式发生了变化(我没有时间确定那些变化是什么)

function Get-ProductKey {
     <#
    .SYNOPSIS
        Retrieves the product key and OS information from a local or remote system/s.

    .Description
        Retrieves the product key and OS information from a local or remote system/s. Queries of 64bit OS from a 32bit OS will result in
        inaccurate data being returned for the Product Key. You must query a 64bit OS from a system running a 64bit OS.

    .Parameter ComputerName
        Name of the local or remote system/s.

    .Notes
Author:             Boe Prox
        Version: 1.1
            -Update of function from http://powershell.com/cs/blogs/tips/archive/2012/04/30/getting-windows-product-key.aspx
            -Added capability to query more than one system
            -Supports remote system query
            -Supports querying 64bit OSes
            -Shows OS description and Version in output object
            -Error Handling

    .EXAMPLE
     Get-ProductKey -Computername Server1

    OSDescription                                           Computername OSVersion ProductKey
    -------------                                           ------------ --------- ----------
    Microsoft(R) Windows(R) Server 2003, Enterprise Edition Server1       5.2.3790  bcdfg-hjklm-pqrtt-vwxyy-12345

        Description
        -----------
        Retrieves the product key information from 'Server1'
    #>
    [cmdletbinding()]
    Param (
        [parameter(ValueFromPipeLine=$True,ValueFromPipeLineByPropertyName=$True)]
        [Alias("CN","__Server","IPAddress","Server")]
        [string[]]$Computername = $Env:Computername
    )
    Begin {
        $map="BCDFGHJKMPQRTVWXY2346789"
    }
    Process {
        ForEach ($Computer in $Computername) {
            Write-Verbose ("{0}: Checking network availability" -f $Computer)
            If (Test-Connection -ComputerName $Computer -Count 1 -Quiet) {
                Try {
                    Write-Verbose ("{0}: Retrieving WMI OS information" -f $Computer)
                    $OS = Get-WmiObject -ComputerName $Computer Win32_OperatingSystem -ErrorAction Stop
                } Catch {
                    $OS = New-Object PSObject -Property @{
                        Caption = $_.Exception.Message
                        Version = $_.Exception.Message
                    }
                }
                Try {
            Write-Verbose ("{0}: Attempting remote registry access" -f $Computer)
            $remoteReg = [Microsoft.Win32.RegistryKey]::OpenRemoteBaseKey([Microsoft.Win32.RegistryHive]::LocalMachine,$Computer)
            $value = $remoteReg.OpenSubKey("SOFTWARE\Microsoft\Windows NT\CurrentVersion").GetValue('DigitalProductId')[0x34..0x42]
            $isWin8OrNewer = [math]::Floor(($value[14] / 6)) -band 1
            $value[14] = ($value[14] -band 0xF7) -bor (($isWin8OrNewer -band 2) * 4)
            $ProductKey = ""
            Write-Verbose ("{0}: Translating data into product key" -f $Computer)
            for ($i = 24; $i -ge 0; $i--) {
              $r = 0
              for ($j = 14; $j -ge 0; $j--) {
                $r = ($r * 256) -bxor $value[$j]
                $value[$j] = [math]::Floor([double]($r/24))
                $r = $r % 24
              }
              $ProductKey = $map[$r] + $ProductKey
            }
        } Catch {
            $ProductKey = $_.Exception.Message
        }

        if ($isWin8OrNewer){
            $ProductKey = $ProductKey.Remove(0, 1)
            $ProductKey = $ProductKey.Insert($r, 'N')
        }

        #insert dashes to make key more readable
        for($i = 5; $i -lt 29; $i = $i + 6){
            $ProductKey = $ProductKey.Insert($i, '-')
        }
                $object = New-Object PSObject -Property @{
                    Computername = $Computer
                    ProductKey = $ProductKey
                    OSDescription = $os.Caption
                    OSVersion = $os.Version
                }
                $object.pstypenames.insert(0,'ProductKey.Info')
                $object
            } Else {
                $object = New-Object PSObject -Property @{
                    Computername = $Computer
                    ProductKey = 'Unreachable'
                    OSDescription = 'Unreachable'
                    OSVersion = 'Unreachable'
                }
                $object.pstypenames.insert(0,'ProductKey.Info')
                $object
            }
        }
    }
}

以上脚本取自here,但考虑到TJ在2016年2月5日底部评论中提出的更改。那个家伙是一个传奇!嗯,原作者也是,显然!

我会在创建它时发布VB版本,假设这个问题没有关闭(只需要3个投票,所以快速行动的人)/讽刺。

2 个答案:

答案 0 :(得分:1)

在我在HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\DefaultProductKey\DigitalProductId上测试的Windows 7和Windows 10系统上不存在。但是vbscript仍然会输出一个值而不是抛出错误。

您可能正在Windows 7上寻找此值:lib(注意:它在Windows 10上不存在)

答案 1 :(得分:0)

根据this article,WMI查询将返回制造商存储在BIOS或UEFI固件中的OEM密钥。从注册表中读取的VBScript方法将返回在用户设置期间(或之后)输入的零售产品密钥。