⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 info_left.asp

📁 购物系统(本版为正式商业版
💻 ASP
字号:
<!--
+- o91.com---------------+
? ????????WWW.SNSN.NET????  ?? ??:????  13855119911 QQ:9912515    ?+---------------------+
-->
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<table width="180" border="0" align="center" cellpadding="0" cellspacing="0" background="img/lf_bg.gif">
  <tr>
    <td><img src="/img/lf_img_top.gif" width="180" height="9"></td>
  </tr>
  <tr>
    <td><img src="/img/info_manage.gif" width="180" height="40" border="0"></td>
  </tr>
  <tr>
    <td><img src="/img/lf_directgo_boxtop.gif" width="180" height="8"></td>
  </tr>
  <tr>
    <td background="/img/lf_directgo_boxbg.gif" width="180" height="23">
      <table width="90%" border="0" align="center" cellpadding="0" cellspacing="0">
        <tr>
          <td height="23"><div align="center"><span class="b14"><font color="#FF6600"><a href="supply.asp?action=my">我的信息</a></font></span> | <span class="b14"><font color="#FF6600"><a href="info_add.asp">发布供求</a></font></span></div></td>
        </tr>
        <tr>
          <td height="23"> <div align="center"><span class="b14"><font color="#FF6600"><a href="supply.asp?action=gong">供应信息</a></font></span> | <span class="b14"><font color="#FF6600"><a href="supply.asp?action=qiu">求购信息</a></font></span></div></td>
        </tr>
        <tr>
          <td height="23"> <div align="center"><span class="b14"><font color="#FF6600"><a href="supply.asp?action=hot">热门信息</a></font></span> | <span class="b14"><font color="#FF6600"><a href="supply.asp?action=tj">推荐信息</a></font></span></div></td>
        </tr>
    </table></td>
  </tr>
  <tr>
    <td><img src="/img/lf_directgo_boxbottom.gif" width="180" height="6"></td>
  </tr>
</table><%if inc15=1 then%>
<table width="180" border="0" align="center" cellpadding="0" cellspacing="0" background="/img/lf_bg.gif" class="sm_gray">
  <tr>
    <td height="12"></td>
  </tr>
  <tr>
    <td><img src="/img/gq_lf_tj.gif" width="180" height="40"></td>
  </tr>
  <tr>
    <td>
      <!-- best 10 咆胶飘绰 28byte(..)器窃  -->
    </td>
  </tr>
</table>
<table width="180"  border="0" align="center" cellpadding="0" cellspacing="0" background="/img/lf_bg.gif">
  <tr>
    <td><table width="100%"  border="0" align="center" cellpadding="0" cellspacing="0">
        <tr>
          <td><%
				set rs=server.createobject("adodb.recordset")
		  rs.open "select top "&inc16&" id,tit,lls from shop_infomsg order by id desc",conn,1,1
		if rs.recordcount=0 then 
		%>
              <table width="80%" border="0" cellspacing="0" cellpadding="5" align="center">
                <tr>
                  <td height="26" align=center>暂无供求推荐</td>
                </tr>
              </table>
              <%else%>
              <table width="100%" border="0" cellspacing="0" cellpadding="0">
              </table>
              <table width="160" border="0" align="center" cellpadding="0" cellspacing="0">
                <%
			while not rs.eof
			%>
                <tr>
                  <td height="22"><img src="/img/go.gif" width="15" height="15"><a href=show.asp?n=<%=rs("id")%> title=此信息已被浏览<%=rs("lls")%>次>
                    <%if len(trim(rs("tit")))>11 then
	response.write left(trim(rs("tit")),11)&""
	else
	response.write trim(rs("tit"))
	end if%>
                  </a></td>
                </tr>
                <tr>
                  <td height="1" colspan="2" class="td_margin1"><img src="/img/skin<%=cssid%>/x.gif" width="149" height="1"></td>
                </tr>
                <%
			rs.movenext
		    wend
			%>
              </table>
              <%
		end if
		rs.close
		set rs=nothing
		%></td>
        </tr>
    </table></td>
  </tr>
</table>
<%end if%>
<%if inc17=1 then%>
<table width="180" border="0" align="center" cellpadding="0" cellspacing="0" background="/img/lf_bg.gif" class="sm_gray">
  <tr>
    <td height="12"></td>
  </tr>
  <tr>
    <td><img src="/img/gq_lf_qg.gif" width="180" height="40"></td>
  </tr>
  <tr>
    <td>
      <!-- best 10 咆胶飘绰 28byte(..)器窃  -->
    </td>
  </tr>
</table>
<table width="180"  border="0" align="center" cellpadding="0" cellspacing="0" background="/img/lf_bg.gif">
  <tr>
    <td><table width="100%"  border="0" align="center" cellpadding="0" cellspacing="0">
        <tr>
          <td><%
				set rs=server.createobject("adodb.recordset")
		  rs.open "select top "&inc18&" id,tit,lls from shop_infomsg where   gq='求购' order by id desc",conn,1,1
		if rs.recordcount=0 then 
		%>
              <table width="80%" border="0" cellspacing="0" cellpadding="5" align="center">
                <tr>
                  <td height="26" align=center>暂无求购信息</td>
                </tr>
              </table>
              <%else%>
              <table width="100%" border="0" cellspacing="0" cellpadding="0">
              </table>
              <table width="160" border="0" align="center" cellpadding="0" cellspacing="0">
                <%
			while not rs.eof
			%>
                <tr>
                  <td height="22"><img src="/img/go.gif" width="15" height="15"><a href=show.asp?n=<%=rs("id")%> title=此信息已被浏览<%=rs("lls")%>次>
                    <%if len(trim(rs("tit")))>11 then
	response.write left(trim(rs("tit")),11)&""
	else
	response.write trim(rs("tit"))
	end if%>
                  </a></td>
                </tr>
                <tr>
                  <td height="1" colspan="2" class="td_margin1"><img src="/img/skin<%=cssid%>/x.gif" width="149" height="1"></td>
                </tr>
                <%
			rs.movenext
		    wend
			%>
              </table>
              <%
		end if
		rs.close
		set rs=nothing
		%></td>
        </tr>
    </table></td>
  </tr>
</table>
<%end if%>
<%if inc19=1 then%>
<table width="180" border="0" align="center" cellpadding="0" cellspacing="0" background="/img/lf_bg.gif" class="sm_gray">
  <tr>
    <td height="12"></td>
  </tr>
  <tr>
    <td><img src="/img/gq_lf_gy.gif" width="180" height="40"></td>
  </tr>
  <tr>
    <td>
      <!-- best 10 咆胶飘绰 28byte(..)器窃  -->
    </td>
  </tr>
</table>
<table width="180"  border="0" align="center" cellpadding="0" cellspacing="0" background="/img/lf_bg.gif">
  <tr>
    <td><table width="100%"  border="0" align="center" cellpadding="0" cellspacing="0">
        <tr>
          <td><%
				set rs=server.createobject("adodb.recordset")
		  rs.open "select top "&inc20&" id,tit,lls from shop_infomsg where   gq='出售' order by id desc",conn,1,1
		if rs.recordcount=0 then 
		%>
              <table width="80%" border="0" cellspacing="0" cellpadding="5" align="center">
                <tr>
                  <td height="26" align=center>暂无供应信息</td>
                </tr>
              </table>
              <%else%>
              <table width="100%" border="0" cellspacing="0" cellpadding="0">
              </table>
              <table width="160" border="0" align="center" cellpadding="0" cellspacing="0">
                <%
			while not rs.eof
			%>
                <tr>
                  <td height="22"><img src="/img/go.gif" width="15" height="15"><a href=show.asp?n=<%=rs("id")%> title=此信息已被浏览<%=rs("lls")%>次>
                    <%if len(trim(rs("tit")))>11 then
	response.write left(trim(rs("tit")),11)&""
	else
	response.write trim(rs("tit"))
	end if%>
                  </a></td>
                </tr>
                <tr>
                  <td height="1" colspan="2" class="td_margin1"><img src="/img/skin<%=cssid%>/x.gif" width="149" height="1"></td>
                </tr>
                <%
			rs.movenext
		    wend
			%>
              </table>
              <%
		end if
		rs.close
		set rs=nothing
		%></td>
        </tr>
    </table></td>
  </tr>
</table>
<%end if%>
<%if inc21=1 then%>
<table width="180" border="0" align="center" cellpadding="0" cellspacing="0" background="/img/lf_bg.gif" class="sm_gray">
  <tr>
    <td height="12"></td>
  </tr>
  <tr>
    <td><img src="/img/gq_lf_so.gif" width="180" height="40"></td>
  </tr>
  <tr>
    <td>
      <!-- best 10 咆胶飘绰 28byte(..)器窃  -->
    </td>
  </tr>
</table>
<table width="180"  border="0" align="center" cellpadding="0" cellspacing="0" background="/img/lf_bg.gif">
  <tr>
    <td><table width="100%"  border="0" align="center" cellpadding="0" cellspacing="0">
        <tr>
          <td><form method="POST" action="infosearch.asp">
            <table width="98%" border="0" align="center" cellpadding="3" cellspacing="0">
              <tr>
                <td>
                  <input name="search" type="text" id="search3" class="wenbenkuang" onFocus="this.value=''" value="请输入关键字" size="23">
                </td>
              </tr>
              <tr>
                <td><%set rs=server.CreateObject("adodb.recordset")
		  rs.open "select * from shop_infoid order by id",conn,1,1
		  %>
                  <select name="n" class="wenbenkuang" id="n">
                    <option value="0">所有分类</option>
                    <%do while not rs.eof%>
                    <option value="<%=rs("id")%>"><%=trim(rs("info"))%></option>
                    <%rs.movenext
		  loop
		  rs.close
		  set rs=nothing%>
                  </select></td>
              </tr>
              <tr>
                <td><input type="image" border="0" name="submit" src="/img/top_14.gif" height="24" width="53"></td>
              </tr>
            </table>
          </form></td>
        </tr>
    </table></td>
  </tr>
</table>
<%end if%>
<div align="center"><img src="/img/lf_img_bt.gif" width="180" height="9"></div>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -