<%
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
styleid="skin/"&Cssstyleid&"/images"
Response.Write""&VbNewLine
Response.Write" "&TitleStr&""&VbNewLine
Response.Write" "&VbNewLine
Response.Write" "&VbNewLine
Response.Write" "&VbNewLine
Response.Write" "&VbNewLine
Response.Write" "&VbNewLine
Response.Write" "&VbNewLine
Response.Write""&VbNewLine
%>
<%
dim mode
mode=Request.Cookies(prefix&"1")("bbsmode")
if mode=2 then
%>
<%end if%>
<%
if lguserid<>"" then
dim newnum
newnum=conn.execute("select count(id) from sms where touserid="&lguserid&" and new=true")(0)
if newnum>0 then
Response.Write"