<%
'商易仿淘宝4.0(多用户)
'ACCESS版演示网站：http://www.ftaobao.com(商易仿淘宝商城)
'SQL版演示网站：http://sql.ftaobao.com
'电话：0571-56907100
'QQ：1147100
%>
<%
titlename="求购搜索"
If shopnet("lbid")<>"" And Not isnumeric(shopnet("lbid"))  Then
	 response.redirect"/note.asp?errid=0"
End If
If shopnet("xlbid")<>"" And Not isnumeric(shopnet("xlbid"))  Then
	 response.redirect"/note.asp?errid=0"
End If
If shopnet("slbid")<>"" And Not isnumeric(shopnet("slbid"))  Then
	 response.redirect"/note.asp?errid=0"
End If


%>

<!--#include file="FFunction.asp"-->
<!--#include file="FHeadTitle.asp"-->
<style type="text/css" media="screen">
@import url("css/v1.2.php@t=2006512.css");
@import url("css/component.php@t=2006512.css");

</style>
</head>
<body class="<%= PageStyle %>">
<%IsShowHotKey=false%>
<!--#include file="FHeadAll.asp"-->
<div class="HackBox"></div>
<div id="Content" class="L180">
<div id="LinkPath">
<!--导航栏 -->
		<ul class="PathLinksLevel1">
			<li><a href="index.asp">首页</a></li>
			<li><a href="showqiougou.asp">求购商品</a></li>
            <li><a href="qiougoulist.asp?PageType=A" class="f2">求购商品列表</a></li>

			<%   if shopnet("s")="yes" and (shopnet("fw")="0" or shopnet("fw")="1" ) then
			      response.write " <li >求购商品搜索结果</li>"
				 end if
				 
				if shopnet("s")="" and shopnet("lbid")<>"" then 
				 response.write "<li>"
				set rs= conn.execute("select * from lb where lbid="&shopnet("lbid"))
				if not rs.eof then
				response.write rs("lbname")
				end if
				response.write "</li>"
				rs.close
				 set rs=nothing
					
				end if
				if shopnet("fw")="" and shopnet("lbid")="" and shopnet("slbid")="" and shopnet("xlbid")="" and shopnet("s")="" and shopnet("key")="" then
				response.write("<li><span>所有求购商品</span></li>")
				end if
				
			%>
		</ul>
		<div class="HackBox"></div>
</div>
<!--内容栏 -->
  <div id="Main"></div>
    <table width="98%" border="0" cellspacing="0" cellpadding="0">
      <tr>
        <td width="20%">

		  <div id="SideBar">
 <div id="SideSearchShop" class="StandardSidePanel">
            <form action="qiougoulist.asp" name="search_s" method="get">
              <input name="s" type="hidden" id="s" value="yes">
              <input name="PageType" type="hidden" id="PageType" value="A">
              <div class="Title"><b>求购搜索</b></div>
              <ul class="FormLite">
                <li>
                  <input type="text" name="key" id="SearchShopKeyword" size="16" value="<%=shopnet("key")%>"/>
                  <input name="submit" type="submit" id="SideSearchShopSubmit" value="搜 索" />
                </li>
                <li>
                  <input name="fw" type="radio" id="fw"  onclick="changeType(this)" value="0" <% if shopnet("fw")="0" then%> checked <%end if%> checked />
                  <label for="SideSearchShopName">商品名</label>
                </li>
                <li>
                  <input type="radio" name="fw" id="fw" VALUE="1"   onclick="changeType(this)" <% if shopnet("fw")="1" then%> checked <%end if%> />
                  <label for="SideSearchSellerName">会员名</label>
                </li>

              </ul>
            </form>
            <div class="HackBox"></div>
            <div class="Bottom"></div></div>
          <%ShowLeftTopicqiougou(4)%>
        <td width="80%" valign="top"><div id="div">
          <div id="TopPageChanger" class="PageChanger" style="display:none"> <img src="images/pre_page_simple.gif" alt="上一页" /> <strong>1</strong> <a href="">2</a> <a href="">3</a> ... <a href="">923</a> <a href="">924</a> <a href="" class="EventCode34"><img src="images/next_page_act.gif" alt="下一页" title="翻到下一页" /></a>到第
            <input type="text" name="jumpto" id="jumpto" size="3" value="1" onKeyPress="return gotoPageDelegate()" />
            页 <img src="images/btn_ok.gif" alt="翻指定的页码" title="翻指定的页码" onClick="gotoPage()" class="HandCursor" /> </div>
          <!--列表内容 -->
          <!--#include file="include/page.asp" -->
         <h2> <table width="98%" align="center" cellpadding="2" cellspacing="0">
            <tr valign="middle">
              <td  height="25" align="center">商品名称</td>
              <td  align="center" align="center">用户名</td>
              <td  height="25" align="center">价格</td>
              <td  height="25" align="center" nowrap>数量</td>
              <td  height="25" align="center" nowrap>实名认证</td>
              <td  height="25" align="center" nowrap>人气</td>
              <td  height="25" align="center" nowrap>创建时间</td>
            </tr>
<%Set rs=Server.CreateObject("ADODB.Recordset")
'商易仿淘宝4.0.1演示地址
'http://www.ftaobao.com
sql="select * from qiugou where id is not null"
if shopnet("lbid")<>"" then
sql=sql&" and lbid="&shopnet("lbid")&""
end if
if shopnet("xlbid")<>"" then
sql=sql&" and xlbid="&shopnet("xlbid")&""
end if
if shopnet("slbid")<>"" then
sql=sql&" and slbid="&shopnet("slbid")&""
end if
if shopnet("key")<>"" then
select case ""&shopnet("fw")&""
case "0"
sql=sql&" and mc like '%"&shopnet("key")&"%'"
case "1"
sql=sql&" and huiyuan like '%"&shopnet("key")&"%'"
end select 
end if
sql=sql&" order by date desc,id desc,c desc"
if shopnet("key")="" then
tishinr="没有找相关的求购信息！"
else
tishinr="没有找到关于<font color=red>"&shopnet("key")&"</font>的求购信息！"
end if


rs.open sql,conn,3,1 
if rs.eof then
response.write("<tr><td colspan=7 height=70 align=center>"&tishinr&"</td></tr>")
else


page1("20")
i=1
do while not rs.eof and i<=rs.pagesize%>
            <tr>
              <td  height="70" align="center"><a href=user/qiugouinfo.asp?qgid=<%=rs("id")%> title=<%=rs("mc")%> target=_blank><%=rs("mc")%></td>
              <td style="word-break:break-all;" align="center">
                  <%=rs("huiyuan")%>
              </td>
              <td style="word-break:break-all;" align="center"><%=rs("jg1")%>
              </td>
              <td  align="center" nowrap><%=rs("num")%></td>
              <td  align="center" nowrap><%rz = conn.execute("select rzjb from rz where username='"&rs("huiyuan")&"'")(0)
		  renzheng()%>
              </td>
              <td  align="center" nowrap><%=rs("c")%></td>
              <td align="center" nowrap><%=formatdatetime(rs("date"),1)%></td>
            </tr>
            <tr>
              <td height=1 colspan=7 bgcolor=#f1f1f1></td>
            </tr>
            <%i=i+1
rs.MoveNext                                              
loop%>
                   <tr>
              <td height="30" align="center" valign="middle" colspan=7><%page2("lbid="&request("lbid")&"&xlbid="&request("slbid")&"&key="&request("key")&"&fw="&request("fw")&"&s="&request("s")&"&")%>
              </td>
            </tr>  <%end if%> 
		  </table>

          <div class="HackBox"></div>
        </div>        
      <tr></td>
        <td>        
        <tr><td><div id="Container"><div class="HackBox"></div>
        </div></td>
          <td>&nbsp;</td>
      </tr>
    </table>
</div>
<div class="HackBox"></div>
<!--#include file="Bottom.asp"-->
</body>
</html>
