Question

我创建了以下脚本来重置特定主机文件中所有计算机上的本地管理员帐户的密码。这个脚本运行正常并提供了一个有用的输出，但它很慢，因为它一次只能运行一台机器。

# function to convert a secure string to a standard string
function ConvertTo-String {
    param(
        [System.Security.SecureString] $secureString
    )

    $marshal = [System.Runtime.InteropServices.Marshal]

    try {
        $intPtr = $marshal::SecureStringToBSTR($secureString)
        $string = $marshal::PtrToStringAuto($intPtr)
    }
    finally {
        if($intPtr) {
            $marshal::ZeroFreeBSTR($intPtr)
        }
    }
    $string
}

$clients = Get-Content -Path C:\scripts\utilities\hostnames_online.txt
$adminUser = "Administrator"

# prompt for password and confirm
do {
    $ss1 = Read-Host "Enter new password" -AsSecureString
    $ss2 = Read-Host "Enter again to confirm" -AsSecureString

# compare strings - proceed if same - prompt again if different
    $ok = (ConvertTo-String $ss1) -ceq (ConvertTo-String $ss2)
    Write-Host "Passwords match"

    if(-not $ok) {
        Write-Host "Passwords do not match"
    }
}
until($ok)

# set password variable to string value
$adminPassword = ConvertTo-String $ss1

# setup job to reset password on each client
foreach($client in $clients) {
    $status = "OFFLINE"
    $isOnline = "OFFLINE"

    if((Test-Connection -ComputerName $client -Quiet -Count 1 -Delay 1) -eq $true) {
        $isOnline = "ONLINE"
    }

    # change the password
    try {
        $localAdminAccount = [adsi]"WinNT://$client/$adminuser,user"
        $localAdminAccount.SetPassword($adminPassword)
        $localAdminAccount.SetInfo()
        Write-Verbose "Password change completed successfully"
    }
    catch {
        $status = "FAILED"
        Write-Verbose "Failed to change password"
    }

    # create psobject with system info
    $obj = New-Object -TypeName PSObject -Property @{
        ComputerName = $client
        Online = $isOnline
        ChangeStatus = $status
    }

    $obj | Select computerName, Online, changeStatus | Out-File -FilePath C:\test.txt -Append

    if($status -eq "FAILED" -or $isOnline -eq "OFFLINE") {
        $stream.writeline("$client -t $status")
    }
}

$adminPassword = " "

Write-Verbose "Complete"

Invoke-Item C:\test.txt

为了让脚本运行得更快，我将其设置为使用后台作业，以便它可以同时在多个客户端上运行。但是，现在我的文本文件中没有输出。新脚本如下。第43和79-89行是变化。我需要对此脚本进行哪些更改，以提供它在第一个版本中执行的输出？我已经尝试了许多其他方式来获得输出，而不是我现在在第89行。

# function to convert a secure string to a standard string
function ConvertTo-String {
    param(
        [System.Security.SecureString] $secureString
    )

    $marshal = [System.Runtime.InteropServices.Marshal]

    try {
        $intPtr = $marshal::SecureStringToBSTR($secureString)
        $string = $marshal::PtrToStringAuto($intPtr)
    }
    finally {
        if($intPtr) {
            $marshal::ZeroFreeBSTR($intPtr)
        }
    }
    $string
}

$clients = Get-Content -Path C:\scripts\utilities\hostnames_online.txt
$adminUser = "Administrator"

# prompt for password and confirm
do {
    $ss1 = Read-Host "Enter new password" -AsSecureString
    $ss2 = Read-Host "Enter again to confirm" -AsSecureString

# compare strings - proceed if same - prompt again if different
    $ok = (ConvertTo-String $ss1) -ceq (ConvertTo-String $ss2)
    Write-Host "Passwords match"

    if(-not $ok) {
        Write-Host "Passwords do not match"
    }
}
until($ok)

# set password variable to string value
$adminPassword = ConvertTo-String $ss1

# setup job to reset password on each client
#-----------------------------------------------------------------------------------------
$scriptBlock = {
#-----------------------------------------------------------------------------------------
    foreach($client in $clients) {
        $status = "OFFLINE"
        $isOnline = "OFFLINE"

        if((Test-Connection -ComputerName $client -Quiet -Count 1 -Delay 1) -eq $true) {
            $isOnline = "ONLINE"
        }

        # change the password
        try {
            $localAdminAccount = [adsi]"WinNT://$client/$adminuser,user"
            $localAdminAccount.SetPassword($adminPassword)
            $localAdminAccount.SetInfo()
            Write-Verbose "Password change completed successfully"
        }
        catch {
            $status = "FAILED"
            Write-Verbose "Failed to change password"
        }

        # create psobject with system info
        $obj = New-Object -TypeName PSObject -Property @{
            ComputerName = $client
            Online = $isOnline
            ChangeStatus = $status
        }

        $obj | Select computerName, Online, changeStatus | Out-File -FilePath C:\test.txt -Append

        if($status -eq "FAILED" -or $isOnline -eq "OFFLINE") {
            $stream.writeline("$client -t $status")
        }
    }
}
#-----------------------------------------------------------------------------------------
Get-Job | Remove-Job -Force

Start-Job $scriptBlock -ArgumentList $_ -Name AdminPWReset

Get-Job

While(Get-Job -State "Running") {
    Start-Sleep -m 10
}

Receive-Job -name AdminPWReset | Out-File C:\test2.txt
#-----------------------------------------------------------------------------------------
$adminPassword = " "

Write-Verbose "Complete"

Invoke-Item C:\test.txt
Invoke-Item C:\test2.txt

Answer 1

您没有收到输出，因为您将整个循环移动到了scriptblock中：

$scriptBlock = {
    foreach ($client in $clients) {
        ...
    }
}

但是初始化了客户列表（$clients）在之外的脚本块，因此里面的是一个不同的变量（空）变量，因为它在不同的范围内。因为你的工作是在一个空列表上迭代，因此不会产生任何输出。

为了能够使用scriptblock中的客户端列表，您必须使用$clients范围修饰符：

using:

或将客户端列表作为参数传递给scriptblock：

$scriptBlock = {
    foreach ($client in $using:clients) {
        ...
    }
}

正如我从你的代码中看到的那样，你正试图做后者：

$scriptBlock = {
    foreach ($client in $args[0]) {
        ...
    }
}

Start-Job -ScriptBlock $scriptBlock -ArgumentList $clients

然而，这不起作用有两个原因：

在您运行Start-Job $scriptBlock -ArgumentList $_ -Name AdminPWReset的上下文中，没有当前对象，因此Start-Job为空，并且没有任何内容传递到脚本块。
scriptblock既没有$_块，也没有使用自动变量Param()，所以即使你将一个参数传递给scriptblock也永远不会被使用。

话虽如此，你不想首先传递$args，因为即使它起作用，它也不会加速任何事情，因为整个客户端列表仍将按顺序处理。您实际想要做的是并行处理列表。为此，您必须将测试放入scriptblock中，然后在循环中为每个客户端启动一个作业：

$clients

请注意，如果您有大量目标主机，则可能需要使用job queue，这样就不会有数百个并行运行的作业。

从后台作业获取输出

1 个答案: