如何實(shí)現(xiàn)在首頁顯示對文章頻道的統(tǒng)計(jì)_動(dòng)易Cms教程
在網(wǎng)站首頁假如想實(shí)現(xiàn)單獨(dú)某個(gè)頻道的統(tǒng)計(jì),可以參照下面代碼對文章頻道進(jìn)行的統(tǒng)計(jì),不同頻道只要修改查詢的語句里的"ChannelName="值,以及代碼里的相關(guān)文字即可
<%@language=vbscript codepage=936 %>
<!--#include file="../conn.asp"-->
<!--#include file="../Inc/function.asp"-->
<%
'=======================
'動(dòng)易插件之“首頁文章統(tǒng)計(jì)調(diào)用”
'適用范圍:動(dòng)易2005/2006各版本
'調(diào)用方式:將本文件放到JS根目錄,在模板任何位置加上:<script language="javascript" src="{$InstallDir}JS/ArticalCount.asp"></script>
'=======================
Dim RS,SQL
Set RS=Server.CreateObject("ADODB.RecordSet")
Sql="Select * from PE_Channel where ChannelName='文章'"
rs.open sql,conn
if rs.eof then response.end
rs.movefirst%>
var S;
s='文章總數(shù):<%=RS("ItemCount")%> 篇<br>待審文章:<%=(RS("ItemCount")-RS("ItemChecked"))%>篇<br>評論總數(shù):<%=RS("CommentCount")%>條<br>專題總數(shù):<%=RS("SpecialCount")%>個(gè)<br>文章閱讀:<%=RS("HitsCount")%>人次<br>';
document.write(s)
<%
RS.Close
Set RS=Nothing
conn.Close
Set conn=Nothing
%>
-----------------感謝 海浪 提供----------------------
- MAC錯(cuò)誤的解決方法
- 如何屏蔽動(dòng)易后臺(tái)導(dǎo)航里的某個(gè)功能菜單?
- 動(dòng)易.NET版本留言自動(dòng)選定欄目方法
- 動(dòng)易SiteFactoty整合Discuz!NT3.0
- 在任意位置獲取根節(jié)點(diǎn)ID標(biāo)簽
- 如何開啟SiteWeaver6.8的支持,反對功能
- Windows 2008安裝動(dòng)易.NET系統(tǒng)之四----動(dòng)易系統(tǒng)安裝篇
- Windows 2008安裝動(dòng)易.NET系統(tǒng)之三----數(shù)據(jù)庫篇
- Windows 2008安裝動(dòng)易.NET系統(tǒng)之二----IIS、目錄環(huán)境配置篇
- 數(shù)據(jù)庫修復(fù),SQL Server 2005內(nèi)部操作不一致的處理
- 如何安裝動(dòng)易.net程序權(quán)限配置
- 為什么提示對Windows系統(tǒng)文件夾下的Temp目錄沒有訪問權(quán)限?
動(dòng)易Cms教程教程Rss訂閱Cms教程搜索
動(dòng)易Cms教程推薦
- 關(guān)于子域名模式下修改模板后前臺(tái)不會(huì)立刻有效果的問題
- 動(dòng)易系統(tǒng)添加后臺(tái)模塊插件制作初步
- 解決模板中用隨身購物車標(biāo)簽報(bào)js錯(cuò)誤的方法
- 超級flash幻燈片(圖片頻道)
- Get****List標(biāo)簽中arrClassID參數(shù)的賦值說明
- 動(dòng)易系統(tǒng)動(dòng)態(tài)標(biāo)簽基礎(chǔ)知識(1)
- 如何讓整合支持跨域名
- 從4.03升級后,圖片內(nèi)容頁只顯示地址,怎么辦?
- 怎么樣正確設(shè)置去掉前臺(tái)的默認(rèn)顯示項(xiàng)?
- 解答自定義循環(huán)列表顯示標(biāo)題顏色、加粗等屬性的問題
- 相關(guān)鏈接:
- 教程說明:
動(dòng)易Cms教程-如何實(shí)現(xiàn)在首頁顯示對文章頻道的統(tǒng)計(jì)
。