账号通
    

注册

找回密码

账号  

密码  

话题
互动
会员
服务
<<返回列表上一个主题 下一个主题 打印本帖 复制本帖地址

8920

查看

28

回复
主题：给文章添加评论总数字段 [收藏主题] 转到：  
guozhihuam 当前离线

40

主题

0

广播

0

粉丝
添加关注
级别:学前班

用户积分:39 分
登录次数:11 次
注册时间:2010/11/12
最后登录:2011/1/12
guozhihuam 发表于：2010/12/26 15:37:10   | 显示全部帖子 查看该作者主题 楼主 
一分钟快速开通线上知识店铺

在KS_Article中加入一个自定义字段，我加入的是CommentNum 数字类型

然后在Comment.asp中

  1. RS.Open "Select top 1 * From KS_Comment Where 1=0",Conn,1,3
  2. RS.AddNew
  3. RS("ChannelID")=ChannelID
  4. RS("InfoID")=InfoID
  5. RS("AnounName")=AnounName
  6. RS("UserName")=AnounName
  7. RS("Anonymous")=Anonymous
  8. RS("Email")=Email
  9. RS("Content")=KS.HTMLEncode(C_Content)
  10. RS("UserIP")=KS.GetIP
  11. RS("Point")=0
  12. RS("Score")=0
  13. RS("OScore")=0
  14. RS("Verific")=Verific
  15. RS("AddDate")=Now
  16. RS.UpDate
  17. RS.MoveLast
  18. Dim CommentID:CommentID=RS("ID")
  19. RS.Close
的下面，也就是
  1. Sub WriteSave()
中添加如下内容：
以下内容只有回复后才可以浏览,请先登录！
 
有课程 找生源 就上科汛课堂街
  支持(0) | 反对(0) 回到顶部顶端 回到底部底部
＜上一主题 | 下一主题 ＞
Powered By KesionCMS Version X1
厦门科汛软件有限公司 © 2006-2016 页面执行0.07813秒 powered by KesionCMS 9.0