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

📄 4.asp

📁 一个非常好的旅游网站程序.
💻 ASP
字号:
<%@ LANGUAGE="VBSCRIPT" %>
<!--#include file="../xinxi_conn.asp" -->

<%shop_name=request("shop_name")%>

<HTML>
<HEAD>
<TITLE>4</TITLE>
<META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=gb2312">
<style>
a            { text-decoration: none; color: #E7DCBA }
a:hover      { text-decoration: underline; color: #FFFFFF }
.font1 {font-size: 25pt; filter: dropshadow(color=#7E6A2C,offx=3,offy=3, positive=80); color: #E7DCBA; font-family: "宋体"}
TD {font-size: 12pt; filter: dropshadow(color=#7E6A2C,offx=1,offy=1, positive=80); color: #E7DCBA; font-family: "宋体"}

</style>
<NOSCRIPT><IFRAME SRC="*.html"></IFRAME></NOSCRIPT> 

<script language="javascript">
function click() {
if (event.button==2) {
alert('您好!欢迎您光临汕头商城!')
}
}
document.onmousedown=click
</script>
<script language="JavaScript">
<!--
function MM_preloadImages() { //v3.0
  var d=document; if(d.images){ if(!d.MM_p) d.MM_p=new Array();
    var i,j=d.MM_p.length,a=MM_preloadImages.arguments; for(i=0; i<a.length; i++)
    if (a[i].indexOf("#")!=0){ d.MM_p[j]=new Image; d.MM_p[j++].src=a[i];}}
}

function MM_swapImgRestore() { //v3.0
  var i,x,a=document.MM_sr; for(i=0;a&&i<a.length&&(x=a[i])&&x.oSrc;i++) x.src=x.oSrc;
}

function MM_findObj(n, d) { //v4.0
  var p,i,x;  if(!d) d=document; if((p=n.indexOf("?"))>0&&parent.frames.length) {
    d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);}
  if(!(x=d[n])&&d.all) x=d.all[n]; for (i=0;!x&&i<d.forms.length;i++) x=d.forms[i][n];
  for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=MM_findObj(n,d.layers[i].document);
  if(!x && document.getElementById) x=document.getElementById(n); return x;
}

function MM_swapImage() { //v3.0
  var i,j=0,x,a=MM_swapImage.arguments; document.MM_sr=new Array; for(i=0;i<(a.length-2);i+=3)
   if ((x=MM_findObj(a[i]))!=null){document.MM_sr[j++]=x; if(!x.oSrc) x.oSrc=x.src; x.src=a[i+2];}
}
//-->
</script>
</HEAD>
<BODY BGCOLOR=#FFFFFF leftmargin="0" topmargin="0" background="images/bg.gif" onLoad="MM_preloadImages('images/default_down_08.gif','images/default_down_09.gif','images/default_down_10.gif','images/default_down_12.gif','images/default_down_13.gif','images/default_down_14.gif','images/default_down_15.gif')">
<TABLE WIDTH=777 BORDER=0 CELLPADDING=0 CELLSPACING=0 align="center" bgcolor="#a58639">
  <TR> 
    <TD> <IMG SRC="images/Spacer.gif" WIDTH=144 HEIGHT=1></TD>
    <TD> <IMG SRC="images/Spacer.gif" WIDTH=52 HEIGHT=1></TD>
    <TD> <IMG SRC="images/Spacer.gif" WIDTH=20 HEIGHT=1></TD>
    <TD> <IMG SRC="images/Spacer.gif" WIDTH=72 HEIGHT=1></TD>
    <TD> <IMG SRC="images/Spacer.gif" WIDTH=72 HEIGHT=1></TD>
    <TD> <IMG SRC="images/Spacer.gif" WIDTH=72 HEIGHT=1></TD>
    <TD> <IMG SRC="images/Spacer.gif" WIDTH=72 HEIGHT=1></TD>
    <TD> <IMG SRC="images/Spacer.gif" WIDTH=72 HEIGHT=1></TD>
    <TD> <IMG SRC="images/Spacer.gif" WIDTH=72 HEIGHT=1></TD>
    <TD> <IMG SRC="images/Spacer.gif" WIDTH=61 HEIGHT=1></TD>
    <TD> <IMG SRC="images/Spacer.gif" WIDTH=12 HEIGHT=1></TD>
    <TD> <IMG SRC="images/Spacer.gif" WIDTH=56 HEIGHT=1></TD>
  </TR>
  <TR> 
    <TD COLSPAN=12> <IMG SRC="images/default_01.gif" WIDTH=777 HEIGHT=3></TD>
  </TR>
  <TR> 
    <TD COLSPAN=2 ROWSPAN=2> <IMG SRC="images/default_02.gif" WIDTH=196 HEIGHT=63></TD>
    <TD  class="font1" COLSPAN=7 height="43"> 
      <div align="center"><b><%=shop_name%></b></div>
    </TD>
    <TD  class="font1" height="43">&nbsp;</TD>
    <TD COLSPAN=2 ROWSPAN=2> <IMG SRC="images/default_04.gif" WIDTH=68 HEIGHT=63></TD>
  </TR>
  <TR> 
    <TD COLSPAN=8> <IMG SRC="images/default_05.gif" WIDTH=513 HEIGHT=20></TD>
  </TR>
  <TR> 
    <TD COLSPAN=12> <IMG SRC="images/default_06.gif" WIDTH=777 HEIGHT=23></TD>
  </TR>
  <TR> 
    <TD ROWSPAN=2> <IMG SRC="images/default_07.gif" WIDTH=144 HEIGHT=49></TD>
    <TD COLSPAN=2> <a href="default.asp?shop_name=<%=shop_name%>" onMouseOver="MM_swapImage('d08','','images/default_down_08.gif',1)" onMouseOut="MM_swapImgRestore()"><IMG SRC="images/default_08.gif" WIDTH=72 HEIGHT=23 border="0" name="d08"></a></TD>
    <TD> <a href="2.asp?shop_name=<%=shop_name%>" onMouseOut="MM_swapImgRestore()" onMouseOver="MM_swapImage('d09','','images/default_down_09.gif',1)"><IMG SRC="images/default_09.gif" WIDTH=72 HEIGHT=23 name="d09" border="0"></a></TD>
    <TD> <a href="3.asp?shop_name=<%=shop_name%>" onMouseOut="MM_swapImgRestore()" onMouseOver="MM_swapImage('d10','','images/default_down_10.gif',1)"><IMG SRC="images/default_10.gif" WIDTH=72 HEIGHT=23 name="d10" border="0"></a></TD>
    <TD> <IMG SRC="images/default_down_11.gif" WIDTH=72 HEIGHT=23 name="d11" border="0"></TD>
    <TD> <a href="7.asp?shop_name=<%=shop_name%>" onMouseOut="MM_swapImgRestore()" onMouseOver="MM_swapImage('d14','','images/default_down_14.gif',1)"><IMG SRC="images/default_14.gif" WIDTH=72 HEIGHT=23 name="d14" border="0"></a></TD>    <TD> <a href="5.asp?shop_name=<%=shop_name%>" onMouseOut="MM_swapImgRestore()" onMouseOver="MM_swapImage('d12','','images/default_down_12.gif',1)"><IMG SRC="images/default_12.gif" WIDTH=72 HEIGHT=23 name="d12" border="0"></a></TD>
    <TD> <a href="6.asp?shop_name=<%=shop_name%>" onMouseOut="MM_swapImgRestore()" onMouseOver="MM_swapImage('d13','','images/default_down_13.gif',1)"><IMG SRC="images/default_13.gif" WIDTH=72 HEIGHT=23 name="d13" border="0"></a></TD>

    <TD COLSPAN=2> <a href="8.asp?shop_name=<%=shop_name%>" onMouseOut="MM_swapImgRestore()" onMouseOver="MM_swapImage('d15','','images/default_down_15.gif',1)"><IMG SRC="images/default_15.gif" WIDTH=73 HEIGHT=23 name="d15" border="0"></a></TD>
    <TD ROWSPAN=2> <IMG SRC="images/default_16.gif" WIDTH=56 HEIGHT=49></TD>
  </TR>
  <TR> 
    <TD COLSPAN=10> <IMG SRC="images/default_17.gif" WIDTH=577 HEIGHT=26></TD>
  </TR>
</TABLE>

<table width="777" border="0" cellspacing="0" cellpadding="0" align="center">
  <tr>
    <td>
      <table width="500" border="0" cellspacing="0" cellpadding="0">
        <tr>
          <td width="35">&nbsp;</td>
          <td width="465">&nbsp;</td>
        </tr>
      </table>
    </td>
  </tr>
  <tr>
    <td valign="top"> 
       
      <table width="680" border="1" cellspacing="0" cellpadding="0" align="center" bordercolorlight="#7E6A2C" bordercolordark="#E7DCBA">
        <tr>
          <td height="307" valign="top"> 
            <table width="100%" border="0" cellspacing="0" cellpadding="0">
              <tr> 
                <td valign="top"> <br>
                  <table width="600" border="1" cellspacing="0" cellpadding="2" align="center">
                    <tr bgcolor="#a58639"> 
                      <td width="14%"> 类 别</td>
                      <td width="50%"> 题  目</td>
                      <td width="22%"> 时  间</td>
                    </tr>
                    <%dim w(25)                      
w(1)="招租"                      
w(2)="招聘"                      
w(3)="转让"                      
w(4)="购物"                      
w(5)="饮食"                      
w(6)="家居"                      
w(7)="服饰"                      
w(8)="娱乐"                      
w(9)="医药"                      
w(10)="美容"                      
w(11)="教育"                      
w(12)="培训"                      
w(13)="旅游"                      
w(14)="交通"                      
w(15)="礼仪"                      
w(17)="咨询"                      
w(18)="印刷"                      
w(19)="搬迁"                      
w(20)="维修"                      
w(21)="广告"                      
w(22)="通讯"                      
w(23)="装修"                      
w(24)="家政"                      
w(16)="其它"
%>
                    <%set rs=conn.execute("select*from msg where fname='"& shop_name &"' ORDER BY id DESC ")                        
do while not rs.eof                         
i=i+1%>
                    <tr> 
                      <td width="14%">&nbsp; 
                        <%response.write  "[" & w(rs("kin")) & "]"%>
                      </td>
                      <td width="50%">&nbsp;<a href="../../xinxi/show.asp?n=<%response.write rs(0)%>" target="_blank"> 
                        <%=rs("tit")%> </a></td>
                      <td width="22%">&nbsp; <%=rs("tim")%> </td>
                    </tr>
                    <%if i=23 then exit do                        
rs.movenext                          
loop%>
                  </table>
                  <br>
                </td>
              </tr>
            </table>
          </td>
        </tr>
      </table>
      <br>
    </td>
  </tr>
</table>
<table width="777" border="0" cellspacing="0" cellpadding="0" align="center">
  <tr>
    <td bgcolor="#FF6600" height="3"></td>
  </tr>
  <tr>
    <td>
      <div align="center"><br>
      </div>
    </td>
  </tr>
</table>
<br>

</BODY>
</HTML>
<%
rs.close
set rs=nothing
conn.close
set conn=nothing
%>

⌨️ 快捷键说明

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