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

📄 news_left.asp

📁 购物系统(本版为正式商业版
💻 ASP
字号:
<!--
+- o91.com---------------+
? ????????WWW.SNSN.NET????  ?? ??:????  13855119911 QQ:9912515    ?+---------------------+
-->
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<%
if inc1=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/news_lf_tp.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 "&inc2&" newsname,adddate,newsid from shop_news where tp=0 order by adddate 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="news.asp?id=<%=rs("newsid")%>" title=<%=year(rs("adddate"))%>年<%=month(rs("adddate"))%>月<%=day(rs("adddate"))%>日发布>
                  <%if len(trim(rs("newsname")))>8 then
	response.write left(trim(rs("newsname")),8)&""
	else
	response.write trim(rs("newsname"))
	end if%>
                </a><img src="../img/img.gif" width="13" height="13"></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 inc3=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/news_lf_wz.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 "&inc4&" newsname,adddate,newsid from shop_news where tp=1 order by adddate 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="news.asp?id=<%=rs("newsid")%>" title=<%=year(rs("adddate"))%>年<%=month(rs("adddate"))%>月<%=day(rs("adddate"))%>日发布>
                    <%if len(trim(rs("newsname")))>11 then
	response.write left(trim(rs("newsname")),11)&""
	else
	response.write trim(rs("newsname"))
	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 inc5=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/news_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><table width="95%" border="0" align="center" cellpadding="2" cellspacing="1">
            <form name="form2" method="post" action="sonews.asp"><tr>
              
                <td valign="bottom">                    <input name="selectkey" type="text" class="wenbenkuang" id="selectkey4" onFocus="this.value=''" value="请输入关键字" size="23">                </td>
              
            </tr>
            <tr>
              <td valign="bottom"><select name="lx" id="select" class="wenbenkuang">
                <option value="id">按新闻序号搜索</option>
                <option value="bt">按新闻标题搜索</option>
                <option value="nr" selected>按新闻内容搜索</option>
                            </select></td>
            </tr>
            <tr>
              <td valign="bottom"><input type="submit" name="Submit2" class="go-wenbenkuang" value="立即搜索"></td>
            </tr></form>
          </table></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 + -