动网7.0sp2 在首页上显示“建站天数”“帅哥”“靓妹”修改方法

index.asp

TempStr=Replace(TempStr,"{$MaxPostDate}",Dvbbs.CacheData(13,0))
后面增加
TempStr = Replace(TempStr,"{$BuildDayNum}",datediff("d",Dvbbs.Forum_Setting(74),date()))
TopArray = Split(template.html(2),"||")
后面增加
TempStr=Replace(TempStr,"{$sexgb}",sexg(0))
TempStr=Replace(TempStr,"{$sexga}",sexg(1))
inc/Dv_ClsMain.asp
最后面的 %>前面加入以下代码
function sexg(sexgb)
     Dim sqlgb
     Dim Rs
     if sexgb=1 then
     sqlgb="where Usersex=1"
     else
     sqlgb="where Usersex<>1"
     end if
     ConnectionDatabase
     set rs=conn.execute("Select count(*) from [dv_user]"&sqlgb)
     sexg=rs(0)
     set rs=nothing
end function
进后台,分页面模板,(page_index),界面风格,template.html(0)
<tr><td colspan="2">
最高日发贴：<font title="发生日期: [{$MaxPostDate}"><B>{$MaxPostNum}</B></font> 篇，发生时间：{$MaxPostDate}
</td></tr>
改为：
<tr><td>
最高发贴：<font title="发生日期: [{$MaxPostDate}"><B>{$MaxPostNum}</B></font> 篇</td><td>建站天数：<b>{$BuildDayNum}</b> 天</td></tr><tr><td >论坛酷哥：<b>{$sexga}</b> 人</td><td>论坛靓妹：<B>{$sexgb}</B> 人</td></tr>