戒聊

引用:

原帖由 yangjun 于 2007-12-12 19 发表
哈哈，强大，

最后还有一点点细节的东西，烦请LZ再改一下：

“评论内容如下：”这里现在是紧跟着内容的。建议换行。偶刚才试了一下加个结果它直接显示出来了

还有就是留言的内容用别的颜色定 ...

可以。在

复制内容到剪贴板

代码:

               msg.Body = "["&username&"]在您的博客中发表了评论,请点击查"&siteurl&"default.asp?id="&post_logID&"#comm_"&email_commid&"。评论内容如下："&post_Message&""

下或上插入：

复制内容到剪贴板

代码:

               msg.HTMLBody = "["&username&"]在您的博客中发表了评论,请点击查"&siteurl&"default.asp?id="&post_logID&"#comm_"&email_commid&"。评论内容如下："&post_Message&""

自己在插入的这个里面加上相应的HTML代码就可以了。颜色什么也在里面加。

yangjun

搞定

非常感谢楼主～～～～

那个后台的日志管理插件好像也是你写的吧，非常实用，今天又开发出了这个．．．．．
两个字＂感激＂！！

yangjun

请ＬＺ继续开发一下：

能否在发邮件的同时，增加一个抄送地址。
并在后台增加一个“抄送到：”的选项。


拜托！！！

[ 本帖最后由 yangjun 于 2007-12-25 20:15 编辑 ]

yangjun

LZ在吗？期待能解决一下哦

戒聊

干什么要抄送噢？往哪抄送？

yangjun

就是给自己的手机邮箱抄送一份，这样就可以短信通知了。如果能实现的话，肯定还会有别的用处的。。。

戒聊

地址写两个就行了．用逗号分开．

yangjun

你是说在后台的站长邮箱那一栏里填写吧？
我试了一下，逗号和分号都试了(英文状态),都不行！

要不算了吧~~~ 谢谢

戒聊

复制内容到剪贴板

代码:

Set msg = Server.CreateObject("JMail.Message")
                        msg.silent = true
                        msg.Logging = true
                        msg.Charset = "gb2312"
                        msg.MailServerUserName = blog_smtpuser
                        msg.MailServerPassword = blog_smtppassword   
                        msg.From = blog_smtpmail
                        msg.FromName = sitename
                        msg.AddRecipient blog_email,sitename
                        If comm=1 Then
                                msg.Subject = "您发表的文章《"&email_log_title&"》已有客人发表了评论"
                                msg.Body = "["&username&"]在您的博客中发表了评论,请点击查"&siteurl&"default.asp?id="&post_logID&"#comm_"&email_commid&"。评论内容如下："&post_Message&""
                        Else
                                msg.Subject = "您的博客已有客人留言"
                                msg.Body = "["&username&"]在您的博客中发表了留言,请点击查看"&siteurl&"LoadMod.asp?plugins=GuestBookForPJBlog#book_"&email_commid&"。留言内容如下："&post_Message&""
                        End if
                        msg.Send(blog_smtp)
                        msg.close
                        set msg = nothing

这个写两次．第二次改邮箱就行了．

yangjun

好的，谢谢了