关于邮件的问题高手清指点迷津！

xiaohongmao

高手们请问有谁研究过邮件系统的。怎么样才能在发邮件的时候让别的邮箱认为我上传得东西是附件呢？
并且 在邮箱里面显示出来附件的形式阿
我现在的系统能发信件
可是发不了附件
请问我该怎么写这个程序呢
下面是发邮件的程序   该在这里怎么修改才能发附件呢？希望高手们给指点
谢谢！
<?
while ( list( $key, $val ) = each( $HTTP_POST_VARS ) ) {
          $message .= "${key}: ${val}\r\n";
}
if ($message == "") $message = "无内容";
if ($to == "") $to = ""; //如果表单中没有收件人，请设置默认收件人e-mail
if ($from == "") $from = "";  //如果表单中没有寄件人，请设置默认寄件人e-mail
if ($subject == "") $subject = "无主题"; //如果表单中没有指定主题，请设置默认主题
if($file=="")       $file="无附件";
if ($end = send22($to,$from,$subject,$UploadFile, $message ) ) echo $end;
else echo "发送成功!";

function send22($to,$from,$subject,$UploadFile, $message )
{

//使用本函数之前，务必请定义好以下变量
#############################################

$smtp = "smtp.163.com";  //您的SMTP 服务器供应商，可以是域名或IP地址
$check = 1;  //SMTP需要要身份验证设值为 1 不需要身份验证值为 0，现在大多数的SMTP服务商都要验证，如不清楚请与你的smtp 服务商联系。


if ($check) {
        $username = "";   //您的email帐号名称
        $password = "";  //您的email密码
}

$s_from = "";  //此email 必需是发信服务器上的email
###############################################

          //连接服务器
          $fp = fsockopen ( $smtp, 25, $errno, $errstr, 60);
        if (!$fp ) return "联接服务器失败".__LINE__;
        set_socket_blocking($fp, true );
       
        $lastmessage=fgets($fp,512);
        if ( substr($lastmessage,0,3) != 220 ) return "错误信息:".$lastmessage.__LINE__;
       
        //HELO
        $yourname = "YOURNAME";
        if($check == "1") $lastact="EHLO ".$yourname."\r\n";
        else $lastact="HELO ".$yourname."\r\n";
       
        fputs($fp, $lastact);
        $lastmessage == fgets($fp,512);
        if (substr($lastmessage,0,3) != 220 ) return "错误信息$lastmessage".__LINE__;
        while (true) {
                $lastmessage = fgets($fp,512);
                if ( (substr($lastmessage,3,1) != "-")  or  (empty($lastmessage)) )
                 break;
        }

                       
        //身份验证
        if ($check=="1") {
                //验证开始
                $lastact="AUTH LOGIN"."\r\n";
                fputs( $fp, $lastact);
                $lastmessage = fgets ($fp,512);
                if (substr($lastmessage,0,3) != 334) return "错误信息$lastmessage".__LINE__;
                //用户姓名
                $lastact=base64_encode($username)."\r\n";
                fputs( $fp, $lastact);
                $lastmessage = fgets ($fp,512);
                if (substr($lastmessage,0,3) != 334) return "错误信息$lastmessage".__LINE__;
                //用户密码
                $lastact=base64_encode($password)."\r\n";
                fputs( $fp, $lastact);
                $lastmessage = fgets ($fp,512);
                if (substr($lastmessage,0,3) != "235") return "错误信息$lastmessage".__LINE__;
        }
       
        //FROM:
        $lastact="MAIL FROM: $s_from" . "\r\n";
        fputs( $fp, $lastact);
        $lastmessage = fgets ($fp,512);
        if (substr($lastmessage,0,3) != 250) return "错误信息$lastmessage".__LINE__;
       
        //TO:
        $lastact="RCPT TO: $to" . "\r\n";
        fputs( $fp, $lastact);
        $lastmessage = fgets ($fp,512);
        if (substr($lastmessage,0,3) != 250) return "错误信息$lastmessage".__LINE__;
         
        //DATA
        $lastact="DATA\r\n";
        fputs($fp, $lastact);
        $lastmessage = fgets ($fp,512);
        if (substr($lastmessage,0,3) != 354) return "错误信息$lastmessage".__LINE__;
       
         
//处理Subject头
        $head="Subject: $subject\r\n";
    $message = $head."\r\n".$message;
         

//处理From头
        $head="From: $from\r\n";
        $message = $head.$message;
  
//处理To头
        $head="To: $to\r\n";
        $message = $head.$message;
         

//加上结束串
        $message .= "\r\n.\r\n";

//发送附件

// 在 4.1.0 以前的 PHP 中，需要用 $HTTP_POST_FILES 代替 $_FILES。
// 在 4.0.3 以前的 PHP 中，需要用 copy() 和 is_uploaded_file() 来代替 move_uploaded_file()。

$UploadPath = AddSlashes(dirname
($PATH_TRANSLATED))."\\upload\\";
$FileName = $UploadPath.$UploadFile_name;
if($UploadFile_size < 1024)
// 上载文件大小
$UploadAction=0;

//$TimeLimit=60; /* 设置超时限制时间
//缺省时间为 30 秒
//设置为0时为不限时 */
//set_time_limit($TimeLimit);

If(($UploadFile != "none")&&
($UploadFile != ""))
{
$UploadPath = AddSlashes(dirname
($PATH_TRANSLATED))."\\upload\\"; // 上载文件存放路径
$FileName = $UploadPath.$UploadFile_name;
// 上载文件名
if($UploadFile_size < 1024)
// 上载文件大小
{
$FileSize = (string)$UploadFile_size . " 字节";
}
elseif($UploadFile_size < (1024 * 1024))
{
$FileSize = number_format((double)
($UploadFile_size / 1024), 1) . " KB";
}
else
{
$FileSize = number_format((double)
($UploadFile_size / (1024 * 1024)), 1) . " MB";
}

if(!file_exists($FileName))
{
if(copy($UploadFile,$FileName))
{
echo "文件 $UploadFile_name ($FileSize)上载成功！";
}
else
{
echo "文件 $UploadFile_name 上载失败！";
}
unlink($UploadFile);
}
else
{
echo "文件 $UploadFile_name 已经存在！";
}
}
else
{
echo "你没有选择任何文件上载！";
}

//set_time_limit(30); // 恢复缺省超时设置






       
        //发送信息
        fputs($fp,$message);
        $lastact="QUIT\r\n";
       
        fputs($fp,$lastace);
        fclose($fp);
        return 0;
}

?>