<!-- #include file="inc/const.asp" -->
<%
Response.ContentType="text/html"
Response.Charset="GB2312"
'Server.ScriptTimeout=15 '连接超时最大时间
dim Conn,Connstr,connstr2
Connstr=Application("bbs_connstr")
connstr2=Application("cwjh_usermdb")
nickname=session("cwjh_name")
bbsmyid=Session("cwjh_id")
grade=session("cwjh_grade")
if nickname="" then grade=0
Set Conn=Server.CreateObject("ADODB.Connection")
Set rs = Server.CreateObject("ADODB.Recordset")
Set rs1 = Server.CreateObject("ADODB.Recordset")
Conn.Open Connstr
'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
sub top
%>
<HTML>
<META http-equiv=Content-Type content=text/html;charset=gb2312>
<link href=images/bbs.css rel=stylesheet>
<base onmouseover="window.status='<%=clubname%>　<%=cluburl%>';return true">
<body topmargin=0>
<TABLE cellSpacing=0 cellPadding=1 width=100% align=center border=0><TBODY><TR>
<TD bgColor=a4b6d7 height=2><TABLE style=COLOR:000000;BORDER-COLLAPSE:collapse cellSpacing=0 cellPadding=4 width=100% border=0>
<TBODY><TR><TD><FONT color=#ffffff>&gt;&gt;欢迎您 <%=nickname%></FONT>
<FONT color=#ffffff>
<%if nickname="" then%>
| <A title=登录江湖或论坛 href=../><FONT color=#FFFFFF>登录</FONT></A>
<%end if%>
| <a title="查看在线会员资料" href="online.asp"><FONT color=ffffff>在线人员</FONT></a>
| <a href=shownew.asp><FONT color=#ffffff target="online_window">最新贴子</FONT></a>
| <a href=hot.asp><FONT color=#ffffff target="online_window">最新新门</FONT></a>
| <A href="http://bbs.cqjk.net/bbs" target='_blank'><FONT color=ffffff>酷行天下</FONT></A>
| <a href='search.asp?forumid=<%=Request("forumid")%>'><FONT color=#ffffff>搜索</FONT></a>
| <a href=help.asp><FONT color=#ffffff target="online_window">帮助</FONT></a>
<%if grade=10 then%>
| <A href=recycle.asp><FONT color=ffffff>回收站</FONT></A>
<%end if %>
</TD><TD></TD></TR></TBODY></TABLE></TD></TR></TBODY></TABLE>
<%end sub
'''''''''''''''''''''''''''''
sub succeed(message)
top
%>
<title><%=succtitle%></title>
<table width=100% align="center" border="0">
<tr>
<td vAlign="top" width="30%">
</td>
<td vAlign="center" align="top">&nbsp;<font color=#000000><img src="images/closedfold.gif" width="14" height="14">　<a href="index.asp"><%=clubname%></a><br>
&nbsp;<img height=15 src="images/coner.gif" width=15><img height=14 src="images/closedfold.gif" width=14>　<%=succtitle%> </font></td>
</tr>
</table>
<br>
<table cellSpacing="0" cellPadding="0" width="100%" align="center" border="0">
<tr>
<td bgColor="#a4b6d7" height="106">
<table cellSpacing="1" cellPadding="6" width="100%" border="0">
<tr>
<td align="middle" bgColor="#c4d4e5" height="20">
<font color="#000000"><b>状态：<%=succtitle%></b></font></td>
</tr>
<tr bgColor="#ffffff">
<td vAlign="top" align="left" height="122">
<b>&nbsp;</b><table cellSpacing="0" cellPadding="5" width="100%" border="0">
<tr>
<td width="83%" valign="top">
<b><span id=yu>3</span><a href=javascript:countDown></a>秒钟后系统将自动返回...</b><ol><%=message%></ol>
</td>
<td width="17%">
<img height="97" src="images/succ.gif" width="95"></td>
</tr>
</table>
</td>
</tr>
</table>
</td>
</tr>
</table>
</font>
</font>
<script>function countDown(secs){yu.innerText=secs;if(--secs>0)setTimeout("countDown("+secs+")",1000);}countDown(3);</script>
<%
htmlend
end sub
''''''''''''''''''''''''''''''
sub error(message)
top
%>
<title>错误信息</title>
<table width=100% align="center" border="0">
<tr>
<td vAlign="top" width="30%">
</td>
<td vAlign="center" align="top">&nbsp;<font color=#000000><img src="images/closedfold.gif" width="14" height="14">　<a href="index.asp"><%=clubname%></a><br>
&nbsp;<img height=15 src="images/coner.gif" width=15><img height=14 src="images/closedfold.gif" width=14>　错误：:::错误信息:::</font></td>
</tr>
</table>
<br>
<table cellSpacing="0" cellPadding="0" width="100%" align="center" border="0">
<tr>
<td bgColor="#a4b6d7" height="106">
<table cellSpacing="1" cellPadding="6" width="100%" border="0">
<tr>
<td align="middle" bgColor="#c4d4e5" colSpan="2" height="20">
<font color="#000000"><b>错误：:::错误信息:::</b></font></td>
</tr>
<tr bgColor="#ffffff">
<td vAlign="top" align="left" colSpan="2" height="122">
<b>&nbsp;</b><table cellSpacing="0" cellPadding="5" width="100%" border="0">
<tr>
<td width="83%" valign="top">
<b>关于错误的可能原因：</b><ol>
<%=message%></ol>
</td>
<td width="17%">
<img height="97" src="images/err.gif" width="95"></td>
</tr>
</table>
</td>
</tr>
<tr align="middle" bgColor="#ffffff">
<td vAlign="center" colSpan="2" height="2">
<input onclick=history.back(-1) type="submit" value=" &lt;&lt; 返 回 上 一 页 " name="Submit" >
</td>
</tr>
</table>
</td>
</tr>
</table>
<%
htmlend
end sub
sub error2(message)
%>
<META http-equiv=Content-Type content=text/html;charset=gb2312><script>alert('<%=message%>');history.back();</script><script>window.close();</script>
<%
Conn.close
set rs=nothing
set rs1=nothing
set conn=nothing
response.end
end sub
''''''''''''''''''''''''''''''
sub htmlend
%>
</BODY></HTML>
<%
Conn.close
set rs=nothing
set rs1=nothing
set conn=nothing
response.end
end sub
%>