Tuesday, May 12, 2009

Load Email - PHP

function LoadEmail($fn)
{
global $sEmailSubject;
global $sEmailFrom;
global $sEmailTo;
global $sEmailCc;
global $sEmailBcc;
global $sEmailFormat;
global $sEmailContent;

$sWrk = LoadTxt($fn); // Load text file content
if ($sWrk <> "") {
// Locate Header & Mail Content
if (strtolower(substr(PHP_OS, 0, 3)) === 'win') {
$i = strpos($sWrk, "\r\n\r\n");
} else {
$i = strpos($sWrk, "\n\n");
if ($i === false) $i = strpos($sWrk, "\r\n\r\n");
}
if ($i > 0) {
$sHeader = substr($sWrk, 0, $i);
$sEmailContent = trim(substr($sWrk, $i, strlen($sWrk)));
if (strtolower(substr(PHP_OS, 0, 3)) === 'win') {
$arrHeader = split("\r\n",$sHeader);
} else {
$arrHeader = split("\n",$sHeader);
}
for ($j = 0; $j < count($arrHeader); $j++)
{
$i = strpos($arrHeader[$j], ":");
if ($i > 0) {
$sName = trim(substr($arrHeader[$j], 0, $i));
$sValue = trim(substr($arrHeader[$j], $i+1, strlen($arrHeader[$j])));
switch (strtolower($sName))
{
case "subject": $sEmailSubject = $sValue;
break;
case "from": $sEmailFrom = $sValue;
break;
case "to": $sEmailTo = $sValue;
break;
case "cc": $sEmailCc = $sValue;
break;
case "bcc": $sEmailBcc = $sValue;
break;
case "format": $sEmailFormat = $sValue;
break;
}
}
}
}
}

}
Disclaimer: Any code or advice given is for instructional purposes only. We will not be responsible for any loss or damage caused by using this script.

No comments: