ASP/PHP在线发送内容到邮箱的实例和完整代码
编程设计 2009年09月27日 7634°C 评论：0
PHP发送订单或留言可以使用phpmailer的类来实现，可以使用变量来扩展。很多朋友遇到使用phpmailer的问题，第一有些虚拟主机是不支持的，第二正确的配置非常重要，第三邮箱不支持。错误分析：提示connect_host通常表示连接SMTP服务器配置错误或PHP服务器不支持此操作，提示recipients_failedaaa@test.com，是发送邮箱配置错误。
其实很简单这里就不多说了，下面是经过调试成功的代码和phpmailer类下载，供大家参考。
下载地址(天空下的雨修改版16K)：phpmailer.rar
<?php
/*******************************
* 天空下的雨 调试
*******************************/
require_once("class.phpmailer.php"); 'phpmailer类调用
$mail = new PHPMailer(); //建立对象
$mail->IsSMTP(); // 发送类型 SMTP
$mail->Host = "smtp.126.com"; // SMTP服务器
$mail->SMTPAuth = true; // 是否验证
$mail->Username = "aaa@126.com"; // 用户名（普通邮件认证不需要加 @域名）
$mail->Password = "123456"; // 邮箱密码
$mail->From = "aaaa@126.com"; // 发件人邮箱，与SMTP服务器一致
$mail->FromName = "发件人名字" ; // 发件人
$mail->CharSet = "GB2312"; // 页面编码，经测试使用uft-8收邮件可能会产生乱码
$mail->AddAddress("aaaa@68080.com","天空下的雨"); // 收件人邮箱和姓名
//$mail->AddReplyTo("aaa@68080.com","天空下的雨"); // 回复的地址和名字，可以不设置
//$mail->AddAttachment("/var/tmp/file.tar.gz"); // 附件部分
//$mail->AddAttachment("/tmp/image.jpg", "new.jpg");
$mail->IsHTML(true); // 是否支持HTML
$mail->Subject = "邮件主题"; // 邮件主题
// 邮件内容
$mail->Body ='
<html><head>
<meta http-equiv="Content-Language" content="zh-cn">
<meta http-equiv="Content-Type" content="text/html; charset=GB2312">
</head>
<body>内容</body>
</html>
';
$mail->AltBody ="text/html";
if(!$mail->Send())
{
echo "邮件发送有误 <p>";
echo "邮件错误信息: " . $mail->ErrorInfo;
exit;
}
else {
echo "邮件发送成功!<br />";
}
?>
ASP使用Jmail组件来实现邮件发送功能已经很常用了，代码如下：
<%
'==================================================
' 参数设置开始
myemail="chenzhou@73500.cn" '用来接收邮件的邮箱,可以与SMTP服务器发信邮箱不同
smtpserver ="smtp.126.com" '发送邮件所使用的SMTP服务器，例如smtp.163.com
smtpuser ="aaaa" '与SMTP服务器对应的邮箱用户名
smtppwd ="123456" '与SMTP服务器对应的邮箱密码
smtpemail ="aaa@126.com" 'SMTP服务器发信邮箱，与发送服务器对应
' 参数设置结束
'==================================================
sendname = trim(Request("ename")) '发件人名字
email = myemail '收件人邮箱
zhuti = trim(Request("zhuti")) '邮件标题
mailbody=mailbody &"邮件的内容" ‘内容部分1，可使用变量
mailbody=mailbody &"邮件的内容" ‘内容部分2
if sendname <> "" and email <> "" then
set jmail= server.CreateObject ("jmail.message") '调用Jmail组件
jmail.Silent = true
jmail.Charset = "gb2312"
JMail.ContentType = "text/html"
'=================================
'调用变量内容
jmail.From = smtpemail
jmail.FromName = sendname
jmail.ReplyTo = email
jmail.Subject = zhuti
jmail.AddRecipient myemail
jmail.Body = mailbody
jmail.MailServerUserName = smtpuser
jmail.MailServerPassWord = smtppwd
isgo = jmail.Send(smtpserver) '发送邮件
'=================================
if isgo then
msg="发送成功"
else
msg = "发送失败，请检查参数"
end if
jmail.Close
set jmail = nothing
end if
end if
%>
其实很简单这里就不多说了，下面是经过调试成功的代码和phpmailer类下载，供大家参考。
下载地址(天空下的雨修改版16K)：phpmailer.rar
<?php
/*******************************
* 天空下的雨 调试
*******************************/
require_once("class.phpmailer.php"); 'phpmailer类调用
$mail = new PHPMailer(); //建立对象
$mail->IsSMTP(); // 发送类型 SMTP
$mail->Host = "smtp.126.com"; // SMTP服务器
$mail->SMTPAuth = true; // 是否验证
$mail->Username = "aaa@126.com"; // 用户名（普通邮件认证不需要加 @域名）
$mail->Password = "123456"; // 邮箱密码
$mail->From = "aaaa@126.com"; // 发件人邮箱，与SMTP服务器一致
$mail->FromName = "发件人名字" ; // 发件人
$mail->CharSet = "GB2312"; // 页面编码，经测试使用uft-8收邮件可能会产生乱码
$mail->AddAddress("aaaa@68080.com","天空下的雨"); // 收件人邮箱和姓名
//$mail->AddReplyTo("aaa@68080.com","天空下的雨"); // 回复的地址和名字，可以不设置
//$mail->AddAttachment("/var/tmp/file.tar.gz"); // 附件部分
//$mail->AddAttachment("/tmp/image.jpg", "new.jpg");
$mail->IsHTML(true); // 是否支持HTML
$mail->Subject = "邮件主题"; // 邮件主题
// 邮件内容
$mail->Body ='
<html><head>
<meta http-equiv="Content-Language" content="zh-cn">
<meta http-equiv="Content-Type" content="text/html; charset=GB2312">
</head>
<body>内容</body>
</html>
';
$mail->AltBody ="text/html";
if(!$mail->Send())
{
echo "邮件发送有误 <p>";
echo "邮件错误信息: " . $mail->ErrorInfo;
exit;
}
else {
echo "邮件发送成功!<br />";
}
?>
ASP使用Jmail组件来实现邮件发送功能已经很常用了，代码如下：
<%
'==================================================
' 参数设置开始
myemail="chenzhou@73500.cn" '用来接收邮件的邮箱,可以与SMTP服务器发信邮箱不同
smtpserver ="smtp.126.com" '发送邮件所使用的SMTP服务器，例如smtp.163.com
smtpuser ="aaaa" '与SMTP服务器对应的邮箱用户名
smtppwd ="123456" '与SMTP服务器对应的邮箱密码
smtpemail ="aaa@126.com" 'SMTP服务器发信邮箱，与发送服务器对应
' 参数设置结束
'==================================================
sendname = trim(Request("ename")) '发件人名字
email = myemail '收件人邮箱
zhuti = trim(Request("zhuti")) '邮件标题
mailbody=mailbody &"邮件的内容" ‘内容部分1，可使用变量
mailbody=mailbody &"邮件的内容" ‘内容部分2
if sendname <> "" and email <> "" then
set jmail= server.CreateObject ("jmail.message") '调用Jmail组件
jmail.Silent = true
jmail.Charset = "gb2312"
JMail.ContentType = "text/html"
'=================================
'调用变量内容
jmail.From = smtpemail
jmail.FromName = sendname
jmail.ReplyTo = email
jmail.Subject = zhuti
jmail.AddRecipient myemail
jmail.Body = mailbody
jmail.MailServerUserName = smtpuser
jmail.MailServerPassWord = smtppwd
isgo = jmail.Send(smtpserver) '发送邮件
'=================================
if isgo then
msg="发送成功"
else
msg = "发送失败，请检查参数"
end if
jmail.Close
set jmail = nothing
end if
end if
%>