在library.asp(common目录下面)的191行也就是 str=replace(str,"$blog_OnlineNums$",vOnline)下面添加查询代码(注意修改建站日期)



運行天數統計

str=replace(str,"$blog_RunDays$",DateDiff ("d","2006-06-04",date))



今日評論數

str=replace(str,"$Today_blog_CommNums$",Conn.ExeCute("Select COUNT(comm_ID) FROM blog_Comment Where Year(comm_PostTime)=Year(Now) and Month(comm_PostTime)=Month(Now) and Day(comm_PostTime)=Day(Now)")(0))



今日日志數

str=replace(str,"$Today_blog_LogNums$",Conn.ExeCute("Select COUNT(log_ID) FROM blog_Content Where Year(log_PostTime)=Year(Now) and Month(log_PostTime)=Month(Now) and Day(log_PostTime)=Day(Now)")(0))



今日留言數

str=replace(str,"$Today_MessageNums$",Conn.ExeCute("Select COUNT(book_id) FROM blog_book Where Year(book_PostTime)=Year(Now) and Month(book_PostTime)=Month(Now) and Day(book_PostTime)=Day(Now)")(0))



今日訪問數

str=replace(str,"$Today_VisitNums$",Conn.ExeCute("Select COUNT(coun_ID) FROM blog_Counter Where Year(coun_Time)=Year(Now) and Month(coun_Time)=Month(Now) and Day(coun_Time)=Day(Now)")(0))



今日引用數

str=replace(str,"$Today_blog_TbCount$",Conn.ExeCute("Select COUNT(tb_ID) FROM blog_Trackback Where Year(tb_PostTime)=Year(Now) and Month(tb_PostTime)=Month(Now) and Day(tb_PostTime)=Day(Now)")(0))



所有日志浏览量总和

str=replace(str,"$All_ViewNums$",Conn.Execute("Select SUM(log_ViewNums) FROM blog_Content")(0))





将后台BlogInfo模块的代码替换成下面的



日 志总数:今日$Today_blog_LogNums$篇,共$blog_LogNums$篇<br />评论总数:今日$Today_blog_CommNums$篇,共$blog_CommNums$篇<br />留言总数:今日$Today_MessageNums$条,共$blog_MessageNums$条<br />引用总数:今日$Today_blog_TbCount$篇,共$blog_TbCount$篇<br />会员总数:$blog_MemNums$人<br />在线人数:$blog_OnlineNums$人<br />今日访问:$Today_VisitNums$次<br />总计访问:$blog_VisitNums$次<br />日志浏览:$All_ViewNums$次<br />建站日期:2006-08-08<br />运行天数:$blog_RunDays$天