风讯官方论坛FoosunCMS交流区Foosun4.x安装使用怎么实现163阅读页面顶一下的效果!!

1  /  1  页   1 跳转 查看:1005

标题: 怎么实现163阅读页面顶一下的效果!!

怎么实现163阅读页面顶一下的效果!!

http://news.163.com/08/0305/09/468SSLL30001124J.html


如题!


随便说下,聚合怎么不能用啊!
引用
 

回复:怎么实现163阅读页面顶一下的效果!!

顶一下目前4没有
百度HI群号1087553欢迎加入!百度号cyxjq
引用
 

回复:怎么实现163阅读页面顶一下的效果!!

有插件,搜索一下论坛digg
承接整站开发、风讯程序修改、功能定制、插件制作、系统整合、标签制作、网站升级……
技术为本,信誉至上! 定制QQ:83862966
部分修改案例
引用
 

回复:怎么实现163阅读页面顶一下的效果!!

搜了!没有!!!!

希望官方能在下个版本中发布此功能...

会做的高手先做下..
引用
 

回复:怎么实现163阅读页面顶一下的效果!!

digg功能,已经在net产品中具备了.
FoosunCMS操作流程:创建栏目-->添加新闻-->添加样式-->创建标签-->将标签插入模板-->生成首页栏目页完成.
引用
 

回复:怎么实现163阅读页面顶一下的效果!!

可是我的空间不支持。NET啊!
郁闷死了。
引用
 

回复: 怎么实现163阅读页面顶一下的效果!!



引用:
原帖由 ttao 于 2008-3-6 09:31:00 发表
digg功能,已经在net产品中具备了.
这种回答等于废话,大家现在问的是fs400sp5的。
引用
 

回复: 怎么实现163阅读页面顶一下的效果!!



引用:
原帖由 ttao 于 2008-3-6 09:31:00 发表
digg功能,已经在net产品中具备了.
除了风讯net,很多系统都具备了。
引用
 

回复:怎么实现163阅读页面顶一下的效果!!

以前在论坛就有朋友发过一个Digg的插件,fun4系列的
承接风讯DIV+CSS风格模板制作
风讯修改,问题咨询
联系邮箱tesgo(A)163.com
引用
 

回复:怎么实现163阅读页面顶一下的效果!!

论坛换程序了`搜索不到!
引用
 

回复:怎么实现163阅读页面顶一下的效果!!

4.0这么久都不更新了,郁闷......
引用
 

回复:怎么实现163阅读页面顶一下的效果!!

Digg的实现原理
Digg概念源自美国Digg公司。它完全是依靠真实的网民的自己力量。网站上所有内容都是由网民自己发布,并且内容的位置也是由网民自己来决定。当内容的顶数,评论等达到一定的数字,这些内容就有可能从众多的信息中脱颖而出。

  Digg自诞生之日起就以一种崭新的“新闻过滤器”模式和独立的新闻立场给互联网世界带来了强烈的影响。它是依靠网友的力量对资讯进行筛选、推荐、投票,进而生成用户自己的内容。

  目前国内就有不少网站采用了开源程序进行Digg网站的建设,用以吸引“顶客”人群,如知名的IT媒体社区Donews的Dig频道;另外还有一些自行开发或者基于开源程序后期开发的Digg网站,较为知名的有我顶网(wodingg.com)等。

  这段时间我也开发了相关功能插件,下面把该Digg功能的关键代码贴出来:

stype = NoSqlHack(request("post")) '得到提交类型,分Digg和bury
spanid = NoSqlHack(request("id"))'得到新闻ID
if stype="" or spanid="" then
      response.Write("r")'类型或者新闻ID为空时返回错误字符R
      response.End()
end if

select case stype
      case "show"'类型为显示Digg数
      set Digg_RS=Conn.execute("select Digg from FS_NS_News where ID="&spanid&"")
      if not Digg_RS.eof then TmpStr = cstr(Digg_RS(0))
      response.Write("document.write('"&TmpStr&"')")
      RsClose()
      case "digg"'类型为Digg提交
      Deltime = DateDiff("D",2,GetTime)'删除一天后的Digg用户记录
      'Response.write(Deltime)
      Conn.execute("DELETE from FS_NS_Digg where DiggTime<"&Deltime)
      set Digg_RS=Conn.execute("select * from FS_NS_Digg where ip = '"&ip&"' and NewsID = "&spanid&"")'判断是否有相同IP用户在同一天内对同一新闻进行Digg操作,有则返回错误字符R
      if not Digg_RS.eof then
        response.Write("r")
      else
        Conn.execute("insert into FS_NS_Digg(IP,NewsID,DiggTime) values('"&ip&"',"&spanid&",'"&GetTime&"')")'向数据库插入Digg日志
        Conn.execute("Update FS_NS_News set Digg=Digg+1 where ID="&spanid&"")'更新Digg数
        set Digg_RS=Conn.execute("select Digg from FS_NS_News where ID="&spanid&"")
        if not Digg_RS.eof then TmpStr = cstr(Digg_RS(0))
        response.Write(TmpStr)
      end if
      RsClose()
        case else
      response.Write("r")
end select

完了前台用ajax取得数据!
百度HI群号1087553欢迎加入!百度号cyxjq
引用
 

回复:怎么实现163阅读页面顶一下的效果!!

这个插件我收藏了!如果有需要的联系我!for 风讯4.0 sp4

安装前提:风讯CMSsp4 Access版,其它版本我没有测试过,不保证功能的完好性。
1。此插件解压后共有五个文件
|-------Ksir_Digg_Install.asp          (安装主文件)
|-------Ksir_Digg_Tmp          (安装库)
|-------diggbg.png          (Digg背景图片)
|-------digg样式.txt          (Digg标签制作代码)
|-------安装方法.txt          (说明文档)
2。开始安装,把前三个文件放到风讯CMS系统的根目录,如果风讯CMS安装的方式为虚拟目录,请手动修改前三个文件的相关路径。完了在浏览器里输入http://www.xxx.com/Ksir_Digg_Install.asp 进行自动安装。(点击开始更新按钮即可)请确保部分目录有可写权限。
3。在风讯后台“样式管理”中制作“Digg样式”,把“digg样式.txt”文件中的所有内容做为样式内容。接下来制作“Digg标签”,制作方式是直接引用做好的“Digg样式”即可。
4。在模板中调用做好的“Digg标签”即可实现Digg功能,祝你成功!

提示:该插件在安装过程中会自动在风讯CMS数据库中创建“FS_NS_Digg”数据表,并会在“FS_NS_News”数据表里添加“Digg”字段。
百度HI群号1087553欢迎加入!百度号cyxjq
引用
 
1  /  1  页   1 跳转

版权所有 Foosun.NET  NewsCMS.com  NewsIDC.COM  Sitemap

Powered by Discuz!NT 2.0.1115    Copyright © 2001-2008 Comsenz Inc.
Processed in 0 second(s) (Cached).
返顶部