I use a web assist email program for Dreamweaver. It works in ASP for any attachments, but in PHP sending any attachment most email servers turn the attachment into .dat format. (happens for .doc .pdf .txt attachments)
I understand this is a Microsoft problem with exchange servers.
Is there any work around in the coding that may bypass this problem?
The web assist coding has 4 seperate pages
can only send one due to the length
mail for Linux page
<?php
function WAUE_AddAttachment($mailObj,$attPath) {
if ($attPath && $attPath != "") {
$fileArr = explode("|WA|",$attPath);
if (WAUE_isAttachment($fileArr[sizeof($fileArr)-1])) {
switch (sizeof($fileArr)) {
case 4:
$mailObj->attachments[] = array($fileArr[0], $fileArr[1], $fileArr[2], $fileArr[3]);
break;
case 3:
$mailObj->attachments[] = array("application/octet-stream", $fileArr[0], $fileArr[1], $fileArr[2]);
break;
case 2:
$mailObj->attachments[] = array("application/octet-stream", "base64", $fileArr[0], $fileArr[1]);
break;
default:
$mailObj->attachments[] = array("application/octet-stream", "base64", "", $fileArr[0]);
}
}
}
return $mailObj;
}
function WAUE_AddBCC($mailObj,$bccEmail) {
if ($bccEmail != "") {
$bccArray = WA_getEmailArray($bccEmail);
for ($bcc=0; $bcc < sizeof($bccArray); $bcc++) {
if (WAUE_isEmailAddress($bccArray[$bcc][1])) {
$mailObj->bccrecip[] = array($bccArray[$bcc][1], $bccArray[$bcc][0]);
}
}
}
return $mailObj;
}
function WAUE_AddCC($mailObj,$ccEmail) {
if ($ccEmail != "") {
$ccArray = WA_getEmailArray($ccEmail);
for ($cc=0; $cc<sizeof($ccArray); $cc++) {
if (WAUE_isEmailAddress($ccArray[$cc][1])) {
$mailObj->ccrecip[] = array($ccArray[$cc][1], $ccArray[$cc][0]);
}
}
}
return $mailObj;
}
function WAUE_AddRecipient($mailObj,$recEmail) {
if ($recEmail != "") {
$recArray = WA_getEmailArray($recEmail);
for ($rec=0; $rec<sizeof($recArray); $rec++) {
if (WAUE_isEmailAddress($recArray[$rec][1])) {
$mailObj->recipients[] = array($recArray[$rec][1], $recArray[$rec][0]);
}
}
}
return $mailObj;
}
function WAUE_BodyFormat($mailObj,$bodyFormat) {
$mailObj->BodyFormat = $bodyFormat;
return $mailObj;
}
function WAUE_Definition($serverName,$serverPort,$retPath,$organization,$xMailer,$charSet) {
$mailObj = new WA_MAILOBJ($serverName,$serverPort,$retPath,$organization,$xMailer,$charSet);
return $mailObj;
}
class WA_MAILOBJ {
var $SMTP;
var $Port;
var $ReturnPath;
var $Organization;
var $XMailer;
var $CharSet;
var $Importance;
var $BodyFormat;
var $attachments;
var $recipients;
var $ccrecip;
var $bccrecip;
function WA_MAILOBJ($serverName,$serverPort,$retPath,$organization,$xMailer,$charSet) {
$this->SMTP = $serverName;
$this->Port = $serverPort;
$this->ReturnPath = $retPath;
$this->Organization = $organization;
$this->XMailer = $xMailer;
$this->CharSet = $charSet;
if ($serverName != "") ini_set("SMTP", $serverName);
if ($serverPort != "") ini_set("smtp_port", $serverPort);
$this->Importance = "";
$this->BodyFormat = "";
$this->attachments = array();
$this->recipients = array();
$this->ccrecip = array();
$this->bccrecip = array();
}
}
function WAUE_SendMail($mailObj,$mailAttachments,$mailBCC,$mailCC,$mailTo,$mailImportance,$mailFrom,$mailSubject,$mailBody) {
if (strpos($mailTo,"@") < 0 || sizeof($mailObj->recipients) == 0) {
return;
}
$fromArray = WA_getEmailArray($mailFrom);
$mailTo2 = "";
$mailContent = "";
$mailHeader = "";
$mailFrom = $fromArray[0][1];
$lineEnd = "\n";
if ($fromArray[0][0] != "") {
$mailFrom = $fromArray[0][0]." <".$fromArray[0][1].">";
}
$mailHeader .= "MIME-Version: 1.0".$lineEnd;
if (sizeof($mailObj->attachments) > 0 && is_array($mailObj->attachments[0])) {
$mailHeader .= "Content-Type: multipart/mixed";
$mailHeader .= "; boundary = WAMULTIBREAKWA".$lineEnd;
}
else if ($mailObj->BodyFormat == 2) {
$mailHeader .= "Content-Type: multipart/alternative";
$mailHeader .= "; boundary = WAMULTIBREAKWA".$lineEnd;
$headers = "";
}
else {
if ($mailObj->BodyFormat == 1) $mailHeader .= "Content-Type: text/plain";
elseif ($mailObj->BodyFormat == 0) $mailHeader .= "Content-Type: text/html";
if ($mailObj->CharSet != "") $mailHeader .= preg_replace("/[\r\n]/", "", "; charset=\"".$mailObj->CharSet."\"").$lineEnd;
else $mailHeader .= $lineEnd;
}
foreach ($mailObj->recipients AS $emailArr) {
if ($mailTo != "") $mailTo .= ", ";
if ($mailTo2 != "") $mailTo2 .= ", ";
if ($emailArr[0] != "") $mailTo .= $emailArr[0];
if ($emailArr[1] != "") $mailTo2 .= $emailArr[1]." <".$emailArr[0].">";
else $mailTo2 .= $emailArr[0];
}
if (strpos($mailTo2, "@")) {
$mailTo = $mailTo2;
}
$mailHeader .= preg_replace("/[\r\n]/", "", "From: ".$mailFrom).$lineEnd;
foreach ($mailObj->ccrecip AS $emailArr) {
if ($mailCC != "") $mailCC .= ", ";
if ($emailArr[1] != "") $mailCC .= $emailArr[1]." <".$emailArr[0].">";
else $mailCC .= $emailArr[0];
}
if (strpos($mailCC, "@")) {
$mailHeader .= preg_replace("/[\r\n]/", "", "Cc: ".$mailCC).$lineEnd;
}
foreach ($mailObj->bccrecip AS $emailArr) {
if ($mailBCC != "") $mailBCC .= ", ";
if ($emailArr[1] != "") $mailBCC .= $emailArr[1]." <".$emailArr[0].">";
else $mailBCC .= $emailArr[0];
}
if (strpos($mailBCC, "@")) {
$mailHeader .= preg_replace("/[\r\n]/", "", "Bcc: ".$mailBCC).$lineEnd;
}
$mailHeader .= preg_replace("/[\r\n]/", "", "Reply-To: ".$fromArray[0][1]).$lineEnd;
$mailHeader .= preg_replace("/[\r\n]/", "", "X-Sender: ".$mailFrom).$lineEnd;
$mailHeader .= preg_replace("/[\r\n]/", "", "X-Priority: ".$mailObj->Importance).$lineEnd;
$mailHeader .= "Date: ". date('r (T)').$lineEnd;
if ($mailObj->ReturnPath != "") {
$retArray = WA_getEmailArray($mailObj->ReturnPath);
$mailObj->ReturnPath = "<".$retArray[0][1].">";
if ($retArray[0][0] != "") {
$mailObj->ReturnPath = $retArray[0][0]." <".$retArray[0][1].">";
}
$mailHeader .= preg_replace("/[\r\n]/", "", "Return-Path: ".$mailObj->ReturnPath).$lineEnd;
$theMSGID = $retArray[0][1];
$theMSGID = explode("@", $theMSGID);
$theMSGID = "<".md5($theMSGID[0]).">@".$theMSGID[1];
$mailHeader .= preg_replace("/[\r\n]/", "", "Message-ID: ".$theMSGID).$lineEnd;
}
if ($mailObj->Organization != "") {
$mailHeader .= preg_replace("/[\r\n]/", "", "Organization: ".$mailObj->Organization).$lineEnd;
}
if ($mailObj->XMailer != "") {
$mailHeader .= preg_replace("/[\r\n]/", "", "X-Mailer: ".$mailObj->XMailer).$lineEnd;
}
if ($mailObj->BodyFormat == 2 || sizeof($mailObj->attachments) > 0) {
$mailContent = "This is a multi-part message in MIME format.\n--WAMULTIBREAKWA\n";
switch ($mailObj->BodyFormat) {
case 2:
if (sizeof($mailObj->attachments) > 0) {
$mailContent .= "Content-Type: multipart/alternative; boundary = WAMULTIBREAKWA\r\n";
}
$mailContent .= "Content-Type: text/plain";
if ($mailObj->CharSet != "") $mailContent .= preg_replace("/[\r\n]/", "", "; charset=\"".$mailObj->CharSet."\"").$lineEnd;
else $mailContent .= $lineEnd;
$theReplace = $lineEnd."--WAMULTIBREAKWA".$lineEnd;
$theReplace .= "Content-Type: text/html";
if ($mailObj->CharSet != "") $theReplace .= "; charset=\"".$mailObj->CharSet."\"".$lineEnd;
else $theReplace .= $lineEnd;
$mailBody = str_replace("<multipartbreak>", $theReplace, $mailBody);
$mailContent .= $mailBody;
break;
case 1:
$mailContent .= "Content-Type: text/plain";
if ($mailObj->CharSet != "") $mailContent .= preg_replace("/[\r\n]/", "", "; charset=\"".$mailObj->CharSet."\"").$lineEnd;
else $mailContent .= $lineEnd;
$mailContent .= "Content-Transfer-Encoding: 8bit;".$lineEnd;
$mailContent .= $mailBody;
break;
case 0:
$mailContent .= "Content-Type: text/html";
if ($mailObj->CharSet != "") $mailContent .= preg_replace("/[\r\n]/", "", "; charset=\"".$mailObj->CharSet."\"");
$mailContent .= $lineEnd;
$mailContent .= "Content-Transfer-Encoding: 8bit".$lineEnd;
$mailContent .= $mailBody;
break;
}
}
else {
$mailContent .= $mailBody;
}
if(sizeof($mailObj->attachments) > 0) {
foreach ($mailObj->attachments as $fileArr) {
if (is_readable($fileArr[3])) {
if (strtolower($fileArr[1]) == "base64") {
$data = chunk_split(base64_encode(implode("", file($fileArr[3]))));
}
else {
$data = implode("", file($fileArr[3]));
}
$mailAttachments .= $lineEnd."--WAMULTIBREAKWA";
$mailAttachments .= $lineEnd."Content-Type: ".$fileArr[0];
$mailAttachments .= " name=\"".basename($fileArr[3])."\"".$lineEnd;
$mailAttachments .= "Content-Transfer-Encoding: ".$fileArr[1].$lineEnd;
$mailAttachments .= "Content-Disposition: inline";
$mailAttachments .= " filename=\"".basename($fileArr[3])."\"".$lineEnd.$lineEnd;
$mailAttachments .= $data;
}
}
}
