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

📄 index.asp

📁 使用说明: --- --- --- --- --- --- --- --- --- --- --- --- ---- 1:这是本人最早用过的
💻 ASP
📖 第 1 页 / 共 2 页
字号:
                  <td width="39%" align="center" height="25">用户名</td>
                  <td width="61%" height="25">
                  <input type=text name="username" size="12"></td>
                </tr>
                <tr>
                  <td width="39%" align="center" height="25">密&nbsp; 码</td>
                  <td width="61%" height="25">
                  <input type=password name="userpass" size="12"></td>
                </tr>
                <tr>
                  <td width="100%" align="center" colspan="2" height="25">
                  <input border="0" src="img/bbslogin.gif" name="I1" type="image">
                  <a href="bbs/register.asp" target="_blank">
                  <img border="0" src="img/bbsreg.gif"></a> </td>
                </tr>
              </table>
              </td>
          </tr>
         </form>
        </table>
<br>
        <table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse; border: 1px solid #CCCCCC; padding: 3" width="100%">
          <tr>
            <td width="100%">
            <table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" width="100%">
              <tr>
                <td width="100%" height="27" background="img/bj_8.gif" align="center">
手机号码归属地查询</td>
              </tr>
            </table>
           </td>
          </tr>
          <tr align=center>
            <td width="100%" style="padding: 5">
<form method="POST" action="http://www.imobile.com.cn/simcard.php" target="_blank">
 请输入手机号码(前7位)<br><input type="text" name="simcard" size="18">
<input type="submit" value="查询">
             </td>
          </tr>
          </table>
</form>
        <table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse; border: 1px solid #CCCCCC; padding: 3" width="100%">
          <tr>
            <td width="100%">
            <table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" width="100%">
              <tr>
                <td width="100%" height="27" background="img/bj_8.gif" align="center">
                <img border="0" src="img/s1_9.gif" width="132" height="27"></td>
              </tr>
            </table>
            </td>
          </tr>
          <tr>
            <td width="100%" style="padding: 5">
            <form method="GET" action="Search.asp">
              <p style="margin-top: 5; margin-bottom: 5" align="center">
              <select size="1" name="Search">
              <option selected value="按文档名搜索">按文档名搜索</option>
              <option value="按作者名搜索">按作者名搜索</option>
              <option value="按文档内容搜索">按内容搜索</option>
              </select></p>
              <p style="margin-top: 5; margin-bottom: 5" align="center">
              <input type="text" name="text" size="20"></p>
              <p style="margin-top: 5; margin-bottom: 5" align="center">
              <input border="0" src="img/search.gif" name="I1" type="image" width="64" height="23"></p>
            </td>
          </tr>
         </form>
            </td>
          </tr>
          </table>
<br>
        <table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse; border: 1px solid #CCCCCC; padding: 3" width="100%">
          <tr>
            <td width="100%">
            <table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" width="100%">
              <tr>
                <td width="100%" height="27" background="img/bj_8.gif" align="center">
本 站 声 明</td>
              </tr>
            </table>
            </td>
          </tr>
          <tr>
            <td width="100%" style="padding: 5">
本站所有文章均是作者个人观点,与www.9y.com.cn无关。<br>本站部分资源来网上,版权为原网站所有,如果您认为侵犯了您的版权,<a href="mailto:admin@9y.com.cn"><font color=blue>请和我们联系</font></a>,我们会尽快删除。
             </td>
          </tr>
          </table>
<br>
        <table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse; border: 1px solid #CCCCCC; padding: 3" width="100%">
          <tr>
            <td width="100%">
            <table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse ;word-break:break-all" width="100%">
              <tr>
                <td width="100%" height="27" background="img/bj_8.gif" align="center">
                <img border="0" src="img/s2_9.gif" width="132" height="27"></td>
              </tr>
            </table>
            </td>
          </tr>
          <tr>
            <td width="100%" style="padding: 5">
            <%
            set rsnew = Server.CreateObject("adodb.recordset")
            rsnew.open "select Top 20 id,title from title where tshow=true order by id desc ",conn,1,3
            if not rsnew.eof then
            for inew = 1 to rsnew.recordcount
            %>
            <font size="1" color="#808080">●</font><a href="article.asp?id=<%=rsnew("id")%>&title=<%=rsnew("id")%>"><%=rsnew("title")%></a><br>
            <%
            rsnew.movenext
            if rsnew.eof then exit for 
            next
            End if
            %>
            </td>
          </tr>
          </table>
        </td>
      </tr>
      </table>
    </td>
  </tr>
  <tr>
    <td width="100%" height="15" style="padding-left: 5; padding-right: 5">
    <table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse; border: 0px solid #C0C0C0; padding-left: 3; padding-right: 3; padding-top: 3; padding-bottom: 3" width="100%">
      <tr align=center>
        <td width="100%">
<script language="JavaScript" src="http://www.rd18.net/link/rd18link_28_1.asp?oid=2210&bg=F8F8FF"></script>
        </td>
      </tr>      <tr>
        <td width="100%" height="30">
        <table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse ;word-break:break-all" width="100%" bgcolor="#F0F0F0" height="100%">

<tr>
            <td width="9%" bgcolor="#666666">
            <p align="center"><font color="#FFFFFF">友情链接</font></td>
            <td width="91%">
            <p align="right"><a href="link.asp#add">自助添加友情链接</a>&nbsp; -&nbsp;&nbsp;
            <a href="link.asp">更多友情链接</a>...&nbsp;&nbsp; </td>
          </tr>
        </table>
        </td>
      </tr>
      <tr>
        <td width="100%">
        <%
            set rsl = Server.CreateObject("adodb.recordset")
            rsl.open "select Top 20 * from link where openurl=true order by id desc ",conn,1,3
            if not rsl.eof then
            for il = 1 to rsl.recordcount
            %>
            <a href="<%=rsl("nameurl")%>"><font size="1" color="#808080">●</font><%=rsl("name")%></a>    
            <%
            rsl.movenext
            if rsl.eof then exit for 
            next
            End if
            %>
        </td>
      </tr>
    </table>
    </td>
  </tr>

  <tr>
    <td width="100%" height="15"><hr noshade color="#C0C0C0" size="1"></td>
  </tr>
  <tr>
    <td width="100%" height="50">
<!--#include file="foot.asp"-->
    </td>
  </tr>
  <tr align=center><td>
            <table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse; border: 0px solid #C0C0C0 ; word-break:break-all" width="100%">
              <tr><td width=50% align=right><script src=http://qiandu.com/search/eokcool.asp?id=13598></script></td><td width=50% align=left><a href=http://xcwm.xcetv.com/show.asp?id=1302 target=_blank><img src=http://xcwm.xcetv.com/image/1.gif  border=0 ></a></td></tr></table>
   </td></tr>
</table>

  </center>
</div>

</body>

</html>

⌨️ 快捷键说明

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