disonline.asp

来自「仿雅虎论坛静态生成html版 后台管理：admin/admin.asp 用户」· ASP 代码 · 共 13 行

<!--#include file="../board/const.asp"-->
<!--#include file="BtBBS_Fun.asp"--><%
Dim login,StarTime,EndTime,AccessNum,Online1,OnlineNum,page
login=Request.Cookies("login")
Call JCC_Board_Top
StarTime = Timer():AccessNum=0
'----------计算页的位置-----------------------
page=Request("page")
If IsNumeric(page)=False then page=1:page=cint(page) end if
if page="" or page<=0 then page=1 end if
'-------------------------------------------------
Call Login_EN
Response.Write "<center><table width=743><tr><td colspan=3 height=30 class=light>&nbsp;<img src=../images/nav.gif>&nbsp;<a href=index.asp><font class=NavColor>阶韭