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

📄 index.asp

📁 仿百度搜索程序修正版
💻 ASP
字号:
<!--#include file="top.htm"-->

<head>
<meta http-equiv="Content-Language" content="en-us">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<title></title>
</head>

<div align="center">
  <center>
  <table width="764" border="0" cellspacing="2" cellpadding="2">
    <tr>
      <td width="540" valign="top" bgcolor="#F4FBF8">
        <table width="520" border="0" align="center" cellpadding="0" cellspacing="0">
          <tr>
            <td width="264">&nbsp;</td>
            <td width="256">&nbsp;</td>
          </tr>
        </center>
        <tr>
          <td>
            <div align="center">
              <table width="250" border="0" cellspacing="0" cellpadding="0">
                <tr>
                  <td>
                    <div align="center">
                      <p align="left"><a href="http://member.t2cn.com/reg/taiji.asp?userfrom=t2t2&amp;pid=17576" target="_blank"><img style="FLOAT: left" src="http://www.t2dk.com/index21.jpg" border="0"></a>  <a href="http://member.t2cn.com/reg/taiji.asp?userfrom=t2t2&amp;pid=17576" target="_blank"><font color="#336699">4月26日也是《天之炼狱》正式收费扣点的日子,为了给广大新手玩家更多的尝试与体验《天之炼狱》PK乐趣的时间和空间,官方经过认真研究讨论后决定,将在天津新区“精武风云”实行为期一个月的免费游戏时间!所新开放的服务区都将延用首月免费这一规则。《天之炼狱》全新大区:天津“精武风云”服务区,已正式定于4月26日正式开通。</font></a>
                    </div>
                  </td>
                  <center>
                  <td>
                    <div align="center">
                       
                    </div>
                  </td>
                  </tr>
                </table>
              </div>
            </td>
            <td valign="top">
              <div align="center">
                <table border="0" width="250" cellspacing="0" cellpadding="2">
                  <tr>
                    <td width="100%" class="f14"><strong><font color="#477C43"><img src="in4_08.gif" width="11" height="11"> 
                      <font color="#FF3300">推荐信息</font></font></strong>
                      <table border="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="100%" id="AutoNumber3" cellpadding="0" height="1" bgcolor="#C0E0C6">
                        <tr>
                          <td width="100%"> </td>
                        </tr>
                      </table>
                    </td>
                  </tr>
                  <tr>
                    <td width="100%" align="center" height="5" class="f14"></td>
                  </tr>
                    <%set com=server.createobject("adodb.connection")    
com.open "DBQ="& Server.MapPath("data.mdb")  &";Driver={Microsoft Access Driver (*.mdb)}"    
set rs=com.execute("select*from link where ok=0 ORDER BY id DESC")    
do while not rs.eof n=n+1%>
                  <tr>
                    <td width="100%" align="center" class="f14">
                      <div align="left">
                        <img src="DOT.gif" width="5" height="5"> <a href="<%response.write rs(2)%>" target="_blank">
                          <%response.write rs(1)%>
                        </a>
                      </div>
                    </td>
                  </tr>
                    <% if n=6 then exit do         
rs.movenext           
loop %>
                  <tr>
                    <td width="100%">&nbsp;</td>
                  </tr>
                </table>
              </div>
            </td>
          </tr>
          <tr>
            <td>&nbsp;</td>
            <td>&nbsp;</td>
          </tr>
        </table>
        <table width="520" border="0" align="center" cellpadding="0" cellspacing="0">
          <tr>
            <td>
              <table width="98%" border="0" align="center" cellpadding="0" cellspacing="0">
                <tr>
                  <td></td>
                </tr>
              </table>
            </td>
          </tr>
          <tr>
            <td>
              <table width="520" height="23" border="0" cellpadding="2" cellspacing="1" bgcolor="#FFFFFF">
                <tr bgcolor="#CDE7D1">
                  <td width="335" height="18" class="f14"><strong><font color="#477C43">最新信息主题</font></strong></td>
                  <td width="131" class="f14"><strong><font color="#477C43">发布时间</font></strong></td>
                  <td width="38" class="f14">
                    <div align="center">
                      <strong><font color="#477C43">浏览</font></strong>
                    </div>
                  </td>
                </tr>
              </table>
              <table width="520" height="22" border="0" cellpadding="0" cellspacing="0">
                  <%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(16)="其他分类"%>
                  <%
                 set rs=com.execute("select*from msg where edt>=#" & date & "# ORDER BY id DESC")           
do while not rs.eof         
i=i+1%>
                <tr>
                  <td height="23" valign="top">
                    <table width="520" height="28" border="0" cellpadding="4" cellspacing="1" bgcolor="#F4FBF8">
                      <tr>
                        <td width="5" height="26" valign="middle">
                          <div align="center">
                            <img src="DOT.gif" width="5" height="5">
                          </div>
                        </td>
                        <td width="319" class="f14"><font color="#478B47"> 
                            <%response.write  "[" & (rs(10)) & "]"%>
                          </font><a href="show.asp?n=<%response.write rs(0)%>" target="_blank"> 
                            <%response.write rs(1)%>
                          </a></td>
                        <td width="124"> 
                            <%response.write rs(4)%>
                        </td>
                        <td width="35">
                          <div align="center">
                              <%response.write rs(9)%>
                          </div>
                        </td>
                      </tr>
                    </table>
                    <table border="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="520" id="AutoNumber3" cellpadding="0" height="1" bgcolor="#C0E0C6">
                      <tr>
                        <td width="100%"> </td>
                      </tr>
                    </table>
                  </td>
                    <%if i=20 then exit do         
rs.movenext           
loop%>
                </tr>
              </table>
            </td>
          </tr>
          <tr>
            <td height="23" valign="bottom" class="f14">
              <div align="right">
                <a href="info.asp">更多...</a>
              </div>
            </td>
          </tr>
          <tr>
            <td>&nbsp;</td>
          </tr>
        </table>
      </td>
      <td width="209" valign="top" bgcolor="#DCEBE1">
        <table width="100%" border="0" align="center" cellpadding="0" cellspacing="0">
          <tr>
            <td><!--#include file="lift.htm"--></td>
          </tr>
        </table>
        <table width="96%" border="0" align="center" cellspacing="0">
          <tr>
            <td width="100%"></td>
          </tr>
          <tr>
            <td height="19">&nbsp;</td>
          </tr>
          <tr>
            <td height="19">
              <div align="center">
                 
              </div>
            </td>
          </tr>
          <tr>
            <td height="19">&nbsp;</td>
          </tr>
          <tr>
            <td height="19">
              <div align="center">
                <img src="ggwzs.gif" width="180" height="55">
              </div>
            </td>
          </tr>
          <tr>
            <td height="19">&nbsp;</td>
          </tr>
          <tr>
            <td height="19">
              <div align="center">
                <img src="ggwzs.gif" width="180" height="55">
              </div>
            </td>
          </tr>
          <tr>
            <td height="19">&nbsp;</td>
          </tr>
          <tr>
            <td height="19">&nbsp;</td>
          </tr>
        </table>
      </td>
    </tr>
  </table>
  </center>
</div>
 <!--#include file="bottom.htm"-->               

⌨️ 快捷键说明

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