<%@ LANGUAGE=VBScript codepage ="936" %>
<%Response.Expires=0
Response.ExpiresAbsolute = Now() - 1
Response.AddHeader "Pragma","No-Cache"
Response.AddHeader "Cache-Control","Private"
Response.CacheControl = "No-Cache"

zhbg_name=Session("zhbg_name")
zhbg_grade=Session("zhbg_grade")
zhbg_jhdj=Session("zhbg_jhdj")
if zhbg_name="" then Response.Redirect "../../error.asp?id=440"
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,2,2
hyrmb=rs("会员金卡")
taiqiudian=rs("金币")
rs.close
set rs=nothing
conn.close
set conn=nothing

%>
<html>
<link href="../../css.css" rel="stylesheet" type="text/css"><title>娱乐金币</title>
<body topmargin="8" >
<table width="466" border="3" align="center" cellpadding="8" cellspacing="8" bordercolor="#cccccc">
  <tr>
    <td height="55" align="center" > 
<script language="JavaScript">
function load()
{var name=navigator.appName
var vers=navigator.appVersion
if(name=="Netscape")
{window.location.reload()
}else
{history.go(0)
}}
</script>
      <a href="javascript:load()">【刷新】</a> <a href="javascript:history.go(-1)">【返回】</a><br>
      <br>
      欢迎<font color=blue><%=zhbg_name%></font>光临娱乐金币转换处！ </td>
  </tr>
          <tr> 
            <td valign="top" height="8" > 
              <div align="center">
<%if hyrmb>0 then%>
  <form method="POST" action="rmbzjin.asp" name="af" onSubmit="bb.disabled=1">
  <div align="center">现金：<%=hyrmb%>元，现金转换金币<%=hyrmb*10%>个<br>
    <input type="text" name="input" size="10" maxlength="5">
    <input type="submit" value="转换" name="bb" class="p9">
  </div>
</form>
<%else%>
会员金卡为0不能转换<br><br>
<%end if%>
<%if taiqiudian>0 then%>
  <form method="POST" action="jinzrmb.asp" name="aff" onSubmit="bbb.disabled=1"> 
  <div align="center">金币：<%=taiqiudian%>个，金币转换现金<%=int(taiqiudian/10)%>元<br>
    <input type="text" name="input1" size="10" maxlength="5">
    <input type="submit" value="转换" name="bbb" class="p9" >
  </div>
</form>
<%else%>
金币为0不能转换<br><br>
<%end if%>
               娱乐金币
                </div>
            </td>
          </tr>
          <tr> 
            
    <td align="center" valign="middle" > 
      <p>在这里你可以将金卡转换成金币，金币可以购买很多东西！<br>
      转换：1元/10个金币!同样您也可以将金币转换成金卡！</p>
            </td>
<tr>    
    <td colspan="2" align="center" ><%=Application("zhbg_chatroomname")%>
    </td>    
</tr> 
</table>


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