private sub class_initialize()
r_rn=quest("rn",2):if len(r_rn)=0 then r_rn=20
if int(r_rn)>500 then r_rn=200
if 500>int(r_rn)>200 then r_rn=200
if 200>int(r_rn)>100 then r_rn=100
if int(r_rn)<10 then r_rn=10
这个是修改之后的
if int(r_rn)>100 then r_rn=100
if int(r_rn)<10 then r_rn=10
这个是修改之前的.
修改的文件名是 page/system/fun.asp
I2=array("20","40","100","200","500")
在第2560行还增加了 ,"500"
这样可以处理了俩问题.
1.之前的KingCMS后台列表中,每页显示200条无效,点完了总是显示每页100条.
2.增加 了一个 每页显示 500条.适合大批量的处理...
