讲解用PHP实现Jmai组件及发送邮件三例 - 『PHP/Perl编程专区』 - 台州站长论坛 |台州论坛|站长论坛|TVB电视剧|PHP论坛|MYSQL论坛|Ajax论坛|DIV CSS论坛|JS论

来源:百度文库 编辑:神马文学网 时间:2024/05/02 13:37:31

讲解用PHP实现Jmai组件及发送邮件三例

代码一:

<%
On error resume next
Dim JMail, contentId
Set JMail = Server.CreateObject("JMail.Message")
JMail.Charset = "gb2312" ‘ 邮件字符集,默认为"US-ASCII"
‘ JMail.ISOEncodeHeaders = False ‘ 是否进行ISO编码,默认为True
‘ 发送者信息(可用变量方式赋值)
JMail.From = "webjxcom@163.com" ‘ 发送者地址
JMail.FromName = "网站管理员" ‘ 发送者姓名
JMail.Subject = "邮件主题" ‘ 邮件主题
‘ 身份验证
JMail.MailServerUserName = "webjx" ‘ 身份验证的用户名
JMail.MailServerPassword = "webjx" ‘ 身份验证的密码
‘ 设置优先级,范围从1到5,越大的优先级越高,3为普通
JMail.Priority = 1
JMail.AddHeader "Originating-IP", Request.ServerVariables("REMOTE_ADDR")
‘ 加入一个收件人【变量email:收件人地址】可以同一语句重复加入多个
JMail.AddRecipient("5ss@163.com")
‘ 加入附件【变量filename:附件文件的绝对地址,确保用户IUSR_机器名有访问的权限】
‘ 【参数设置是(True)否(False)为Inline方式】
‘contentId = JMail.AddAttachment (Server.MapPath("jmail.asp"), True)
‘ 邮件主体(HTML(注意信件内链接附件的方式))
‘JMail.AppendBodyFromFile(Server.MapPath("/Love/Inc/Mailend.txt"))
JMail.HTMLBody = "邮件正文
邮件正文
邮件正文< /body>"
‘ 邮件主体(文本部分)
JMail.Body = "我们的邮件采用了HTML格式,但是您的邮件查看软件可能不支持。。。邮件正文,邮件正文,邮件正文"
‘ 发送【调用格式:objJMail.Send([username:password@]SMTPServerAddress[:Port])】
JMail.Send("smtp.163.com")
‘ 关闭并清除对象
JMail.Close()
Set JMail = Nothing
if err.number<>0 then
response.write "发送发送失败!"
else
response.write "邮件发送成功!"
end if
%>

代码二:

//*****************************************************************
// *.php 使用文件,看清楚了,怎么使用在这里
//
//*****************************************************************
//require (FILE_DIR."smtp.php");
$smtpserver = "smtp.163.com";//SMTP服务器
$smtpserverport =25;//SMTP服务器端口
$smtpusermail = "webjx@163.com";//SMTP服务器的用户邮箱
$smtpemailto = "webjx@163.com";//发送给谁
$smtpuser = "webjx";//SMTP服务器的用户帐号
$smtppass = "webjx";//SMTP服务器的用户密码
$mailsubject = "Test Subject";//邮件主题
$mailbody = "

This is a test mail

";//邮件内容
$mailtype = "HTML";//邮件格式(HTML/TXT),TXT为文本邮件
$smtp = new smtp($smtpserver,$smtpserverport,true,$smtpuser,$smtppass);//这里面的一个true是表示使用身份验证,否则不使用身份验证.
$smtp->debug = TRUE;//是否显示发送的调试信息
$smtp->sendmail($smtpemailto, $smtpusermail, $mailsubject, $mailbody, $mailtype);
?> 台州网址导航|上网导航=台州南开技术小组=台州网址导航|上网导航
台州南开技术小组(TZNKTG)专门用PHP+MYSQL技术进行Web的开发(Web开发包括网站、平台、系统、软件等),凭借其Web开发产品的非 凡速度、领先的技术优势、富于创新的开发团队,为众多行业门户、专业型站点提供最有优质的服务和技术保障。
UID
帖子
1894 
精华
12 
积分
3918 
威望
3918  
台州币
4616 元 
阅读权限
200 
在线时间
206 小时 
注册时间
2007-8-30 
最后登录
2008-6-4 

查看详细资料

引用 使用道具 报告 回复 TOP

浙江省温岭市【长屿硐天】风景旅游区

管理员

  • 个人空间
  • 发短消息
  • 加为好友
  • 当前离线
2# 发表于 2008-5-23 11:42  只看该作者 代码三:

class smtp
{
/* Public Variables */
var $smtp_port;
var $time_out;
var $host_name;
var $log_file;
var $relay_host;
var $debug;
var $auth;
var $user;
var $pass;
/* Private Variables */
var $sock;
/* Constractor */
function smtp($relay_host = "", $smtp_port = 25,$auth = false,$user,$pass)
{
$this->debug = FALSE;
$this->smtp_port = $smtp_port;
$this->relay_host = $relay_host;
$this->time_out = 30; //is used in fsockopen()
#
$this->auth = $auth;//auth
$this->user = $user;
$this->pass = $pass;
#
$this->host_name = "localhost"; //is used in HELO command
$this->log_file = "";
$this->sock = FALSE;
}
/* Main Function */
function sendmail($to, $from, $subject = "", $body = "", $mailtype, $cc = "", $bcc = "", $additional_headers = "")
{
$mail_from = $this->get_address($this->strip_comment($from));
$body = ereg_replace("(^|( ))(.)", "1.3", $body);
$header = "MIME-Version:1.0 ";
if($mailtype=="HTML"){
$header .= "Content-Type:text/html ";
}
$header .= "To: ".$to." ";
if ($cc != "") {
$header .= "Cc: ".$cc." ";
}
$header .= "From: $from<".$from."> ";
$header .= "Subject: ".$subject." ";
$header .= $additional_headers;
$header .= "Date: ".date("r")." ";
$header .= "X-Mailer:By Redhat (PHP/".phpversion().") ";
list($msec, $sec) = explode(" ", microtime());
$header .= "Message-ID: <".date("YmdHis", $sec).".".($msec*1000000).".".$mail_from."> ";
$TO = explode(",", $this->strip_comment($to));
if ($cc != "") {
$TO = array_merge($TO, explode(",", $this->strip_comment($cc)));
}
if ($bcc != "") {
$TO = array_merge($TO, explode(",", $this->strip_comment($bcc)));
}
$sent = TRUE;
foreach ($TO as $rcpt_to) {
$rcpt_to = $this->get_address($rcpt_to);
if (!$this->smtp_sockopen($rcpt_to)) {
$this->log_write("Error: Cannot send email to ".$rcpt_to." ");
$sent = FALSE;
continue;
}
if ($this->smtp_send($this->host_name, $mail_from, $rcpt_to, $header, $body)) {
$this->log_write("E-mail has been sent to <".$rcpt_to."> ");
} else {
$this->log_write("Error: Cannot send email to <".$rcpt_to."> ");
$sent = FALSE;
}
fclose($this->sock);
$this->log_write("Disconnected from remote host ");
}
return $sent;
}
/* Private Functions */
function smtp_send($helo, $from, $to, $header, $body = "")
{
if (!$this->smtp_putcmd("HELO", $helo)) {
return $this->smtp_error("sending HELO command");
}
#auth
if($this->auth){
if (!$this->smtp_putcmd("AUTH LOGIN", base64_encode($this->user))) {
return $this->smtp_error("sending HELO command");
}
if (!$this->smtp_putcmd("", base64_encode($this->pass))) {
return $this->smtp_error("sending HELO command");
}
}
#
if (!$this->smtp_putcmd("MAIL", "FROM:<".$from.">")) {
return $this->smtp_error("sending MAIL FROM command");
}
if (!$this->smtp_putcmd("RCPT", "TO:<".$to.">")) {
return $this->smtp_error("sending RCPT TO command");
}
if (!$this->smtp_putcmd("DATA")) {
return $this->smtp_error("sending DATA command");
}
if (!$this->smtp_message($header, $body)) {
return $this->smtp_error("sending message");
}
if (!$this->smtp_eom()) {
return $this->smtp_error("sending . [EOM]");
}
if (!$this->smtp_putcmd("QUIT")) {
return $this->smtp_error("sending QUIT command");
}
return TRUE;
}
function smtp_sockopen($address)
{
if ($this->relay_host == "") {
return $this->smtp_sockopen_mx($address);
} else {
return $this->smtp_sockopen_relay();
}
}
function smtp_sockopen_relay()
{
$this->log_write("Trying to ".$this->relay_host.":".$this->smtp_port." ");
$this->sock = @fsockopen($this->relay_host, $this->smtp_port, $errno, $errstr, $this->time_out);
if (!($this->sock && $this->smtp_ok())) {
$this->log_write("Error: Cannot connenct to relay host ".$this->relay_host." ");
$this->log_write("Error: ".$errstr." (".$errno.") ");
return FALSE;
}
$this->log_write("Connected to relay host ".$this->relay_host." ");
return TRUE;
}
function smtp_sockopen_mx($address)
{
$domain = ereg_replace("^.+@([^@]+)$", "1", $address);
if (!@getmxrr($domain, $MXHOSTS)) {
$this->log_write("Error: Cannot resolve MX "".$domain."" ");
return FALSE;
}
foreach ($MXHOSTS as $host) {
$this->log_write("Trying to ".$host.":".$this->smtp_port." ");
$this->sock = @fsockopen($host, $this->smtp_port, $errno, $errstr, $this->time_out);
if (!($this->sock && $this->smtp_ok())) {
$this->log_write("Warning: Cannot connect to mx host ".$host." ");
$this->log_write("Error: ".$errstr." (".$errno.") ");
continue;
}
$this->log_write("Connected to mx host ".$host." ");
return TRUE;
}
$this->log_write("Error: Cannot connect to any mx hosts (".implode(", ", $MXHOSTS).") ");
return FALSE;
}
function smtp_message($header, $body)
{
fputs($this->sock, $header." ".$body);
$this->smtp_debug("> ".str_replace(" ", " "."> ", $header." > ".$body." > "));
return TRUE;
}
function smtp_eom()
{
fputs($this->sock, " . ");
$this->smtp_debug(". [EOM] ");
return $this->smtp_ok();
}
function smtp_ok()
{
$response = str_replace(" ", "", fgets($this->sock, 512));
$this->smtp_debug($response." ");
if (!ereg("^[23]", $response)) {
fputs($this->sock, "QUIT ");
fgets($this->sock, 512);
$this->log_write("Error: Remote host returned "".$response."" ");
return FALSE;
}
return TRUE;
}
function smtp_putcmd($cmd, $arg = "")
{
if ($arg != "") {
if($cmd=="") $cmd = $arg;
else $cmd = $cmd." ".$arg;
}
fputs($this->sock, $cmd." ");
$this->smtp_debug("> ".$cmd." ");
return $this->smtp_ok();
}
function smtp_error($string)
{
$this->log_write("Error: Error occurred while ".$string.". ");
return FALSE;
}
function log_write($message)
{
$this->smtp_debug($message);
if ($this->log_file == "") {
return TRUE;
}
$message = date("M d H:i:s ").get_current_user()."[".getmypid()."]: ".$message;
if (!@file_exists($this->log_file) || !($fp = @fopen($this->log_file, "a"))) {
$this->smtp_debug("Warning: Cannot open log file "".$this->log_file."" ");
return FALSE;;
}
flock($fp, LOCK_EX);
fputs($fp, $message);
fclose($fp);
return TRUE;
}
function strip_comment($address)
{
$comment = "([^()]*)";
while (ereg($comment, $address)) {
$address = ereg_replace($comment, "", $address);
}
return $address;
}
function get_address($address)
{
$address = ereg_replace("([ ])+", "", $address);
$address = ereg_replace("^.*<(.+)>.*$", "1", $address);
return $address;
}
function smtp_debug($message)
{
if ($this->debug) {
echo $message;
}
}
}
?>
讲解用PHP实现Jmai组件及发送邮件三例 - 『PHP/Perl编程专区』 - 台州站长论坛 |台州论坛|站长论坛|TVB电视剧|PHP论坛|MYSQL论坛|Ajax论坛|DIV CSS论坛|JS论 也用PHP来实现网页静态发布的两种方法 - 『PHP/Perl编程专区』 - 台州站长论坛 |台州论坛|站长论坛|TVB电视剧|PHP论坛|MYSQL论坛|Ajax论坛|DIV CSS论坛|JS论坛| php性能效率优化 - 『PHP/Perl编程专区』 - 台州站长论坛 |台州论坛|站长论坛|TVB电视剧|PHP论坛|MYSQL论坛|Ajax论坛|DIV CSS论坛|JS论坛|ASP/ASP.NE PHP根据ip显示天气预报 - 『PHP/Perl编程专区』 - 台州站长论坛 |台州论坛|站长论坛|TVB电视剧|PHP论坛|MYSQL论坛|Ajax论坛|DIV CSS论坛|JS论坛|ASP/AS php SQL查询缓存 - 『PHP/Perl编程专区』 - 台州站长论坛 |台州论坛|站长论坛|TVB电视剧|PHP论坛|MYSQL论坛|Ajax论坛|DIV CSS论坛|JS论坛|ASP/ASP. 利用PHP制作简单的内容采集器 - 『PHP/Perl编程专区』 - 台州站长论坛 |台州论坛|站长论坛|TVB电视剧|PHP论坛|MYSQL论坛|Ajax论坛|DIV CSS论坛|JS论坛|ASP/ 在PHP中使用随机数的三个步骤详细代码 - 『PHP/Perl编程专区』 - 台州站长论坛 |台州论坛|站长论坛|TVB电视剧|PHP论坛|MYSQL论坛|Ajax论坛|DIV CSS论坛|JS论坛| PHP精确到每一秒钟的在线人数显示代码 - 『PHP/Perl编程专区』 - 台州站长论坛 |台州论坛|站长论坛|TVB电视剧|PHP论坛|MYSQL论坛|Ajax论坛|DIV CSS论坛|JS论坛| php实现gb2312和unicode间编码转换 - 『PHP/Perl编程专区』 - 台州站长论坛 |台州论坛|站长论坛|TVB电视剧|PHP论坛|MYSQL论坛|Ajax论坛|DIV CSS论坛| PHP使用zlib扩展实现页面GZIP压缩输出 - 『PHP/Perl编程专区』 - 台州站长论坛 |台州论坛|站长论坛|TVB电视剧|PHP论坛|MYSQL论坛|Ajax论坛|DIV CSS论坛|J linux批量查找文件内容 - 『程序开发』 - 台州站长论坛 |台州论坛|站长论坛|TVB电视剧|PHP论坛|MYSQL论坛|Ajax论坛|DIV CSS论坛|JS论坛|ASP/ASP.NET论坛| PHP5设置时区方法大全 - 『PHP/Perl编程』 - 台州站长论坛,台州论坛,TVB... 讲解用PHP实现Jmai组件及发送邮件三例 Discuz! Board PHP|BBS|论坛 喜悦国际村 |php教程|免费php空间|php论坛|php源码| - php基础编程 - session清空问题 - www.phpx.com php smarty 入门教程[zz] - 缔客论坛 php smarty 入门教程[zz] - 缔客论坛 php smarty 入门教程[zz] - 缔客论坛 (原创)多难兴邦 - 原创文学 - 台州论坛 | 台州网 | 台州人上台州论坛 | 台州第... 水调歌头.玉树 - 原创文学 - 台州论坛 | 台州网 | 台州人上台州论坛 | 台州第一... 直面40个菜鸟迹象——40个迹象表明你还是PHP菜鸟 - PHPChina 开源社区门户 - PHP论坛|PHP教程|PHP源码|PHP下载|PHP培训|PHP新闻|PHP专题|Zend产品服务|PHP学习 php.ini 中文版 我收藏的.._LAMP专区_论坛_LUPA开源社区 | linux社区 用ASP实现论坛的UBB功能->>网页教学网(http://www.webjx.com)建站指南|网页制作|网页特效|Flash动画|网络编程|素材下载|教程下载|建站|HTML|CSS|JAVASCRIPT|ASP|PHP|JSP|ASP.NET|数据库 沧海行 - 原创文学 - 台州论坛 | 台州网 | 台州人上台州论坛 | 台州第一人气社区