Discuz! 6.1 - 发送HTML格式电子邮件_网站应用

复制代码 代码如下:

--- sendmail.inc.original.php
+++ sendmail.inc.mime.php
@@ -33,23 +33,23 @@

$email_subject = '=?'.$charset.'?B?'.base64_encode(str_replace("\r", '', str_replace("\n", '', '['.$bbname.'] '.$email_subject))).'?=';
$email_message = chunk_split(base64_encode(str_replace("\r\n.", " \r\n..", str_replace("\n", "\r\n", str_replace("\r", "\n", str_replace("\r\n", "\n", str_replace("\n\r", "\r", $email_message)))))));

$email_from = $email_from == '' ? '=?'.$charset.'?B?'.base64_encode($bbname)."?= <$adminemail>" : (preg_match('/^(.+?) \<(.+?)\>$/',$email_from, $from) ? '=?'.$charset.'?B?'.base64_encode($from[1])."?= <$from[2]>" : $email_from);

foreach(explode(',', $email_to) as $touser) {
$tousers[] = preg_match('/^(.+?) \<(.+?)\>$/',$touser, $to) ? ($mailusername ? '=?'.$charset.'?B?'.base64_encode($to[1])."?= <$to[2]>" : $to[2]) : $touser;
}
$email_to = implode(',', $tousers);

-$headers = "From: $email_from{$maildelimiter}X-Priority: 3{$maildelimiter}X-Mailer: Discuz! $version{$maildelimiter}MIME-Version: 1.0{$maildelimiter}Content-type: text/plain; charset=$charset{$maildelimiter}Content-Transfer-Encoding: base64{$maildelimiter}";
+$headers = "From: $email_from{$maildelimiter}X-Priority: 3{$maildelimiter}X-Mailer: Discuz! $version{$maildelimiter}MIME-Version: 1.0{$maildelimiter}Content-type: ".(true === is_string($sendmail_mime) ? $sendmail_mime : 'text/plain')."; charset=$charset{$maildelimiter}Content-Transfer-Encoding: base64{$maildelimiter}";

$mail['port'] = $mail['port'] ? $mail['port'] : 25;

if($mail['mailsend'] == 1 && function_exists('mail')) {

@mail($email_to, $email_subject, $email_message, $headers);

} elseif($mail['mailsend'] == 2) {

if(!$fp = fsockopen($mail['server'], $mail['port'], $errno, $errstr, 30)) {
$errorlog('SMTP', "($mail[server]:$mail[port]) CONNECT - Unable to connect to the SMTP server", 0);

之后可以通过设定全局变量$sendmail_mime来发送HTML格式电子邮件。

时间: 2024-09-19 20:32:57

Discuz! 6.1 - 发送HTML格式电子邮件_网站应用的相关文章

如何用ASP发送html格式的邮件?_编程10000问

如何用ASP发送html格式的邮件? <% Dim objMail Set objMail = CreateObject("CDONTS.Newmail") objMail.TO = "sunchunliang@263.net" objMail.From =shenzhaoyang@intels.net objmail.Subject = "闪亮日子之html撼雪喷云" objMail.MailFormat = cdoMailFormatM

PHP Mail函数发送html格式邮件

windows系统下mail函数需要配置 1.从http://glob.com.au/sendmail/下载sendmail.zip 2.解压到C:下,例如C:\php\sendmail,最好短路径,长路径名有可能产生问题. 3.修改php.ini如下 sendmail_path = "C:\wamp\sendmail\sendmail.exe -t" 4.根据你自己的配置环境修改sendmail.ini. 第一次最好启用debug.log_file,error_logfile,以查看

JSP与JavaMail之4(发送HTML格式邮件)

js 5.发送HTML格式的邮件 所谓HTML格式,就是超文本格式.你的邮件可以用HTML代码编写,发给对方后,对方收到的将是信息将是超文本,超文本比纯文本好看多了.下以面是在以前例子的基础上修改的程序: <%@ page contentType="text/html;charset=GB2312" %><%request.setCharacterEncoding("gb2312");%><%@ page import="ja

php使用curl发送json格式数据实例

 这篇文章主要介绍了php使用curl发送json格式数据的实例,大家参考使用吧  代码如下: $urlcon= 'http://localhost/******.php'; $data=' { "button":[ {  "type":"click", "name":"今日歌曲", "key":"V1001_TODAY_MUSIC" }, { "type&

用Jmail控件发送HTML格式邮件,如何使HTML代码引用附件中的图片?

问题描述 用Jmail控件发送HTML格式邮件,如何使HTML代码引用附件中的图片? RT,如何获取附件地址?string cid=mymail.addattachment(filename,true,null),得到的是什么?在HTML代码中要怎么用才能引用成功呢?本人小白一枚,请大神指点 解决方案 jmail发送html格式的邮件Java发送HTML格式的邮件javamail实现向多人发送带附件的html格式邮件

如何用java发送JSON格式的请求到Keystone 给用户加admin角色?

问题描述 我想用java发送json格式的命令到keystone给指定的用户加admin角色,我找到了一个rackspace发布的keystoneAPIextension,其中有"addglobalroletouser"API,网址是:http://docs.rackspace.com/openstack-extensions/auth/OS-KSADM-admin-devguide/content/PUT_addUserRole_v2.0_users__userId__roles_O

php发送html格式文本邮件的方法_php技巧

本文实例讲述了php发送html格式文本邮件的方法.分享给大家供大家参考.具体实现方法如下: <?php $to = "simon@mailexample.com, elaine@mailexample.com"; //设置收件人 $subject = "This is a test"; //设置E-mail主题 //设置E-mail内容: $message = " <html> <head> <title>Thi

SQL Server中发送HTML格式邮件的方法_MsSql

sql server 发送html格式的邮件,参考代码如下: DECLARE @tableHTML NVARCHAR(MAX) ; -- 获取当前系统时间,和数据统计的时间 set @d_nowdate = convert(datetime,convert(varchar(10),dateadd(day,-1,getdate()),120),120); -- 如果有数据则发送 if exists (select top 1 * from t_table1(nolock) where d_rq=@

SQL Server中发送HTML格式邮件的方法

sql server 发送html格式的邮件,参考代码如下: DECLARE @tableHTML NVARCHAR(MAX) ; -- 获取当前系统时间,和数据统计的时间 set @d_nowdate = convert(datetime,convert(varchar(10),dateadd(day,-1,getdate()),120),120); -- 如果有数据则发送 if exists (select top 1 * from t_table1(nolock) where d_rq=@