2016-11-16 80 views
0

我提出了一個類似於我即將發佈的問題。我嘗試使用該解決方案來創建我自己的版本,但我沒有成功。我有我在另一個網站上找到的下面的腳本,它非常適合我在尋找的內容,而是將輸出作爲電子郵件的主體發送,而不是輸出到文件。我該怎麼去做呢?此外,如果任何人有耐心解釋一點這將不勝感激:)。將DHCP腳本輸出到電子郵件正文中

$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" 

由於提前, 丹尼爾

回答

0

你能嘗試:

$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" 

謝謝你,蒂姆。

+0

我得到: 發送-MAILMESSAGE:無法將「System.Object的[] '轉換爲參數'Body'所需的'System.String'類型。指定的方法不受支持。 我會搗鼓一下,看看我能否成功,但我對PS非常垃圾。 – rdd2

+0

$ html = $ csvfile | sort-object主機名| ConvertTo-HTML | out-string –

+0

PS C:\ Windows \ system32> $ html | gm Type:Microsoft.PowerShell.Commands.HtmlWebResponseObject PS C:\ Windows \ system32> $ html | Out-String | gm TypeName:System.String out-string應該將它轉換爲一個字符串給你。 –

1

作爲除了@添的回答是:

,你甚至可以添加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 
+0

我得到: Send-MailMessage:無法將'System.Object []'轉換爲類型'System.String '不需要指定的方法 我可能已經損壞了它xD – rdd2

+0

@ rdd2我修改了代碼 –

+0

我嘗試在Google搜索後添加| out-string。你的修復,但我只是粘貼在HTML格式? – rdd2

相關問題