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

📄 list.asp

📁 图利文章管理系统。毕业设计郑州科技学院2006级计算机系计算机信息管理专业
💻 ASP
字号:
<!--#include file="conn.asp"-->
<!--#include file="admin/ubbhtml.asp"-->
<%
id=request("id")
if id="" then 
   response.write "参数不足"
   response.end
end if     
%> <%
sql="select * from learning where articleid="&id
rs.open sql,conn,1,2
if rs.bof or rs.eof then
   response.write "该内容已经不删除或者不存在"
   rs.close
   set rs=nothing
   conn.close
   set conn=nothing
   response.end
end if 
today=rs("today")

rs("todayhits")=rs("todayhits")+71
rs("hits")=rs("hits")+71
rs.update

if datediff("d",today,date)>=1 then
	rs("today")=date()
	rs("todayhits")=100
	rs.update
end if

title=rs("title")
hits=rs("hits")
writer=rs("writer")
if writer="" then
	writer="ii86.com"
end if
url=rs("writer_url")
sort=rs("sort")
dateandtime=rs("dateandtime")
content=rs("content")
rs.close
response.write count
%> 
<HTML><HEAD><TITLE>荆网(ii86.com)笑话&amp;图库</TITLE>
<META http-equiv=Content-Language content=zh-cn>
<META http-equiv=Content-Type content="text/html; charset=gb2312">
<META content="Microsoft FrontPage 4.0" name=GENERATOR>
<META content=FrontPage.Editor.Document name=ProgId>
<META 
content=荆网笑话,搞笑图图,文字笑话
name=keywords><LINK href="joke/style.css" type=text/css rel=stylesheet>
<SCRIPT language=JavaScript>
var newwin  
function openwin(url)  
{  
  var newwin=window.open(url,"flash","toolbar=no,location=no,directories=no,status=no,menubar=no,scrollbars=yes,resizable=yes,width=700,height=506,left=100,top=50")  
}   
</SCRIPT>

<SCRIPT language=javascript src="joke/mouse_up.js"></SCRIPT>

</HEAD>
<BODY  bgColor=#fffff0 leftMargin=2 
background=joke/bg.gif topMargin=0 marginheight="2">
<DIV id=menuDiv 
style="Z-INDEX: 1000; VISIBILITY: hidden; WIDTH: 1px; POSITION: absolute; HEIGHT: 1px; BACKGROUND-COLOR: #9cc5f8"></DIV>
<TABLE cellSpacing=0 cellPadding=0 width=770 align=center bgColor=#000000 
border=0>
  <TBODY>
  <TR>
    <TD>
      <TABLE cellSpacing=0 cellPadding=0 width=766 align=center 
      background=joke/top_bg.gif border=0>
        <TBODY>
        <TR>
          <TD width=295><IMG height=85 src="joke/top_01.gif" 
          width=247></TD>
          <TD vAlign=top width=471>
            <TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
              <TBODY>
              <TR>
                <TD height=50>
                  <SCRIPT src="joke/ads_banner.js"></SCRIPT>
                </TD></TR>
              <TR>
                <TD align=right height=30>&nbsp;<IMG height=10 
                  src="joke/t2.gif" width=10 border=0>
				<a href="http://www.ii86.com/flash/"><font color="#FFFFFF"> 
				动漫flash</font></a> <IMG height=10  
                  src="joke/t2.gif" width=10 border=0> <A title=访客留言  
                  href="http://www.ii86.com/flash/guestbook.asp"><FONT 
                  color=#ffffff>访客留言</FONT></A> <IMG height=10  
                  src="joke/t2.gif" width=10 border=0> <A title=友情链接  
                  href="http://www.ii86.com/flash/link.asp"><FONT 
                  color=#ffffff>友情链接</FONT></A> <IMG height=10  
                  src="joke/t2.gif" width=10 border=0>
                  <SCRIPT language=JavaScript>  
 function bookmarkit(){window.external.addFavorite('http://www.ii86.com/','荆网(ii86.com)')}//
 </SCRIPT>
                   <A title=添加到收藏夹中 onclick=bookmarkit()  
                  href="http://www.ii86.com/#"><FONT 
                  color=#ffffff>收藏</FONT></A>&nbsp;&nbsp; 
        </TD></TR></TBODY></TABLE></TD></TR></TBODY></TABLE>
      <TABLE cellSpacing=0 cellPadding=0 width=766 align=center border=0>
        <TBODY>
        <TR>
          <TD background=joke/top_bg1.gif height=28>
            <TABLE cellSpacing=1 cellPadding=0 width="100%" border=0>
              <TBODY>
              <TR>
                <TD width="19%">&nbsp; <FONT color=#0000ff><FONT 
color=#2d57b0>
                  <SCRIPT language=JavaScript>                    
                      
today=new Date();                      
function initArray(){                      
this.length=initArray.arguments.length                      
for(var i=0;i<this.length;i++)                      
this[i+1]=initArray.arguments[i]  }                      
var d=new initArray(                      
"星期日",                      
"星期一",                      
"星期二",                      
"星期三",                      
"星期四",                      
"星期五",                      
"星期六");                      
document.write(                    
"<font color=#666666 style='font-size:9pt;font-family: 宋体'> ",                      
today.getYear(),"年",                      
today.getMonth()+1,"月",                      
today.getDate(),"日",                      
d[today.getDay()+1],                      
"</font>");                  
</SCRIPT>
                  </FONT></FONT></TD>
                <TD width="81%" height=25>&nbsp;<IMG height=26 
                  src="joke/arrow.gif" width=13 align=absMiddle 
                  border=0>&nbsp;<a title="联盟首页" href="http://www.ii86.com/xiaohua">首 页</a>&nbsp; <IMG  
                  height=26 src="joke/arrow.gif" width=13 align=absMiddle 
                  border=0>&nbsp;<a href="http://www.ii86.com/xiaohua/class.asp?sort=暴笑网文">爆笑网文</a>&nbsp;<IMG 
                  height=26 src="joke/arrow.gif" width=13 align=absMiddle 
                  border=0>&nbsp;<a href="http://www.ii86.com/xiaohua/picclass.asp">搞笑图片</a>&nbsp;<IMG 
                  height=26 src="joke/arrow.gif" width=13 align=absMiddle 
                  border=0>&nbsp;<a href="http://www.ii86.com/xiaohua/upload.asp?sort=1">请您推荐笑话</a>&nbsp;<IMG 
                  height=26 src="joke/arrow.gif" width=13 align=absMiddle 
                  border=0>&nbsp;<a href="http://www.ii86.com/xiaohua/upload.asp?sort=2">请您推荐图片</a><IMG 
                  height=26 src="joke/arrow.gif" width=13 align=absMiddle 
                  border=0>&nbsp;<a href="http://www.ii86.com/music">音乐频道</a>&nbsp;  
                  <IMG height=26 src="joke/arrow.gif" width=13 
                  align=absMiddle border=0>&nbsp;<a href="http://www.ii86.com/flash">动画圆</a>&nbsp;<IMG 
                  height=26 src="joke/arrow.gif" width=13 align=absMiddle 
                  border=0>&nbsp;<a href="http://www.ii86.com/">本站首页</a></TD></TR></TBODY></TABLE></TD></TR></TBODY></TABLE></TD></TR></TBODY></TABLE>
<TABLE cellSpacing=0 cellPadding=0 width=770 align=center bgColor=#000000 
border=0>
  <TBODY>
  <TR>
    <TD>
      <TABLE cellSpacing=0 cellPadding=0 width=766 align=center border=0>
        <TBODY>
        <TR>
          <TD vAlign=top width=160 bgColor=#f7f7f7>
            <TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
              <TBODY>
  
              <TR>
                <TD>
                  <SCRIPT src="joke/ads_left1.js"></SCRIPT>
                </TD></TR>
                     <TR>
                                  <TD align=middle height=21>
                  <TABLE cellSpacing=0 cellPadding=0 width="100%" align=center 
                  border=0>
<TBODY> <TR> <FORM NAME=searchJoke ACTION=search.asp METHOD=post> 
	<TD CLASS=gb2 VALIGN=top>
	<p align="center"><INPUT SIZE=12 NAME=keyword VALUE="幽默查询"> 
<INPUT TYPE=submit VALUE=检索 NAME=search2 CLASS="submit"> </TD></FORM></TR> </TBODY>  </TABLE></TD>
                      </TR>
              <TR>
                <TD height=22>
                  <TABLE cellSpacing=0 cellPadding=0 align=center border=0 height="12">
                    <TBODY>
                    <TR>
                      <TD vAlign=center align=middle height=12 width="100%"><font color="#000000">
						::笑话分类::</font> 
					</TD></TR>
                    </TBODY></TABLE></TD></TR>
              <TR>
                <TD height=22>
                  <TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
                    <TBODY>
                    <TR>
                      <TD align=middle height=16><SCRIPT LANGUAGE="javascript" SRC="js/jokesort.js"></SCRIPT></TD></TR>
                    </TBODY></TABLE></TD></TR>
              </TBODY></TABLE></TD>
          <TD vAlign=top width=1 bgColor=#cecfce></TD>
          <TD vAlign=top width=606 bgColor=#ffffff>
            <TABLE height=14 cellSpacing=0 cellPadding=0 width="100%" 
            align=center border=0>
              <TBODY>
              <TR><TD HEIGHT="5"></TD></TR><TR>
                <TD height=14>&nbsp;<IMG height=12 src="joke/A3.gif" 
                  width=12> 当前位置:<a href="http://www.ii86.com/xiaohua">荆网(ii86.com) 
				笑话&amp;图库</a> 
                  -&gt; <a href="http://www.ii86.com/xiaohua">幽默笑话</a>  
-&gt; <%=sort%></TD></TR> 
  </TBODY></TABLE>
            <TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
              <TBODY>
              <TR align=middle>
                <TD ALIGN="CENTER" width="590"><TABLE BORDER="0" CELLSPACING="0" WIDTH="96%" CELLPADDING="0"> 
<TR> <TD COLSPAN="2" HEIGHT="8" CLASS="gb2"><center> </center>
</TD></TR>            
<TR> <TD COLSPAN="2" ALIGN="center" CLASS="gb1" HEIGHT="30" VALIGN="TOP"> 〖<FONT SIZE="3" COLOR="#993300"><B><%=title%></B></FONT>〗</TD></TR> 
<TR> <TD COLSPAN="2" ALIGN="RIGHT" CLASS="gb2"><FONT COLOR="#666666">添加:<A HREF="<%=url%>" TARGET="_blank"><%=writer%></A> 
日期:<%addday=year(dateandtime)&"年"&month(dateandtime)&"月"&day(dateandtime)&"日"%><%=addday%>&nbsp;浏览:<%=hits%>次</FONT>&nbsp;&nbsp;</TD></TR><TR>              
<TD COLSPAN="2"> <HR STYLE="border-style: dotted" SIZE="1" COLOR="#808080"></TD></TR> 
<TR> <TD COLSPAN="2" ALIGN="center"> <TABLE WIDTH="92%" BORDER="0" CELLSPACING="0" CELLPADDING="0"> 
<TR> <TD CLASS="gb1"> <%
				content=Replace(content,CHR(10) & CHR(10), "</P><P>")
				content=Replace(content,CHR(10),"<br>")
				content=Replace(content,CHR(13)," ")
				content=Replace(content,CHR(32),"&nbsp;")
				Response.Write(ubbcode(content))%></TD></TR> </TABLE></TD></TR> 
<TR> <TD COLSPAN="2" HEIGHT="17" ALIGN="center">&nbsp; </TD></TR><TR> <TD HEIGHT="8" COLSPAN="2" CLASS="gb2" ALIGN="RIGHT">
    ·上一篇:  
            <%
sql="select * from learning where syxs<>0 and articleid="&id-1
rs.open sql,conn,1,2
if rs.bof or rs.eof then
   response.write "无"
   else
   response.write "<a href=show.asp?id="&id-1&">"&rs("title")&"</a>"
   end if 
rs.close    
%>
下一篇:         
<%
sql="select * from learning where syxs<>0 and articleid="&id+1
rs.open sql,conn,1,2
if rs.bof or rs.eof then
   response.write "无"
   else
   response.write "<a href=show.asp?id="&id+1&">"&rs("title")&"</a>"
   end if 
rs.close    
%> 〖<A HREF="javascript:window.close()"><FONT COLOR="#FF0000">关闭窗口</FONT></A>〗 
    </TD></TR> 
</TABLE><TABLE WIDTH="98%" BORDER="0" CELLSPACING="1" CELLPADDING="0" ALIGN="CENTER" BGCOLOR="#36A36C"><TR><TD BACKGROUND="images/blank.gif" HEIGHT="22" CLASS="gb1"><TABLE WIDTH="100%" BORDER="0" CELLSPACING="3" CELLPADDING="0"><TR><TD WIDTH="68%">
                  <p align="center"><B><A HREF="upload.asp?sort=1" TARGET="_blank"><FONT COLOR="#FF0000">我要推荐更精彩的!</FONT></A></B></p>
                </TD></TR></TABLE></TD></TR></TABLE></TD></TR></TBODY></TABLE><BR></TD></TR></TBODY></TABLE></TD></TR></TBODY></TABLE>
<TABLE class=3lines cellSpacing=0 cellPadding=0 width=770 align=center 
  border=0><TBODY>
  <TR>
    <TD align=middle bgColor=#000000 height=28>
      <TABLE cellSpacing=0 cellPadding=0 width=766 border=0>
        <TBODY>
        <TR>
          <TD bgColor=#215594 height=1></TD></TR>
        <TR>
          <TD bgColor=#003063 height=1></TD></TR>
        <TR>
          <TD align=middle background=joke/top_bg1.gif height=28>关于我们 
            <IMG height=26 src="joke/arrow.gif" width=13 align=absMiddle 
            border=0> 公共关系 <IMG height=26 src="joke/arrow.gif" width=13 
            align=absMiddle border=0> 服务声明 <IMG height=26 
            src="joke/arrow.gif" width=13 align=absMiddle border=0> 商业合作 
            <IMG height=26 src="joke/arrow.gif" width=13 align=absMiddle 
            border=0> 广告事务 <IMG height=26 src="joke/arrow.gif" width=13 
            align=absMiddle border=0> 联系我们 <IMG height=26 
            src="joke/arrow.gif" width=13 align=absMiddle border=0>
			<a target="_blank" href="http://www.ii86.com/xiaohua/admin/login.asp">管理入口</a></TD></TR></TBODY></TABLE></TD></TR>
  <TR>
    <TD align=middle background=joke/bottom_bg.gif 
      height=60><U>荆网(ii86.com)笑话&amp;图库</U> &#8482; &copy; 版权所有 2003-2008 All Right Reservds 
      <SCRIPT src="joke/mystat.htm"></SCRIPT>
       </TD></TR></TBODY></TABLE>
<DIV></DIV></BODY></HTML>

⌨️ 快捷键说明

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