【问题标题】:Get Windows 7 Product Key Powershell获取 Windows 7 产品密钥 Powershell
【发布时间】:2020-02-08 17:21:56
【问题描述】:

我正在尝试编写一份健康报告,以便更轻松地查看我控制下的所有电脑的概览。

这是我目前所拥有的:

$ErrorActionPreference = "silentlycontinue"
$ComputerList = get-content C:\Users\Administrator\Desktop\DavidsScripts\FloorHealth\input.txt
$collectionVariable = New-Object System.Collections.ArrayList

ForEach ($Computer in $ComputerList) {
# Create temp object
$temp = New-Object System.Object
# Add members to temp object

$temp | Add-Member -MemberType NoteProperty -Name "Keys" (Get-WmiObject -query ‘select * from 
SoftwareLicensingService’).OA3xOriginalProductKey
$temp | Add-Member -MemberType NoteProperty -Name "PC" (Get-WMIObject -ComputerName $Computer 
Win32_ComputerSystem | Select-Object -ExpandProperty name)
$temp | Add-Member -MemberType NoteProperty -Name "IP" -Value $Computer
$temp | Add-Member -MemberType NoteProperty -Name "MACAddress" -Value (gwmi -ComputerName $Computer 
-Class Win32_NetworkAdapterConfiguration | where {$_.IPAddress -like "$Computer"}).MACAddress
$temp | Add-Member -MemberType NoteProperty -Name "Ram" (Get-WMIObject -class Win32_PhysicalMemory - 
ComputerName $Computer | Measure-Object -Property capacity -Sum | % {[Math]::Round(($_.sum / 
1GB),2)})
$temp | Add-Member -MemberType NoteProperty -Name "Firewall" -Value ((netsh -r $Computer advfirewall 
show currentprofile state)[3] -replace 'State' -replace '\s')
# Add the temp object to ArrayList
$collectionVariable.Add($temp)
}

Write-Output $collectionVariable
$collectionVariable | Export-Excel -now 
C:\Users\Administrator\Desktop\DavidsScripts\FloorHealth\floorhealth.xlsx

我很难获得 Windows 产品密钥。 (很抱歉前 1 的格式无法将较长的行保留在自己的行上)

我编写了第二个脚本,但不太确定如何将它添加到我现有的而不只是将代码粘贴到其中。我可以调用它并从我的健康报告中运行脚本,然后只拆分产品密钥,然后将其发送到 excel 中吗?

($targets = get-content C:\Users\Administrator\Desktop\DavidsScripts\FloorHealth\input.txt)
$hklm = 2147483650
$regPath = "Software\Microsoft\Windows NT\CurrentVersion"
$regValue = "DigitalProductId"
Foreach ($target in $targets) {
    $productKey = $null
    $win32os = $null
    $wmi = [WMIClass]"\\$target\root\default:stdRegProv"
    $data = $wmi.GetBinaryValue($hklm,$regPath,$regValue)
    $binArray = ($data.uValue)[52..66]
    $charsArray = 
"B","C","D","F","G","H","J","K","M","P","Q","R","T","V","W","X","Y","2","3","4","6","7","8","9"
    ## decrypt base24 encoded binary data
    For ($i = 24; $i -ge 0; $i--) {
        $k = 0
        For ($j = 14; $j -ge 0; $j--) {
            $k = $k * 256 -bxor $binArray[$j]
            $binArray[$j] = [math]::truncate($k / 24)
            $k = $k % 24
        }
        $productKey = $charsArray[$k] + $productKey
        If (($i % 5 -eq 0) -and ($i -ne 0)) {
            $productKey = "-" + $productKey
        }
    }
    $obj = New-Object Object
    $obj | Add-Member Noteproperty ProductKey -value $productkey
    $obj
}

【问题讨论】:

    标签: excel windows powershell product-key


    【解决方案1】:

    首先我会把事情分开,这样更清楚什么功能在做什么工作。使用Functions 的优点是您不需要为每个功能使用单独的脚本文件。

    类似这样的:

    Function Get-WindowsProductKey {
        Param (
            [String[]]$ComputerName = $env:COMPUTERNAME
        )
    
        Function Convert-ProductKey {
            Param (
                [Parameter(Mandatory)]
                [String[]]$DigitialProductID,
                [String[]]$charsArray = @(
                    "B", "C", "D", "F", "G", "H", "J", "K", "M",
                    "P", "Q", "R", "T", "V", "W", "X", "Y", "2",
                    "3", "4", "6", "7", "8", "9"
                )
            )
            ## decrypt base24 encoded binary data
            For ($i = 24; $i -ge 0; $i--) {
                $k = 0
                For ($j = 14; $j -ge 0; $j--) {
                    $k = $k * 256 -bxor $DigitialProductID[$j]
                    $DigitialProductID[$j] = [math]::truncate($k / 24)
                    $k = $k % 24
                }
                $productKey = $charsArray[$k] + $productKey
                If (($i % 5 -eq 0) -and ($i -ne 0)) {
                    $productKey = "-" + $productKey
                }
            }
    
            $productKey
        }
    
        Function Get-DigitalProductID {
            Param (
                [Parameter(Mandatory)]
                [String]$ComputerName,
                $hklm = 2147483650,
                $regPath = "Software\Microsoft\Windows NT\CurrentVersion",
                $regValue = "DigitalProductId"
            )
    
            $wmi = [WMIClass]"\\$C\root\default:stdRegProv"
            $data = $wmi.GetBinaryValue($hklm, $regPath, $regValue)
            ($data.uValue)[52..66]
        }
    
        Foreach ($C in $ComputerName) {
            $DigitalProductID = Get-DigitalProductID -ComputerName $C
            $ProductKey = Convert-ProductKey -DigitialProductID $DigitalProductID
    
            [PSCustomObject]@{
                ComputerName = $C
                ProductKey   = $ProductKey
            }
        }
    }
    
    Function Get-ComputerDetail {
        Param (
            [String[]]$ComputerName = $env:COMPUTERNAME
        )
    
        ForEach ($C in $ComputerName) {
            $Mac = (Get-WMIObject -ComputerName $C -Class 'Win32_NetworkAdapterConfiguration' | Where-Object { $_.IPAddress -like "$C" }).MACAddress
    
            $Ram = (Get-WMIObject  -ComputerName $C -class 'Win32_PhysicalMemory' |
                Measure-Object -Property capacity -Sum |
                ForEach-Object { [Math]::Round(($_.sum / 1GB), 2) })
    
            $Firewall = ((netsh -r $C advfirewall show currentprofile state)[3] -replace 'State' -replace '\s')
    
            $Keys = (Get-WmiObject -ComputerName $C -Query 'select * from SoftwareLicensingService').OA3xOriginalProductKey
    
            [PSCustomObject]@{
                ComputerName      = (Get-WMIObject -ComputerName $C -class  'Win32_ComputerSystem').Name
                IP                = $C
                Keys              = $Keys
                MACAddress        = $Mac
                RAM               = $Ram
                Firewall          = $Firewall
                WindowsProductKey = Get-WindowsProductKey -ComputerName $C
            }
        }
    }
    
    $ComputerNames =  Get-Content -Path 'C:\Users\Administrator\Desktop\DavidsScripts\FloorHealth\input.txt)'
    $ComputerDetails = Get-ComputerDetail -ComputerName $ComputerNames
    $ComputerDetails | Export-Excel -Now
    

    【讨论】:

      【解决方案2】:

      当然,您可以从主脚本中调用其他脚本,例如:

      在你的主脚本中使用&(call operator)

      & "path\of\the\script\myScript.ps1"
      

      另外,如果您在第二个脚本中有一个函数,那么我的建议是使用DOT Sourcing 来编译您的主脚本中的第二个脚本的函数,例如:

      假设你的函数在第二个脚本中是 this 并且你的文件名是 functionscript.ps1:

      function Do-Something {
        param($Thing)
        Write-Output "My output: $Thing"
        }
      

      现在,在您的主脚本中使用:

      . \path\of\the\script\functionscript.ps1
      Do-Something -Thing  "Test-thing"
      

      看到点,它将编译函数,您可以轻松地调用主脚本中的第二个脚本的函数。

      另外,对于产品密钥,我更喜欢使用 wmic,但 DarkLite 的产品密钥功能简洁明了,您可以使用点源合并相同的功能,您可以调用该函数。

      希望对你有帮助。

      【讨论】:

        猜你喜欢
        • 1970-01-01
        • 2021-05-14
        • 1970-01-01
        • 1970-01-01
        • 2015-09-22
        • 1970-01-01
        • 1970-01-01
        • 2012-12-01
        • 2023-04-03
        相关资源
        最近更新 更多