Dede:自动给新注册会员发送欢迎邮件

muban大师

昨天看了一位朋友发的，新用户注册邮件验证的帖子，我弄了下不能成功，于是把代码修改了下可以给新注册用户自动发送欢迎的邮件。
         
        修改方法
       
        进入/member/reg_new.php
       
        找到//写入其它默认数据用以下代码覆盖//写入其它默认数据下面的所有代码
       
        以下代码是我的网站的原代码,没有修改,请需要的用户自行修改
       
       
               
                       
                               
                                       
$dsql->ExecuteNoneQuery("INSERT INTO `dede_member_flink`(mid,title,url) VALUES
//发送验证邮件
if($cfg_md_mailtest=='Y')
{
$msg ="";
$msg .= "
[color=,".$uname."
恭喜您注册成为听烈火建站网的会员了！
";
$msg .= "您的登陆帐号:".$userid."
";//这里，做了个小判断，如果是企业用户注册，则给多送条信息去。
$msg .= "您的登陆密码:已经设置隐藏
";//
if($mtype=='企业'){
$msg .= "活动公告：
[color=,马上完善您的资料信息，赠送1000积分！填写完后联系管理员！

";
}
$msg .= "[url=,登陆后您可以：[/url]
";
$msg .= "[url=,发表文章[/url]
";
$msg .= "[url=,发起提问[/url]
";
$msg .= "[url=,发布网址[/url]
";
$msg .= "
[color=,活动公告：
[url=,马上完善您的资料信息，赠送1000积分！填写完后联系管理员！[/url]
";
$msg .= "如需帮助，请直接回复此邮件，联系管理员！
";
$msg .= "这是一封由听烈火建站网-网站系统自动发送的邮件，请不要回复！
";
$msg .= "[url=,欢迎您！[/url]
";
$msg .= "";
$mailbody = '';
//下面这个是邮件标题，上面的是邮件正文部分。
$mailtitle = "听烈火建站网欢迎您的加入";
$mailbody .= "$msg \r\n\r\n";
$headers = "From: ".$cfg_adminemail."\r\nReply-To: ".$cfg_adminemail;
if($cfg_sendmail_bysmtp == 'Y' && !empty($cfg_smtp_server))
{ //下面这里选择HTML网页方式发送，如果邮箱不支持HTML，就改为TXT，不过现在好像都支持HTML了吧。
$mailtype = 'HTML';
require_once(DEDEINC.'/mail.class.php');
$smtp = new smtp($cfg_smtp_server,$cfg_smtp_port,true,$cfg_smtp_usermail,$cfg_smtp_password);
$smtp->debug = false;
$smtp->sendmail($email, $cfg_smtp_usermail, $mailtitle, $mailbody, $mailtype);
}
else
{
@mail($email, $mailtitle, $mailbody, $headers);
}
$ml = new MemberLogin(7*3600);
$rs = $ml->CheckUser($userid,$userpwd);
ShowMsg("恭喜您注册成为听烈火建站网的会员了，您的电子邮件地址为( ".$email." )此邮箱为您取回密码的重要依据，系统已经发送了一封电子邮件到您的邮箱，请登陆您的邮箱查收!如果无法收到邮件，请马上联系管理员！","index.php",0]2000);
exit();
}

}
else
{
ShowMsg("注册失败，请检查资料是否有误或与管理员联系！","-1");
exit();
}
}
$sql = "desc dede_member";
$dsql->SetQuery($sql);
$dsql->Execute();
while ($row = $dsql->GetArray()) {
if($row['Field', == 'mtype')
{
$types = $row['Type',;
break;
}
}
$types = str_replace(array('enum', '(', ')', '\'')] '', $types);
$types = explode(',', $types);

require_once(DEDEMEMBER."/templets/reg-new.htm");
?>
复制代码