發送帶有換行符的正確電子郵件

Question

我正在嘗試使用Send-MailMessage.在電子郵件的正文中發送日志文件的內容Send-MailMessage. 我嘗試使用`r`n無效。

我在Outlook中的電子郵件如下所示。

我想要的郵件輸出：

這是我的腳本：

$SourceDir = "C:\Temp\"
#$GCI_Fiter = '*.txt'
$Include=@("*.log","*.txt")

$FileList = Get-ChildItem -LiteralPath $SourceDir -Include "$Include" -File

$myvar = @()
foreach ($FL_Item in $FileList)   {
#$FLI_Content = Get-Content -LiteralPath $FL_Item.FullName
#$ExceptionLines = $FLI_Content | Select-String 'Exception' | ForEach-Object {$_.ToString().Trim()}
#if ($FLI_Content Get-Content -Path $file.FullName | Select-String "Exception" )
#){

$results = Get-Content -Path $FL_Item.FullName | Select-String "Exception"

if ($results) {
    Write-Host "$($FL_Item.FullName) Exception found." -BackgroundColor Cyan
    #$myvar += $results
    $LINE = "$($FL_Item.Name)" + ":"
    $EMAILBODY = $LINE + "`r`n"
    $myvar += $EMAILBODY + $results + "`r`n"
    Write-Output "Exception found"
}
else {
    Write-Host "$($FL_Item.FullName) No exception found." -BackgroundColor Green
    Write-Output "No exception found"
}

#}
#$ExceptionLines = $FLI_Content | Select-String -SimpleMatch 'Exception olustu'
#$ExceptionLines = $FLI_Content | Select-String -SimpleMatch 'Exception' | ForEach-Object {$_.ToString().Trim()}
#$FLI_Content

}

return $myvar


        $MailBody = "Hi,`r

        Exception logs. `r

        "+$myvar+"

        `r  
        `r
        Regards,
        "

Send-MailMessage -to $emailto -Subject $subject -SmtpServer $smtp -From $fromaddress -Body $MailBody -Encoding ([System.Text.Encoding]::UTF8) -Credential $creds

Answer 1

另一種方法是使用$Outlook = New-Object -ComObject Outlook.Application 。 我遇到過類似的情況。 例如，如果您使用的是Outlook，請使用以下代碼，但是您可以在$ Mail.Body中設置電子郵件的格式，這就是他們將如何接收電子郵件的方式。

$Outlook = New-Object -ComObject Outlook.Application
$Mail = $Outlook.CreateItem(0)
$Mail.To = "usermail@something.com"
$Mail.Subject = "Powershell"
$Mail.Body ="email text here"
$Date = (Get-Date).tostring("yyyyMMdd")
$File = "C:\Users\user\Desktop\log$Date.csv"
$Mail.Attachments.Add($File)
$Mail.Send()