用于扫描 OU 中所有服务器的过期 SSL 证书的 Powershell 脚本不起作用

Question

我已使用 DOMAIN\Administrator 帐户作为凭据来运行以下 PowerShell 脚本以扫描过期的 SSL 证书：

$ScriptBlock = {
    Get-ChildItem Cert:\*\My -Recurse |
        Select-Object Subject, 
        DnsNameList, 
        NotAfter, 
        NotBefore, 
        Thumbprint, 
        Issuer,
        @{n = "SAN"; e = {Try {($_.Extensions | Where-Object {$_.Oid.Value -eq '2.5.29.17'}).Format(0)} Catch {} }},
        @{n = "IsValid"; e = {$today = Get-Date; If ( $_.NotBefore -lt $today -and $_.NotAfter -gt $today ) { $true } Else {$false} } } }

$computers = Get-ADComputer -Filter {Enabled -eq $True -and OperatingSystem -like "*Server*"} -SearchBase "OU=Servers,OU=Production Site 1,DC=Domain,DC=com" | 
                Where-Object {Test-Connection $_.Name -Count 1 -Quiet} | 
                Select-Object -expandProperty DnsHostName | 
                Export-Csv -Path C:\Logs\SSL.csv -NoTypeInformation

$adCred = Get-Credential Invoke-Command -ComputerName $computers
-ScriptBlock $ScriptBlock -Credential $adCred

但是，然后我得到了错误：

[Microsoft.PowerShell.Commands.Internal.Format.FormatEntryData] 连接到远程服务器 Microsoft.PowerShell.Commands.Internal.Format.FormatEntryData 失败 带有以下错误消息：WinRM 无法处理该请求。 使用 Kerberos 身份验证时发生以下错误： 找不到电脑 Microsoft.PowerShell.Commands.Internal.Format.FormatEntryData。核实 该计算机存在于网络上并且提供的名称是 拼写正确。有关详细信息，请参阅 about_Remote_Troubleshooting 帮助主题。 + CategoryInfo : OpenError: (Microsoft.Power...FormatEntryData:String) [], PSRemotingTransportException + FullyQualifiedErrorId : NetworkPathNotFound,PSSessionStateBroken

如何修复它以便我可以得到 CSV 结果？

现在更新的错误码是：

Invoke-Command：无法验证参数“ComputerName”上的参数。 参数为 null 或空。提供一个不为空的参数或 为空，然后重试该命令。在线：19 字符：30 + 调用命令 -ComputerName $computers -ScriptBlock $ScriptBlock -Cr ... + ~~~~~~~~~~ + CategoryInfo : InvalidData: (:) [Invoke-Command], ParameterBindingValidationException + FullyQualifiedErrorId : ParameterArgumentValidationError,Microsoft.PowerShell.Commands.InvokeCommandCommand

Answer 1

此行开头不正确

$computers = Get-ADComputer -Filter {Enabled -eq $True} -SearchBase "OU=Servers,OU=Production,DC=Domain,DC=com" | 
    Select-Object -expandProperty DnsHostName | 
       Select-Object -expandProperty DnsHostName | #bad line
          Export-Csv -Path C:\Logs\SSL.csv -NoTypeInformation

应该是

$computers = Get-ADComputer -Filter {Enabled -eq $True} -SearchBase "OU=Servers,OU=Production,DC=Domain,DC=com" | 
    Select-Object -expandProperty DnsHostName | 
        Export-Csv -Path C:\Logs\SSL.csv -NoTypeInformation