?? main.asp
字號:
<!--#include file="config.asp"-->
<!--#include file="conn.asp"-->
<!--#include file="format.asp"-->
<!--#include file="error.asp"-->
<!--#include file="body/incjs.asp"-->
<!--#include file="body/top.asp"-->
<!--#include file="body/main_master.asp"-->
<!--#include file="body/main_vote.asp"-->
<!--#include file="body/main_news.asp"-->
<!--#include file="body/main_teach.asp"-->
<!--#include file="body/main_achieve.asp"-->
<!--#include file="body/main_diary.asp"-->
<!--#include file="body/main_summary.asp"-->
<!--#include file="body/main_flink.asp"-->
<!--#include file="body/main_body.asp"-->
<!--#include file="body/foot.asp"-->
<%
stats="首頁"
dim founderr,errmsg
founderr=false
errmsg=""
if request("page")<>"" then
if not isInteger(request("page")) then
founderr=true
errmsg=errmsg+"<br>"+"<li>非法的日記id參數(shù)。"
end if
end if
if founderr then
call diserror()
response.end
else
sql="select newscount,achievecount,summarycount,friendlinkcount,teachcount from allcount"
set rs=conn.execute(sql)
newscount=rs("newscount")
achievecount=rs("achievecount")
teachcount=rs("teachcount")
summarycount=rs("summarycount")
friendlinkcount=rs("friendlinkcount")
rs.close
set rs=nothing
call top()
call main_body()
call endpage()
end if
%>
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -