?? announce.asp
字號:
<!-- #include file="conn.asp" -->
<!-- #include file="inc/char.asp" -->
<!-- #include file="inc/const.asp" -->
<!-- #include file="chkuser.asp" -->
<!--#include file="inc/theme.asp"-->
<!--#include file="inc/Form.asp"-->
<%
rem ----------------------
rem ------主程序開始------
rem ----------------------
dim boardID
dim rs,sql
dim boardstat
boardid=request("boardid")
if BoardID="" or not isInteger(BoardID) then
BoardID=1
else
BoardID=clng(BoardID)
if err then
BoardID=1
err.clear
end if
end if
select case boardskin
case 1
boardstat="常規論壇,只允許<a href=reg.asp><font color="&TableContentcolor&">注冊會員</a>發言"
case 2
boardstat="開放論壇,允許所有人發言"
case 3
boardstat="評論論壇,壇主和版主允許發言,其他<a href=reg.asp><font color="&TableContentcolor&">注冊用戶</font></a>只能回復"
if not(boardmaster or master) then
Founderr=true
Errmsg=Errmsg+"<br>"+"<li>評論論壇,壇主和版主允許發言,其他<a href=reg.asp><font color="&TableContentColor&">注冊用戶</font></a>只能回復"
end if
case 4
boardstat="精華區,只允許版主和壇主發言和操作"
if not(boardmaster or master) then
Founderr=true
Errmsg=Errmsg+"<br>"+"<li>精華區,只允許版主和壇主發言和操作"
end if
case 5
boardstat="認證論壇,除壇主和版主外,其他<a href=reg.asp><font color="&TableContentColor&">注冊用戶</font></a>登陸論壇需要認證"
if membername="" then
founderr=true
Errmsg=Errmsg+"<br>"+"<li>本論壇為認證論壇,請<a href=login.asp>登陸</a>并確認您的用戶名已經得到管理員的認證后進入。"
else
if chkboardlogin(boardid,membername)=false then
founderr=true
Errmsg=Errmsg+"<br>"+"<li>本論壇為認證論壇,請確認您的用戶名已經得到管理員的認證后進入。"
end if
end if
case 6
boardstat="正規論壇,只有<a href=login.asp><font color="&TableContentColor&">登陸用戶</a>才能瀏覽論壇并發言"
if membername="" then
Founderr=true
Errmsg=Errmsg+"<br>"+"<li>正規論壇,只有<a href=login.asp><font color="&TableContentColor&">登陸用戶</a>才能瀏覽論壇并發言"
end if
end select
stats=""&boardtype&"發言"
if founderr then
call nav()
call headline(2)
call error()
else
call nav()
call headline(2)
call showForm()
end if
call endline()
rem ----------------------
rem ------主程序結束------
rem ----------------------
%>
<!--#include file="footer.asp"-->
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -