上次实现了用asp将留言订单等发送到邮箱，今天客户提出英文站用的是linux空间，所以不支持Asp.只能用php实现了一个版本。注意编码要用utf-8

前台页面(同上一篇asp将留言订单发送到邮箱)：

<form method=post action=’save.php’ name=”fw” onsubmit=’return checkform();’>

节省篇幅,表单元素，省略几个,实际可以放多个

<input name="comments" type="text" id="comments" size="30" class="reqfield" />

<input type="submit" name="Submit" value="submit">

</form>

save.php(php下面发邮件可以用mail()函数，但该函数要主机安装smtp服务器才能使用，所以不太常用，下面的这个组件，可以直接忽略空间上是否有smtp服务)

先从 http://phpmailer.worxware.com/ 下载phpmailer，复制class.phpmailer.php，class.smtp.php放在和save.php一块。

<?php

$comments = $_REQUEST['comments'];

$subject =  "Your have a message from hkcat！";
  $body = " comments:" . $comments ." date:" . date("Y-m-d H:i:s");

$to = mail@hkcat.org;  //收件人邮箱

sendmail$to,$subject,$body);

function sendmail($to,$subject = "",$body = ""){

    //$to 表示收件人地址 $subject 表示邮件标题 $body表示邮件正文
    error_reporting(E_STRICT);
    date_default_timezone_set("Asia/Shanghai"); //设定时区

    require_once(‘class.phpmailer.php’);
    include("class.smtp.php");
    $mail             = new PHPMailer(); //new一个PHPMailer对象出来
    $body             = eregi_replace("[\]",”,$body); //对邮件内容进行必要的过滤
    $mail->CharSet ="UTF-8";//设定邮件编码，默认ISO-8859-1，如果发中文此项必须设置，否则乱码
    $mail->IsSMTP();

    $mail->SMTPDebug  = 1;                                              

    $mail->SMTPAuth   = true;                  // 启用 SMTP 验证功能   
    $mail->Host       = "smtpcom.263xmail.com";      // SMTP 服务器
    $mail->Port       = 25;                   // SMTP服务器的端口号
    $mail->Username   = xxx@hkcat.org;  // SMTP服务器用户名
    $mail->Password   = "hkcatpwd";            // SMTP服务器密码
    $mail->SetFrom(‘seo@hkcat.org’, ‘诸暨seo’); //发件人地址
    $mail->AddReplyTo(seo@hkcat.org,"诸暨seo"); //回复地址，设置成同上
    $mail->Subject    = $subject;
    $mail->MsgHTML($body);
    $address = $to;
    $mail->AddAddress($address, "seo");

    if(!$mail->Send()) {
      echo "Mailer Error: " . $mail->ErrorInfo;
    } else {
      echo "<script language=’javascript’>alert(‘Send Success!’);window.location.href=’index.htm’</script>";
    }

}

?>

有些企业站没有专人经常登陆后台维护，所以对于网站上面提交的留言，订单等，都是采用直接发送到指定邮箱的。下面的代码需要jmail组件运行。

前台页面：

<form method=post action=’save.asp’ name=request_quote onsubmit=’return checkform();’>

节省篇幅,表单元素，省略几个,实际可以放多个

<input name=”comments” type=”text” id=”comments” size=”30″ class=”reqfield” />

<input type=”submit” name=”Submit” value=”submit”>

</form>

save.asp: 接收内容，发送到邮箱

comments=trim(request(“comments”))
E_Recip = “samwaysales@gmail.com”  ‘收件人

E_Server = “smtpcom.263xmail.com”   ‘邮件服务器地址
E_ServerUser = “xxx@hkcat.org”   ‘邮件服务器帐号
E_ServerPass = “hkcatpwd”  ‘邮件服务器密码
E_SendManMail = “fff@hkcat.org”  ‘发件人地址
E_SendManName = “诸暨seo”   ‘发件人姓名

E_Topic = “从企业站发来的邮件” ‘邮件标题
E_Body =   comments:” & comments  ‘邮件正文

Sub Jmail(Email,Topic,Mailbody)
On Error Resume Next
Dim JMail
Set JMail = Server.CreateObject(“JMail.Message”)
JMail.silent=true
JMail.Logging = True
JMail.Charset = “utf-8″
JMail.ContentType = “text/html”
JMail.Priority = 1
JMail.From = E_SendManMail
JMail.FromName = E_SendManName
JMail.MailServerUserName = E_ServerUser
JMail.MailServerPassword = E_ServerPass
JMail.Subject = Topic
JMail.Body = Mailbody
JMail.AddRecipient(Email)
JMail.Send (E_Server)
Set JMail = Nothing
SendMail = “OK”
If Err Then SendMail = “False”
JMail.Close()
Set JMail = Nothing
End Sub

Jmail  E_Recip,E_Topic,E_Body

Response.Write “<script>alert(‘Thank You. Your Quote Request has been mailed successfully’);location.href=’product.htm’;</script>”