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

📄 more.asp

📁 一个非常好的旅游网站程序.
💻 ASP
字号:
<% dim conn
set conn=server.createobject("adodb.connection")
conn.connectionstring="provider=microsoft.jet.oledb.4.0;"&"data source="&server.mappath("../Database/shop_asdg.mdb")
conn.open
%>

<html>
<head>
<title>无标题文档</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<STYLE>BODY {
	FONT-SIZE: 9pt
}
TD {
	FONT-SIZE: 9pt
}
a            { text-decoration: none; color: #000000 }
a:hover      { text-decoration: underline; color: #0000FF }
</STYLE>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">


<script>
  function openbag(id) { window.open("check.asp?cpbm="+id,"","height=200,width=600,left=190,top=0,resizable=yes,scrollbars=yes,status=no,toolbar=no,menubar=no,location=no");} 
</script>
</head>

<body bgcolor="#FFFFFF" text="#000000" leftmargin="0" topmargin="0">
<div align="center">
  <table width="778" border="0" cellspacing="0" cellpadding="0" align="center">
    <tr> 
      <td><iframe src=../top.asp noresize scrolling=no frameborder=0 width=778 height=100 hspace="0" vspace="0" marginheight="0"></iframe> 
      </td>
    </tr>
  </table>
  <table width="778" border="0" cellspacing="0" cellpadding="0">
    <tr> 
      <td colspan="3"><img border="0" src="../other/pic/other_01.gif"></td>
    </tr>
    <tr> 
      <td width="217"><img src="../other/pic/other_02.gif" width="217" height="115"></td>
      <td width="478"> 
        <div align="center"> 
          <table width="400" border="0" cellspacing="0" cellpadding="0">
            <tr> 
              <td> 
                <div align="center"><font size="6"><b><font color="#FF0000">汕头商城超市联盟</font></b></font></div>
              </td>
            </tr>
            <tr> 
              <td> 
                <hr>
              </td>
            </tr>
          </table>
        </div>
      </td>
      <td width="83"><img src="../other/pic/other_04.gif" width="83" height="115"></td>
    </tr>
    <tr valign="top"> 
      <td colspan="3" height="281"> 
        <table width="778" border="0" cellspacing="0" cellpadding="0">
          <tr> 
            <td width="86" background="../other/pic/lift.gif" height="299">&nbsp;</td>
            <td width="681" height="299" valign="top"> 
              <div align="center"> 
                <table width="680" border="0" cellspacing="0" cellpadding="0">
                  <tr> 
                    <td height="131" valign="top" style="line-height: 150%"> 
                      <div align="center"> 
                        <% set rs_shop=server.createobject("adodb.recordset")
sqltext="select  * from shop order by id desc"
rs_shop.open sqltext,conn,1,1
%>
                        <table width="680" border="0" cellspacing="4" cellpadding="2">
                          <tr> 
                            <%j=1%>
                            <%do while not rs_shop.eof %>
                            <td width="169"> <img src="../pic/au-dot.gif" width="10" height="10"> 
                              <a href="default.asp?shop_name=<%=rs_shop("shop_name1")%>"> 
                              <%=rs_shop("shop_name1")%></a> </td>
                            <%if j mod 4 = 0 then %>
                          </tr>
                          <tr > 
                            <%end if%>
                            <% rs_shop.movenext 
j=j+1
loop	 
rs_shop.close 
conn.close   
%>
                          </tr>
                        </table>
                      </div>
                    </td>
                  </tr>
                </table>
              </div>
            </td>
          </tr>
        </table>
      </td>
    </tr>
  </table>
</div>
<hr align="center">
<div align="center"><br>
  版权所有:汕头商城 www.0754b2c.com <br>
  <a href="mailto:webmaster@0754b2c.com%20">webmaster@0754b2c.com</a> </div>
</body>  
</html>  

⌨️ 快捷键说明

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