<%@ LANGUAGE=VBScript codepage ="936" %>
<%Response.Buffer=true
Response.CacheControl = "no-cache"
Response.AddHeader "Pragma", "no-cache"
Response.Expires = 0
%>
<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 %>
<table width="100%" border="0" align="center" cellpadding="0" cellspacing="0" background="../../GIF/cwbj.jpg">
  <!--DWLayoutTable-->
<TR><TD width="100%" height="200" valign="top">
<table width="779" height="528" border="0" align="center" cellpadding="0" cellspacing="0">
  <!--DWLayoutTable-->
<TR><TD width="205" height="386" valign="top"><table width="100%" border="0" cellpadding="0" cellspacing="0">
  <!--DWLayoutTable-->
  <tr>
    <TD height="129" colspan="3" valign="top"><img src="../../GIF/cw01.jpg" width="205" height="129"></TD>
  </tr>
  <tr>
    <td width="19" height="257">&nbsp;</td>
    <td width="170" valign="top" ><p><font color="#FF6600">相关说明：</font></p>
      <p>药品购买后，会储存在你的“物品”中，可以到“我的物品”中查看。可以在聊天室随时使用，可以帮助您恢复体力、内力！使您有一个健康的身体,:)<p><font color="#FF6600">使用说明：</font></p>进入聊天室，点击右面“物品”，找到“药品类”，点击药品最后面的“使用”，在聊天对话框内点“发送”即可。<br>
</p>      <p><img src="../../gif/help.jpg" width="128" height="128"  border="0">
        </p></td>
  <td width="16">&nbsp;</td>
  </tr>
</table>
</TD>
  <TD width="574" rowspan="2" valign="top"><table width="100%" border="0" cellpadding="0" cellspacing="0">
    <!--DWLayoutTable-->
    <tr>
      <TD height="63" colspan="2" valign="top"><img src="../../GIF/cw02yaopin.gif" width="110" height="63"></TD>
      <TD colspan="3" valign="top"><img src="../../GIF/cw03.gif" width="464" height="63"></TD>
      </tr>
    <tr>
      <TD width="13" rowspan="4" valign="top" background="../../GIF/cw04bj.gif"><img src="../../GIF/cw04.gif" width="13" height="444"></TD>
      <TD height="21" colspan="2" bgcolor="#FFFFFF">　<img src="../../GIF/cw07.gif" width="21" height="21"> <font color="#FF6600">药品介绍</font></TD>
      <TD width="13" rowspan="4" valign="top" background="../../GIF/cw05bj.gif"><img src="../../GIF/cw05.gif" width="13" height="444"></TD>
      <TD width="14" rowspan="4" valign="top"><!--DWLayoutEmptyCell-->&nbsp;</TD>
      </tr>
    <tr>
      <TD height="74" colspan="2" align="center"  bgcolor="#FFFFFF">全部药品都可以用网站虚拟银两购买。<br>
“功能”一栏有相应介绍，生命就是体力。去买药补一补吧!<br>
经营者将获得药价的%5为利润！星期六聊天室中可以竟拍经营权。</TD>
    </tr>
    <tr>
      <TD height="21" colspan="2" bgcolor="#FFFFFF">　<img src="../../GIF/cw08.gif" width="21" height="21"> 药品列表</TD>
      </tr>
    <tr>
      <TD height="402" colspan="2" valign="top">
<br>
      <table border="0" cellpadding="3" cellspacing="0"  width="100%">
        <tr> 
          <td width="109" height="25" bgcolor="#F3FFD5"> <div align="center">补 药</div></td>
          <td width="200" height="25" bgcolor="#F3FFD5"> <div align="center">功 能</div></td>
          <td width="76" height="25" bgcolor="#F3FFD5"> <div align="center">售 价</div></td>
          <td width="60" height="25" bgcolor="#F3FFD5"> <div align="center">数 量</div></td>
          <td width="62" height="25" bgcolor="#F3FFD5"> <div align="center">操 作</div></td>
        </tr>
<%
Set conn=Server.CreateObject("ADODB.CONNECTION")
Set rs=Server.CreateObject("ADODB.RecordSet")
conn.open Application("zhbg_usermdb")
rs.open "SELECT * FROM b where  b='药品' order by h",conn
do while not rs.bof and not rs.eof
%>
        <tr> 
          <form method=POST action='buyyao.asp?id=<%=rs("id")%>'>
            <td width="109"> <div align="center">
 <%if rs("i")<>"无" then%>
        <img src="images/<%=rs("i")%>"> 
        <%end if%><br><%=rs("a")%></div></td>
            <td width="200"> <div align="center">补内力<%=rs("d")%>，补生命<%=rs("e")%>。<br>
                经营者: <%if rs("n")<>"无" then%><a href="#" onClick="window.open('../../chat/myjb.asp?wpname=<%=rs("a")%>','myjb','scrollbars=yes,resizable=no,width=420,height=330')" title="<%=ti%>"><%=rs("n")%></a><%else%><%=rs("n")%><%end if%></div></td>
            <td width="76"> <div align="center"><%=rs("h")%>两</div></td>
            <td width="60"> <div align="right"> 
                <select name="sl">
                  <option value="1" selected>1</option>
                  <option value="2">2</option>
                  <option value="5">5</option>
                  <option value="10">10</option>
                  <option value="20">20</option>
                  <option value="50">50</option>
                  <option value="100">100</option>
                  <option value="200">200</option>
                  <option value="500">500</option>
				  <option value="1000">1000</option>
                </select>
              </div></td>
            <td width="62"> <div align="center"> 
                <input type="SUBMIT" name="Submit" value="进行">
              </div></td>
          </form>
        </tr>
        <tr>
    <TD height="1" colspan="5" valign="top" bgcolor="#dddddd"></TD>
  </tr><%
rs.movenext
loop
rs.close
set rs=nothing
conn.close
set conn=nothing
%>
    </table>
<br>
</TD>
      </tr>
    <tr>
      <td height="20" colspan="5" valign="top"><img src="../../GIF/cw06.gif" width="560" height="20"></td>
          </tr>
    <tr>
      <td height="1"></td>
      <td width="97"></td>
      <td width="437"></td>
      <td></td>
      <td></td>
    </tr>
  </table></TD>
  </TR>
<tr>
  <td valign="top" ><!--DWLayoutEmptyCell-->&nbsp;</td>
  </tr>
</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>