Получить Windows 7 Ключ продукта Powershell - PullRequest
0 голосов
/ 11 октября 2019

Я пытаюсь составить отчет о работоспособности, чтобы мне было легче увидеть обзор всех предметов, находящихся под моим контролем.

Вот что у меня есть:

$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

ImТрудно пытаясь получить ключ продукта Windows. (извините за форматирование в первом, я не смог сохранить более длинные строки в собственной строке)

Я написал второй скрипт, но не совсем уверен, как добавить его в свой существующий, не вставляя код вЭто. Могу ли я позвонить и запустить скрипт из своего отчета о работоспособности, затем выделить только ключ продукта и отправить его в 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
}

Ответы [ 2 ]

1 голос
/ 11 октября 2019

Прежде всего, я бы разделил вещи, чтобы было более понятно, какая функция выполняет какую работу. Преимущество использования 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
0 голосов
/ 11 октября 2019

Определенно, вы можете вызывать другой сценарий из основного сценария, например:

Внутри основного сценария используйте & (оператор вызова)

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

Также, если у вас есть функция ввторой сценарий, тогда я рекомендую просто скомпилировать функцию второго сценария в вашем основном сценарии, используя DOT Sourcing например:

Предполагая, что ваша функция находится во втором сценарии, как это и ваше имя файлаas functionscript.ps1:

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

Теперь в вашем основном сценарии используйте:

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

См. Dot, которая скомпилирует функцию, и вы можете вызвать функцию второго сценария. в основной скрипт легко.

Кроме того, для ключа продукта я бы предпочел использовать wmic, но функция ключа продукта DarkLite аккуратна и чиста, и вы можете включить то же самое, используя точечный источник, и вы можете вызвать функцию.

Надеюсь, это поможет.

...