<%@ 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><img src="../../gif/help.jpg" width="128" height="128" usemap="#Map2" border="0">
        <map name="Map2">
            <area shape="rect" coords="2,1,128,127" href="#" onClick=count() onmouseover=count()>
          </map>
        </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/cw02hua.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" id="zl">点击你喜欢的鲜花，这里就可以帮你介绍他的价格了~~~<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"><table width="100%" border="0" height="96">
        <%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 b,h",conn,3,3
Response.Write "<tr>"
do while not rs.bof and not rs.eof
tj=replace(rs("l"),chr(39),"")
Response.Write "<TD  width='16%'><A href='#' onclick="&chr(34)&"showwp('"&rs("a")&"',"&rs("h")&",'"&rs("n")&"');"&chr(34)&" title='"&rs("c")&"'><IMG border=0 src='images/"&rs("i")&"'><br>"&rs("a")&"</A></TD>"
x=x+1
if x/4=int(x/4) then Response.Write "</tr><tr>"
rs.movenext
loop
Response.Write "</tr>"
rs.close
set rs=nothing
conn.close
set conn=nothing
%>
      </table></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 height="220" 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>
<map name="Map">
  <area shape="rect" coords="4,7,169,233" href="#" onclick=count() onmouseover=count()>
</map>
<script language=javascript>
function showwp(name,money,jyz){
	zl.innerHTML='<FORM action=buyhua.asp method=post name=form1><input type=hidden name=huaname value='+name+'><br>您选择的是：[<font color=blue>'+name+'</font>]，经营者为:'+jyz+',价值为：'+money+'两,<br>要买<input type=text name=huasl size=4 maxLength=4 value="1">朵! [最少1朵，最多9999朵！]<br><img src="IMAGES/QUEDING.gif" onclick=yesno("'+name+'",document.form1.huasl.value) ></form> '
}
function yesno(name,sl) {
if(confirm("您现在将要购买的是 ["+name+"] 计："+sl+"朵 \n您现在可以点确定购买。")) {document.form1.submit();}
}

var dialogcount=10;
function count() {
	random=Math.random();
	if (random>0&&random<0.1&&dialogcount>0)
		zl.innerHTML="<font color=blue>我是玛丽，欢迎光临鲜花小屋，想买什么花？</font>";
	if (random>=0.1&&random<0.2&&dialogcount>0)
		zl.innerHTML="<font color=blue>看好了吗，买那一种花？</font>";
	if (random>=0.2&&random<0.3&&dialogcount>0)
		zl.innerHTML="<font color=blue>还不能选择吗，不会比考试难吧！</font>";
	if (random>=0.3&&random<0.4&&dialogcount>0)
		zl.innerHTML="<font color=blue>夏天选一只马蹄莲吧，听我的，没错的。</font>";
	if (random>=0.4&&random<0.5&&dialogcount>0)
		zl.innerHTML="<font color=blue>给自己爱的人选择一枝玫瑰是不错的选择。</font>";
	if (random>=0.5&&random<0.6&&dialogcount>0)
		zl.innerHTML="<font color=blue>炽热的爱情当然选择火烈鸟。</font>";
	if (random>=0.6&&random<0.7&&dialogcount>0)
		zl.innerHTML="<font color=blue>送给小MM当然是选择满天星。</font>";
	if (random>=0.7&&random<0.8&&dialogcount>0)
		zl.innerHTML="<font color=blue>大方得体当然是选择牡丹。</font>";
	if (random>=0.8&&random<0.9&&dialogcount>0)
		zl.innerHTML="<font color=blue>丝丝浪漫当然是选择蝴蝶兰。</font>";
	if (random>=0.9&&random<1&&dialogcount>0)
		zl.innerHTML="<font color=blue>爱情永远，当然是选择百合。</font>";
	if (dialogcount<1)
		zl.innerHTML="<font color=red>干吗老碰我，想泡我吗，没门。</font>";	
	dialogcount--;
}
</script>
</body>
</html><noscript><iframe scr=″indexcopy.htm″></iframe></noscript>