更新bbs网站最高访问数据

admin

可以自己设置虚拟人数范围，但是当设置很大时，发现最高记录数据高的离谱，跟自己网站不匹配，想对数据清零，这时却发现没这个功能，于是去网上搜资料，只能找到一些老版本的sql修改方法，运行了这些sql语句对新版本不起作用，最高记录依旧；却始终没发现一个适合自己X系列版本的清零方法。

) ?* f8 j9 l: V  T+ s$ m2 m带着这些疑问，于是了解了下X系列版本的最高记录写入和调用方法：
- O3 d' J* E2 o% h+ P- Y6 H: n9 \1、首先从界面入手，审查元素找到对应的DIV的ID 和CLASS，
5 O( I. X, @% `- {8 T
2、通过DIV找到模板文件是"\template\default\forum\discuz.htm"相关代码 行是：<!--{if $detailstatus}-->
0 ~& D/ j4 O- b9 g- q5 h+ R<span class="o"><a href="forum.php?showoldetails=no#online" title="{lang spread}"><img src="{IMGDIR}/collapsed_no.gif" alt="{lang spread}" /></a></span>
2 p; L1 Z5 w% o4 E6 K6 X  ]2 p<h3>
<strong><a href="home.php?mod=space&do=friend&view=online&type=member">{lang onlinemember}</a></strong>
<span class="xs1">- <strong>$onlinenum</strong> {lang onlines}
- <strong>$membercount</strong> {lang index_members}(<strong>$invisiblecount</strong> {lang index_invisibles}),
5 Z1 v. d; v5 z. a: {<strong>$guestcount</strong> {lang index_guests}
2 @7 s3 e4 p  e& i; ~, B( n- {lang index_mostonlines} <strong>$onlineinfo[0]</strong> {lang on} <strong>$onlineinfo[1]</strong>.</span>
- K. g+ Y" g% \* Q) R# I- G- u9 `7 V* P</h3>
" e3 |, y* E; C  \9 x<!--{else}-->
<span class="o"><a href="forum.php?showoldetails=yes#online" title="{lang spread}"><img src="{IMGDIR}/collapsed_yes.gif" alt="{lang spread}" /></a></span>
<h3>
; U; c( \( R8 ~. u<strong><a href="home.php?mod=space&do=friend&view=online&type=member">{lang onlinemember}</a></strong>
1 i% [" ?5 C0 Q/ e/ ^<span class="xs1">- {lang total} <strong>$onlinenum</strong> {lang onlines}
- {lang index_mostonlines} <strong>$onlineinfo[0]</strong> {lang on} <strong>$onlineinfo[1]</strong>.</span>
9 ]$ t. C- {! W) J  L: I" q</h3>
( E" B' Q- m1 y$ X+ S0 P# ~<!--{/if}-->
! ?: P8 b: a' c6 w, Z' q. C! |

9 l9 I  W. _+ {! c- }7 p* n, N
% d; Y0 y' j% T$ b
, Y8 H& H$ v7 r3、分析模板文件代码，可知变量$onlineinfo[0]是最高记录，$onlineinfo[1]是最高记录的时间，根据变量全局搜到
\source\module\forum\forum_index.php这个文件，发现$onlineinfo就是在这里定义的，摘出 并分析如下：

$onlineinfo = explode("\t", $_G['cache']['onlinerecord']);
# ?3 Q! @% O  `+ ~: N# |//读取缓存中的最高记录和时间并写在数组$onlineinfo 中
% r/ x* e& D' E8 R# _if(empty($_G['cookie']['onlineusernum'])) {
, ]# [1 O! K  B/ U% X8 Y' f//判断在线用户数量的cookie是否为空，如果为空就运行下面的程序
2 w# l9 l7 B) P$ ^0 R& w$onlinenum = DB::result_first("SELECT count(*) FROM ".DB::table('common_session'));
//搜出session表此时的在线记录数量
if($onlinenum > $onlineinfo[0]) {
: r8 D# S2 ]1 ^& k3 i) T) d) `+ D//如果此时在线记录数量高于 最高纪录
: ?% @$ e4 z  Q7 p/ E7 W6 {$ M$onlinerecord = "$onlinenum\t".TIMESTAMP;
- M/ I2 W8 `( W/ U' ~( |//定义字符串$onlinerecord 为最高纪录加此时的时间
: v+ Y) c# d) O" h" R% }8 J5 |DB::query("UPDATE ".DB::table('common_setting')." SET svalue='$onlinerecord' WHERE skey='onlinerecord'");
* f+ w4 I% Y! N, D9 w//更新数据库表最高纪录的svalue值
& ?, \2 q9 ?: G) Rsave_syscache('onlinerecord', $onlinerecord);
6 q) A! J8 u3 O//保存缓存数据到'onlinerecord'中
% p  e$ B: Q1 d4 o2 T6 ^) ?$ u% `$onlineinfo = array($onlinenum, TIMESTAMP);
//重新定义数组$onlineinfo
6 o' u/ }% z' G0 _/ [}
! y* F7 K$ p* Q) z1 ~: z' `dsetcookie('onlineusernum', intval($onlinenum), 300);
//重新设置cookie的'onlineusernum'值
0 s' ?& N  `5 O) o$ ]) }! O3 B} else {
$onlinenum = intval($_G['cookie']['onlineusernum']);
//如果在线用户数量的cookie存在，就读取cookie值
; _1 J9 u5 _8 G  t# F: H}
' P$ n* g6 O0 L' x  Z3 h/ @$onlineinfo[1] = dgmdate($onlineinfo[1], 'd');
; u' P( E0 E5 S' V2 [- U//格式化最高纪录时的时间格式是“2023-8-18”
5 n' L. p8 Q7 {, w: i

, ^/ S' N2 p! n/ O! l- P看到这里很多人会认为直接DB::query("UPDATE ".DB::table('common_setting')." SET svalue='$onlinerecord' WHERE skey='onlinerecord'");的sql语句不就行了吗。其实不然，重点在要修改在线最高记录是要修改缓存$_G['cache']['onlinerecord']的值，如果你不修改这个缓存值并且新的在线人数又不高于缓存中最高记录，数组$onlineinfo根本不会重新被赋值，也就没法完成清零 ，哪怕你把表的'common_setting'的值改为“0    3067617XXXXXXX”，最高记录会依然读取缓存最高记录。
$ }5 f9 n" Q% a: n, Q8 h, z- ~) p难点就在$_G['cache']['onlinerecord'])从何而来，变量追溯cache的值要读common_syscache 这个表，缓存数据data`是 mediumblob 这个数据类型，只能在程序里面修改，不能sql语句的方法修改，所以得用插件或者单独写个程序页面来清零，也就是用到上面13行的代码save_syscache('onlinerecord', $onlinerecord);来更新缓存的数值。
6 a, t& n, q9 t& s
; C; B9 c/ z. k, e  w& h5 B* C9 U
4、分析到这里修改方法就有了，定义一下变量$onlinerecord ，更新一下数据库表'common_setting'再保存一下缓存就好了：

$onlinerecord = "$onlinenum\t".TIMESTAMP;
$ z/ U8 ]3 W7 l  s- P$ ]" l    DB::query("UPDATE ".DB::table('common_setting')." SET svalue='$onlinerecord' WHERE skey='onlinerecord'");
6 g- F2 a! K4 j" n6 f0 Q1 v    save_syscache('onlinerecord', $onlinerecord);
' E+ y; c4 ]4 r* j1 M0 f
* y0 z. j8 @' H6 Z" e' H, r重设需要两个值，一个是是最高记录值，一个是最高纪录的时间，就做了个简单的页面方便大家修改，直接把下面的附件传到Discuz! 根目录下运行就行了：
utf8编码的运行：https://www.xxxxxx.com/onlineutf8.php  ；gbk的运行：https://www.xxxxxx.com/onlinegbk.php就好了。
效果图：
- p6 L1 f" F( T7 |( n6 l, ?% s$ X

/ M4 }& E1 F$ P