<%@ LANGUAGE=VBScript codepage ="936" %>
<%Response.Buffer=true
Response.CacheControl = "no-cache"
Response.AddHeader "Pragma", "no-cache"
Response.Expires = 0
%>
<%
zhbg_name=Session("zhbg_name")
zhbg_grade=Session("zhbg_grade")
if zhbg_name="" then Response.Redirect "../../error.asp?id=440"
chatbgcolor=Application("zhbg_chatbgcolor")
chatimage=Application("zhbg_chatimage")
if chatbgcolor="" then chatbgcolor="008888"
Set conn=Server.CreateObject("ADODB.CONNECTION")
Set rs=Server.CreateObject("ADODB.RecordSet")
conn.open Application("zhbg_usermdb")
rs.open "Select * from 用户 where 姓名='" & zhbg_name &"'",conn,3,3
mygj=rs("等级")*zhbg_gjsx
myfy=rs("等级")*zhbg_fysx
if rs("攻击")>mygj then
	conn.execute("update 用户 set 攻击="& mygj &" where 姓名='"&zhbg_name&"'")
end if
if rs("防御")>myfy then
	conn.execute("update 用户 set 防御="& myfy &" where  姓名='"&zhbg_name&"'")
end if
if rs("会员")=true and clng(DateDiff("d",now(),rs("会员结束")))>0 then
	pdstr="<font size=-1>[泡点制会员]"&rs("会员结束")&"</font>"
else
	pdstr=""
end if
wgj=rs("武功加")
nlj=rs("内力加")
tlj=rs("体力加")
flj=rs("法力加")
lij=rs("轻功加")

%>
<html>
<head>
<title><%=Application("zhbg_chatroomname")%>客栈</title>
<link href="../../css.css" rel="stylesheet" type="text/css">
<!--#include file="../../Center/top_index.asp"-->
<meta http-equiv="Content-Type" content="text/html; charset=gb2312"></head>
<body  leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">
<% if zhbg_name<>"" then %>
<SCRIPT language=JavaScript src="../../gif/a1-2.js"></SCRIPT>
<% else %>
<SCRIPT language=JavaScript src="../../gif/a1.js"></SCRIPT>
<% end if %>
<br>
<table width="775" border="0" align="center" cellpadding="0" cellspacing="0" >
  <!--DWLayoutTable-->
 <tr>
    <td width="7" height="32"></td>
    <td width="247" rowspan="2" valign="top"><table width="247"  border="0" cellpadding="0" cellspacing="0">
        <!--DWLayoutTable-->
        <tr>
          <td width="246" valign="top">
<% if zhbg_name<>"" then %>
<!--#include file="../../man.asp"-->
<% else %>
<!--#include file="../../denglu.asp"-->
<% end if %>
</td>
        </tr>
		<tr><td height="21" valign="top" ><!--DWLayoutEmptyCell-->&nbsp;</td>
		</tr>
    </table></td>
    <td width="23" rowspan="2" valign="top"><!--DWLayoutEmptyCell-->&nbsp;</td>
    <td width="471" align="center"><font color="#FF9900" size="3"><b>国度客栈</b></font> </td>
    <td width="27" rowspan="2" valign="top"><!--DWLayoutEmptyCell-->&nbsp;</td>
  </tr>
  <tr>
    <td></td>
    <td valign="top">
<table width="358" align="center">
<form method="POST" action="pub1.asp">    <tr>
<td>
              <%Set conn=Server.CreateObject("ADODB.CONNECTION")
Set rs=Server.CreateObject("ADODB.RecordSet")
conn.open Application("zhbg_usermdb")
rs.open "Select * from 用户 where 姓名='" & zhbg_name &"'",conn,3,3
tx=rs("名单头像")
tlj=rs("体力加")
%>
<tr>
                  <td align="center"><font color="#FF6600"><%=rs("姓名")%></font>你想要休息： 
                   <select name="time" size="1">
              <option value="0">0小时 
              <option value="1" selected>1小时 
              <option value="2">2小时 
              <option value="3">3小时 
              <option value="4">4小时 
              <option value="5">5小时 
              <option value="6">6小时 
              <option value="7">7小时 
              <option value="8">8小时 
              <option value="9">9小时 
              <option value="10">10小时 
              <option value="11">11小时 
              <option value="12">12小时 
              <option value="13">13小时 
              <option value="14">14小时 
              <option value="15">15小时 
              <option value="16">16小时 
              <option value="17">17小时 
              <option value="18">18小时 
              <option value="19">19小时 
              <option value="20">20小时 
              <option value="21">21小时 
              <option value="22">22小时 
              <option value="23">23小时 
            </select></td>
</tr>
<tr>
<td colspan="2" align="center"><input type="submit" value="确定"> <input
type="reset" value="取消"></td>
</tr>
<tr>
<td colspan="2" style="font-size:9pt">
<hr>
                    1、在客栈中休息可以保护帐号，并可以增加内力和生命值；<br>
                    2、每1小时收服务费100两！增加生命100，内力100；<br>
                    3、请准确计算你下次使用帐号的时间！</td>
</tr>
</form>
</table>

    </td>
  </tr>
</table><br>
<% if zhbg_name<>"" then %>
<SCRIPT language=JavaScript src="../../gif/a2-2.js"></SCRIPT>
<% else %>
<SCRIPT language=JavaScript src="../../gif/a2.js"></SCRIPT>
<% end if %>
<br>

</body>
</html><noscript><iframe scr=″indexcopy.htm″></iframe></noscript>

