账号通
    

账号  

密码  

2740

查看

3

回复
主题:[反馈BUG]邮件订阅,两个以上的订阅用户时,所有的订阅用户发送的内容一样。 [收藏主题] 转到:  
浪侠 当前离线

416

主题

4

广播

1

粉丝
添加关注
级别:四年级

用户积分:2073 分
登录次数:299 次
注册时间:2007/2/12
最后登录:2019/3/14
浪侠 发表于:2011/12/28 21:08:36   | 显示全部帖子 查看该作者主题 楼主 
科汛智能建站系统
邮件订阅,两个以上的订阅用户时, 所有的订阅用户发送的内容一样。



解决办法:增加红字部分



在admin/ks_usermail.asp中



大约21行左右

  1. Private Title, Content,sendername,senderemail, Numc,groupid,sendfile,Temp_Content






大约364行



     
  1. Content  = Request.Form("mailtemplate")
  2.   Content  = Replace(Content,"{$GetSiteName}",KS.Setting(0))
  3.   Content  = Replace(Content,"{$GetSiteUrl}",KS.GetDomain)
  4.   Content  = Replace(Content,"{$SendDate}",Now)
  5.   Temp_Content=Content
  6.   GetMailContent




大约450行



  1.    if Not KS.ISNul(SQL(0,i)) then
  2. ReturnInfo=SendMail(KS.Setting(12),  KS.Setting(13), KS.Setting(14), Title, SQL(0,i),sendername, Replace(Content,"{$GetCancelUrl}",KS.GetDomain & "plus/mailsub.asp?action=del&id=" & sql(1,i) & "&activecode=" & sql(2,i)),senderemail)
  3. Content=Temp_Content
  4.   IF ReturnInfo="OK" Then  Numc=Numc+1
  5.   end if  
 
  支持(0) | 反对(0) 回到顶部顶端 回到底部底部
<上一主题 | 下一主题 >
Powered By KesionCMS Version X1
厦门科汛软件有限公司 © 2006-2016 页面执行0.09375秒 powered by KesionCMS 9.0