将DHCP脚本输出到电子邮件正文中

Question

我提出了一个类似于我即将发布的问题。我尝试使用该解决方案来创建我自己的版本，但我没有成功。我有我在另一个网站上找到的下面的脚本，它非常适合我在寻找的内容，而是将输出作为电子邮件的主体发送，而不是输出到文件。我该怎么去做呢？此外，如果任何人有耐心解释一点这将不胜感激:)。

$a = (netsh dhcp server 172.20.102.1 scope 172.20.104.0 show clients 1) 

$lines = @() 

foreach ($i in $a){ 
    if ($i -match "\d{1,3}\.\d{1,3}\.\d{1,3}\.\d{1,3}"){ 
     If ($i -match "[0-9a-f]{2}[:-][0-9a-f]{2}[:-][0-9a-f]{2}[:-][0-9a-f]{2}[:-][0-9a-f]{2}[:-][0-9a-f]{2}"){  
      $lines += $i.Trim() 
     } 
    } 
} 
$csvfile = @() 

foreach ($l in $lines){ 
    $Row = "" | select Hostname,IP 
    $l = $l -replace '[0-9a-f]{2}[:-][0-9a-f]{2}[:-][0-9a-f]{2}[:-][0-9a-f]{2}[:-][0-9a-f]{2}[:-][0-9a-f]{2}', '' 
    $l = $l -replace ' - ',',' 
    $l = $l -replace '\s{4,}','' 
    $l = $l -replace '--','-' 
    $l = $l -replace '-D-','-' 
    $l = $l -replace '[-]{1}\d{1,2}[/]\d{1,2}[/]\d{4}','' 
    $l = $l -replace '\d{1,2}[:]\d{2}[:]\d{2}','' 
    $l = $l -replace 'AM','' 
    $l = $l -replace 'PM','' 
    $l = $l -replace '\s{1}','' 
    $l = $l + "`n" 
    $l = $l -replace '[,][-]',',' 
    $Row.IP = ($l.Split(","))[0] 
    #Subnet mask not used, but maybe later 
    #$Row.SubNetMask = ($l.Split(","))[1] 
    $Row.Hostname = ($l.Split(","))[2] 
    $csvfile += $Row 
} 


$csvfile | sort-object Hostname | Export-Csv "Out_List.csv" 


$a = "<style>" 
$a = $a + "body {margin: 10px; width: 600px; font-family:arial; font-size: 12px;}" 
$a = $a + "TABLE{border-width: 1px;border-style: solid;border-color: black;border-collapse: collapse;}" 
$a = $a + "TH{border-width: 1px;padding: 2px;border-style: solid;border-color: black;background-color: rgb(179,179,179);align='left';}" 
$a = $a + "TD{border-width: 1px;padding: 2px;border-style: solid;border-color: black;background-color: white;}" 
$a = $a + "</style>" 


$html = $csvfile | sort-object Hostname | ConvertTo-HTML | out-string 
Send-MailMessage -SmtpServer "exchange" -Body $html -BodyAsHtml -From "[email protected]" -To "@.com.au" -Subject "DHCP Report" 

由于提前， 丹尼尔

Answer 1

你能尝试：

$html = $csvfile | sort-object Hostname | ConvertTo-HTML | out-string 
Send-MailMessage -SmtpServer "mail server" -Body $html -BodyAsHtml -From "[email protected]" -To "[email protected]" -Subject "DHCP Report" 

谢谢你，蒂姆。

Answer 2

作为除了@添的回答是：

，你甚至可以添加CSS转换后的HTML这样的：

$style = @" 
<style> 
table { 
    width: 50%; 
    margin: auto; 
    border-collapse: collapse; 

} 

th, td { 
    text-align: left; 
    padding: 8px; 
    border-bottom: 1px solid #fff; 
} 

tr:nth-child(even){background-color: #f2f2f2} 

th { 
    background-color: #4CAF50; 
    color: white; 
} 
</style> 
"@ 
$html =import-Csv "Out_List.csv" |ConvertTo-Html -head $style |out-string