FFAStrans forum

Code: Select all

# ==============================================================================
# CONSOLIDATED CONFIGURATION
# ==============================================================================
$EmailAddr = "emcodem_test@gmail.com"
$AppPassword = "xxxx xxxx xxxx xxxx"  # if using google, the app password is created on https://myaccount.google.com/apppasswords
$SmtpServer = "smtp.gmail.com"
$SmtpPort = 587                        # Try 587 (STARTTLS) or 465 (SSL/TLS)
# ==============================================================================

$objEmail = New-Object -ComObject "CDO.Message"
$objEmail.From     = $EmailAddr
$objEmail.To       = $EmailAddr
$objEmail.Subject  = "Consolidated CDO Debug Test"
$objEmail.Textbody = "Testing CDO.Message with consolidated variables."

$Fields = $objEmail.Configuration.Fields
$Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
$Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = $SmtpServer
$Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = $SmtpPort
$Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") = 1
$Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendusername") = $EmailAddr
$Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendpassword") = $AppPassword
$Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpusessl") = $true
$Fields.Update()

try {
    Write-Host "Triggering Send to $EmailAddr via $SmtpServer..." -ForegroundColor Cyan
    $objEmail.Send()
    Write-Host "SUCCESS: Mail sent successfully!" -ForegroundColor Green
} catch {
    Write-Host "`n--- PRIMARY ERROR ---" -ForegroundColor Red
    Write-Host "HEX Code: 0x$($_.Exception.HResult.ToString("X"))"
    Write-Host "Description: $($_.Exception.Message)"

    if ($_.Exception.InnerException) {
        Write-Host "`n--- INNER EXCEPTION ---" -ForegroundColor Yellow
        Write-Host "Detail: $($_.Exception.InnerException.Message)"
    }

    Write-Host "`n--- DIAGNOSTIC HINTS ---" -ForegroundColor Cyan
    switch ($_.Exception.HResult) {
        -2147220973 { 
            Write-Host "Hint: [0x80040213] Transport failed." 
            Write-Host "Try changing `$SmtpPort to 465 in the config at the top." -ForegroundColor Yellow
        }
        -2147220975 { Write-Host "Hint: [0x80040211] Credentials rejected. Check the App Password." }
        Default { Write-Host "Hint: Check Antivirus/Firewall settings." }
    }
}