<%
bbsname=application(prefix&"bbsname")
style=application(prefix&"style")
plugin=application(prefix&"plugin")
Cssstyleid=request.cookies(prefix&"1")("styleid")
if Cssstyleid="" then response.redirect"Cookies.asp?action=style"
if style="" then
set rs=conn.execute("select * from style")
do while not rs.eof
style=style&""&rs("stylename")&" "
rs.movenext
loop
set rs=nothing
application(prefix&"style")=style
end if
if plugin="" then
set rs=conn.execute("select * from plugin")
do while not rs.eof
plugin=plugin&""&rs("pluginname")&" "
rs.movenext
loop
set rs=nothing
application(prefix&"plugin")=plugin
end if
dim mode
mode=Request.Cookies(prefix&"1")("bbsmode")
if mode="" then
mode=application(prefix&"automode")
Response.Cookies(prefix&"1")("bbsmode")=mode
Response.Cookies(prefix&"1").Expires=date+365
end if
if mode=1 then
%>
<%=checktitle(bbsname)%>
<%else
response.redirect"main.asp"
%>
<%end if%>