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

📄 index1.asp

📁 这是一个文章管理的网页源程序
💻 ASP
字号:
<html>
<head>
<title>精彩ASP-技术文章</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="STYLE.CSS">
<script language="JavaScript">
<!--

function MM_reloadPage(init) {  /reloads the window if Nav4 resized/
  if (init==true) with (navigator) {if ((appName=="Netscape")&&(parseInt(appVersion)==4)) {
    document.MM_pgW=innerWidth; document.MM_pgH=innerHeight; onresize=MM_reloadPage; }}
  else if (innerWidth!=document.MM_pgW || innerHeight!=document.MM_pgH) location.reload();
}
MM_reloadPage(true);
// -->


</script>
</head>

<body leftmargin="4" topmargin="4" background="IMAGES/bbsbg.gif">
<form name="login" action="search.asp" method="post" onSubmit="return validate()">
  <table cellspacing=0 cellpadding=0 width=100% align=center border=0>
    <tbody> 
    <tr> 
      <td> 
        <table cellspacing=0 cellpadding=0 width="100%" border=0>
          <tbody> 
          <tr> 
            <td> 
              <table cellspacing=0 cellpadding=0 width="100%" border=0>
                <tbody> 
                <tr> 
                  <td class=c1 align=middle width=203 height=25> 
                    <div align="left"><a href="index1.asp">文章排行版 </a> </div>
                  </td>
                  <td class=c1 valign=center> 
                    <div align="right">精彩首页|<a href="http://www.bjzx.net/21jc/down1/default.asp">程序下载</a>|书籍教材|<a href="http://www.cdown.net/bbs/leoboard.cgi">交流论坛</a>|<a href="http://hjha.6to23.com/Guest/gb_list.asp">给我留言</a>|关于我们</div>
                  </td>
                </tr>
                </tbody> 
              </table>
            </td>
          </tr>
          <tr> 
            <td> 
              <table cellspacing=0 cellpadding=0 width="100%" border=0>
                <tbody> 
                <tr> 
                  <td ><img src="images/asp.gif"></td>
                  <td> 
                    <div align="center"><img 
      src="images/ASP11.GIF" 
border=0> </div>
                  </td>
                  <td> 
                    <table width="100%" border="0" cellspacing="0" cellpadding="0">
                      <tr> 
                        <td width="75%"> 
                          <div align="right"> 
                            <input type="text" name="search" size="12" maxlength="40" style="border-left: 1px solid #00ADFD; border-right: 1px solid #00ADFD;	border-top: 1px solid #00ADFD;border-bottom: 1px solid #00ADFD;font-size: 9pt;font-weight: normal">
                          </div>
                        </td>
                        <td width="25%"> 
                          <div align="left"> 
                            <input type=submit value=搜索 name=Submit>
                          </div>
                        </td>
                      </tr>
                    </table>
                    <br>
                    <%dim conn   
dim connstr
on error resume next
connstr="DBQ="+server.mappath("mymdb/news.mdb")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"
     set conn=server.createobject("ADODB.CONNECTION")
     conn.open connstr 
	 %>
                    <%      dim flag 
        if session("flag")="" then
        session("flag")=0
        end if
		if session("flag")<>"" then
		session("flag")=0
		end if
        session("admin")=""
	dim rs,sql
	dim classid
	dim classname
   
  	set rs = server.createobject("adodb.recordset")
 
  	sql="select * from Aclass where classID="&cstr(classid)
 	rs.open sql,conn,1,1
 	if not rs.eof then
		classname=rs("class")
 	end if
	rs.close
%>
                  </td>
                </tr>
                </tbody> 
              </table>
            </td>
          </tr>
          </tbody> 
        </table>
      </td>
    </tr>
    </tbody> 
  </table>
  <table width="100%" border="0" cellspacing="0" cellpadding="0" align="center">
    <tr valign="top"> 
      <td height="346" colspan="3">
        <table cellspacing=0 cellpadding=0 width=100% border=0>
          <tbody> 
          <tr> 
            <td height=5><img height=1 src="default.files/pixel.gif" width=1></td>
          </tr>
          <tr bgcolor=#9ea4af background="IMAGES/bj.gif"> 
            <td class=chn style="COLOR: white" noWrap align=middle height=4> 
              <div align="center"><a href="asp.asp?job=list&amp;classid=3"><font color="#FFFFFF">ASP技术         
                </font></a><font color="#FFFFFF">-<a href="asp.asp?job=list&amp;classid=4"> 
                </a></font><a href="asp.asp?job=list&amp;classid=4"><font color="#FFFFFF">CGI技术</font></a><font color="#FFFFFF"><a href="asp.asp?job=list&amp;classid=4"> 
                </a>- </font><a href="asp.asp?job=list&amp;classid=5"><font color="#FFFFFF">PHP技术</font></a><font color="#FFFFFF"><a href="asp.asp?job=list&amp;classid=5">         
                </a>-<a href="asp.asp?job=list&amp;classid=6"> </a></font><a href="asp.asp?job=list&amp;classid=6"><font color="#FFFFFF">其他教材</font></a></div>
            </td>
          </tr>
          </tbody> 
        </table>
        <table width="100%" border="0" cellspacing="0" cellpadding="0">
          <tr> 
            <td width="114" valign="top" height="359"> 
              <div align="center"><br>
                <img src="IMAGES/webdesign_s.gif" width="94" height="123"> <br>
                WEB设计<br>
                <img src="IMAGES/show_kewen_cover.jpg" width="101" height="140"> 
                <br>
                即时应用 ASP 脚本--第二版 </div>        
            </td>
            <td width="10" valign="top" height="359">&nbsp;</td>
            <td height="359" valign="top" width="647"> 
              <p align="center"> 
              <%sql="SELECT news,content,img,addtime FROM img  order by id desc" 
	rs.open sql,conn,1,1 
	if rs.eof and rs.bof then 
%>
              没有更新任何新闻         
              <%else %>
              <%rs.movefirst%>        
              <%=rs("news")%> <br>        
              <table border="0" width="100%">
                <tr>
                  <td width="100%"><a href="imgnews.asp"><img src="<%=rs("img")%>" align="left" alt="查看详细内容" border="0" width="120" height="90" ></a> 
                    <%if len(rs("content"))>200 then%>     
                    <%=left(rs("content"),200)%>......      
                    <%else%>
                    <%=rs("content")%>      
                    <%end if%>     
                    <%end if%>     
                    &nbsp;&nbsp;</td>     
                </tr>
                <tr>
                  <td width="100%">
                    <p align="right"><a href="imgnews.asp">看详细内容</a> <font face="宋体">[<%=rs("addtime")%>]     
                    </font> 
                    <%rs.close%>
                     <a href="allimg.asp" target="_blank">以往新闻&gt;&gt;</a>&nbsp;&nbsp;&nbsp;</p>
                  </td>
                </tr>
              </table>
              <table width="100%" border="0" cellspacing="0" cellpadding="0" align="center">
                <tr> 
                  <td width="49%" colspan="2"> 
                    <table cellspacing=0 cellpadding=0 width="100%" bgcolor=#9ea4af 
            border=0>
                      <tbody> 
                      <tr> 
                        <td width="30%" colspan=4><img height=1 src="" width=1></td>
                        <td width="70%" bgcolor=#ffffff><img height=1 src="" 
                width=1></td>
                      </tr>
                      <tr> 
                        <td width=1><img height=1 src="" width=1></td>
                        <td width="9%" bgcolor=#ffffff><img src="IMAGES/dom.gif"></td>
                        <td align=middle width=%21><font color="#FFFFFF">ASP 技术</font></td>
                        <td width=1><img height=1 src="" width=1></td>
                        <td width="70%" bgcolor=#ffffff> 
                          <div align="right"><a href="asp.asp?job=list&amp;classid=3">更多信息</a></div>
                        </td>
                      </tr>
                      <tr> 
                        <td width="100%" colspan=5 height="3"><img height=1 src="" 
              width=1></td>
                      </tr>
                      </tbody> 
                    </table>
                  </td>
                  <td colspan="2" width="51%"> 
                    <table cellspacing=0 cellpadding=0 width="100%" bgcolor=#9ea4af 
            border=0>
                      <tbody> 
                      <tr> 
                        <td width="30%" colspan=4><img height=1 src="" width=1></td>
                        <td width="70%" bgcolor=#ffffff><img height=1 src="" 
                width=1></td>
                      </tr>
                      <tr> 
                        <td width=1><img height=1 src="" width=1></td>
                        <td width="9%" bgcolor=#ffffff><img src="IMAGES/dom.gif"></td>
                        <td align=middle width=%21><font color="#FFFFFF">CGI 技术</font> 
                        </td>
                        <td width=1><img height=1 src="" width=1></td>
                        <td width="70%" bgcolor=#ffffff> 
                          <div align="right"><a href="asp.asp?job=list&amp;classid=4">更多信息</a></div>
                        </td>
                      </tr>
                      <tr> 
                        <td width="100%" colspan=5 height="2"><img height=1 src="" 
              width=1></td>
                      </tr>
                      </tbody> 
                    </table>
                  </td>
                </tr>
                <tr> 
                  <td width="49%" colspan="2"> 
                    <!--#include file="ie586-1.asp"-->
                  </td>
                  <% 
	rs.movenext 
	loop 
	end if 
	rs.close
	
%>
                  <td valign="top" width="51%" colspan="2"> 
                    <script language="javascript" src="article/list.asp?num=10&amp;classid=5"></script>
                  </td>
                </tr>
                <tr> 
                  <td width="49%" colspan="2">&nbsp;</td>
                  <td valign="top" width="51%" colspan="2">&nbsp;</td>
                </tr>
                <tr> 
                  <td width="49%" colspan="2"> 
                    <table cellspacing=0 cellpadding=0 width="100%" bgcolor=#9ea4af 
            border=0>
                      <tbody> 
                      <tr> 
                        <td width="30%" colspan=4><img height=1 src="" width=1></td>
                        <td width="70%" bgcolor=#ffffff><img height=1 src="" 
                width=1></td>
                      </tr>
                      <tr> 
                        <td width=1><img height=1 src="" width=1></td>
                        <td width="9%" bgcolor=#ffffff><img src="IMAGES/dom.gif"></td>
                        <td align=middle width=%21><font color="#FFFFFF">PHP 技术</font></td>
                        <td width=1><img height=1 src="" width=1></td>
                        <td width="70%" bgcolor=#ffffff> 
                          <div align="right"><a href="asp.asp?job=list&amp;classid=5">更多信息</a></div>
                        </td>
                      </tr>
                      <tr> 
                        <td width="100%" colspan=5><img height=1 src="" 
              width=1></td>
                      </tr>
                      </tbody> 
                    </table>
                  </td>
                  <td colspan="2" width="51%"> 
                    <table cellspacing=0 cellpadding=0 width="100%" bgcolor=#9ea4af 
            border=0>
                      <tbody> 
                      <tr> 
                        <td width="30%" colspan=4><img height=1 src="" width=1></td>
                        <td width="70%" bgcolor=#ffffff><img height=1 src="" 
                width=1></td>
                      </tr>
                      <tr> 
                        <td width=1><img height=1 src="" width=1></td>
                        <td width="9%" bgcolor=#ffffff><img src="IMAGES/dom.gif"></td>
                        <td align=middle width=%21><font color="#FFFFFF">其他 教材</font> 
                        </td>
                        <td width=1><img height=1 src="" width=1></td>
                        <td width="70%" bgcolor=#ffffff> 
                          <div align="right"><a href="asp.asp?job=list&amp;classid=6">更多信息</a></div>
                        </td>
                      </tr>
                      <tr> 
                        <td width="100%" colspan=5><img height=1 src="" 
              width=1></td>
                      </tr>
                      </tbody> 
                    </table>
                  </td>
                </tr>
                <tr> 
                  <td width="23%"> </td>
                  <td width="26%"> </td>
                  <td valign="top" width="27%"> </td>
                  <td valign="top" width="24%"> </td>
                </tr>
                <tr> 
                  <td width="49%" colspan="2"> 
                    <script language="javascript" src="article/list.asp?num=10&amp;classid=5"></script>
                  </td>
                  <td valign="top" width="51%" colspan="2"> 
                    <script language="javascript" src="article/list.asp?num=10&amp;classid=6"></script>
                  </td>
                </tr>
              </table>
              <br>
            </td>
          </tr>
        </table>
      </td>
    </tr>
  </table>
</form>
<table width="100%" border="0">
  <tr bgcolor="#9ea4af"> 
    <td> 
      <div align="center"><font color="#FFFFFF">精彩ASP版权所有 Copyright 2000-2001       
        www.asp30.com, All Rights Reserved </font></div>      
    </td>
  </tr>
</table>
</body>
</html>

⌨️ 快捷键说明

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