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

📄 head.asp

📁 青岛分类信息网整合企业名录.供大家分享
💻 ASP
字号:
<!--#include file="conn.asp"-->
<HTML>
<HEAD>
<TITLE><%=webname%></TITLE>
<META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=gb2312">
<link rel="stylesheet" type="text/css" href="css/style.css">
<BODY background=images/background.gif topMargin=0>
<DIV align=center>
<CENTER>
<TABLE width=755 border=0 align="center" cellPadding=0 cellSpacing=0>
  <TBODY>
    <TR>
      <TD width=255 height=82><img src="images/logo.gif" width="159" height="78"></TD>
      <TD width=496 height=82 align="center"><object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=6,0,29,0" width="468" height="60">
          <param name="movie" value="images/gongyi.swf">
          <param name="quality" value="high">
          <embed src="images/gongyi.swf" quality="high" pluginspage="http://www.macromedia.com/go/getflashplayer" type="application/x-shockwave-flash" width="468" height="60"></embed>
        </object>
      </TD>
    </TR>
    <TR>
      <TD colSpan=2>
        <TABLE cellSpacing=0 cellPadding=0 width=755 border=0>
          <TBODY>
            <TR>
              <TD height=44  background=images/menu_bg.gif><table width="100%" height="40"  border="0" cellpadding="0" cellspacing="0">
                  <tr>
                    <td width="3%">&nbsp;</td>
                    <td width="22%"><SCRIPT language=JavaScript class=black 
            src="js/date.js"></SCRIPT></td>
                    <td width="71%" align="right"><FONT style="FONT-FAMILY: Verdana"><A 
            style="COLOR: #0000FF; TEXT-DECORATION: none; font-weight: bold;" 
            href="default.asp">本站首页</A>&nbsp;┋&nbsp; <A 
            style="TEXT-DECORATION: none; color: #004848; font-weight: bold;" 
            href="ad.asp">分类广告</A>&nbsp;┋&nbsp; <A 
            style="COLOR: #004848; TEXT-DECORATION: none; font-weight: bold;" 
            href="qiye.asp">企业名录</A>&nbsp;┋ <A 
            style="COLOR: #004848; TEXT-DECORATION: none; font-weight: bold;" 
            href="gbook.asp" target=_blank>网站建设</A>&nbsp;┋<A 
            style="COLOR: #004848; TEXT-DECORATION: none; font-weight: bold;" 
            href="gbook.asp" 
            target=_blank>留言反馈</A>&nbsp;┋ <A 
            style="TEXT-DECORATION: none; font-weight: bold; color: #9900FF;" 
            href="addvip.asp" 
            target=_blank>申请vip</A>┋<A 
            style="COLOR: #FF3300; TEXT-DECORATION: none; font-weight: bold;" 
            href="vip/" 
            target=_blank>vip登陆</A></font></td>
                    <td width="4%" align="right">&nbsp;</td>
                  </tr>
              </table></TD>
            </TR>
          </TBODY>
      </TABLE></TD>
    </TR>
    <TR>
      <TD style="BACKGROUND-COLOR: #ff9933" width=753 colSpan=2 
  height=2></TD>
    </TR>
  </TBODY>
</TABLE>
</DIV>
<DIV align=center>
<CENTER>
<TABLE cellSpacing=0 cellPadding=0 width=755 border=0>
  <TBODY>
  <TR>
    <TD vAlign=top width="100%" height=120>
      <TABLE height=116 cellSpacing=0 cellPadding=0 width=755 border=0>
        <TBODY>
        <TR>
          <TD width="100%" height=114><EMBED 
            src=images/ad_banner.swf width=755 
            height=114 type=application/x-shockwave-flash> </TD></TR>
        <TR>
          <TD style="BACKGROUND-COLOR: #ff9933" 
    height=2></TD></TR></TBODY></TABLE></TD></TR>
  <TR>
    <TD height=4></TD></TR></TBODY></TABLE></CENTER></DIV>
<DIV align=center>
<CENTER>
<TABLE cellSpacing=0 cellPadding=0 width=755 bgColor=#E4E4E4 border=0>
  <TBODY>
      <tr>
    <td width="50" height="27" align="center"><a href="ad.asp"><font style="font-size:14px" color="#0000BF">全部</font></a></td>
<%
sql="select * from type"               
set rs=server.createobject("adodb.recordset")               
rs.open sql,connstr,1,1 
if rs.eof then                          
response.write "<p align='center'><font color='#FF0000'>暂无文字广告!</font></p>"
rs.close
set rs=nothing                            
else
i=0                                                                                            
do while not rs.eof                                                       
%>

<td width="50" height="27" align="middle"><a href="type.asp?name=<%=rs("name")%>"><font style="font-size:14px" color="#0000BF"><%=rs("name")%></font></a> 
 </td>
<%   
i=i+1  
if i mod 14=0 then  
response.write "</tr><tr>"    
end if      
rs.movenext 
loop
rs.close
set rs=nothing
end if
%>
<td width="101" height="27" align="center" colspan="2"><a href="fabu.asp" target="_blank"><font style="font-size:14px" color="#FF0000">※我要发布※</font></a></td>
 </tr> 
</TBODY></TABLE></CENTER></DIV>

⌨️ 快捷键说明

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