ASP编程：ASP文章体系办理计划

写软件都是想的时间比写的时间要长的.如果反过来了就得看看是什么原因了.另外大家可以回去问问公司里的小MM.(一般企业里,跟你们交付软件接触得最多的是她们)起首感激V37斑竹对我的匡助，这个计划办理了显现“上一篇下一篇”和相干文章的成绩，
贴出来让人人分享。
之前看到一个帖子讲用ID+1和ID-1的举措判别“上一篇下一篇”，
在用的过程当中发明一个成绩：当删除数据库中的一篇文章时，就会形成ID不一连，
假如用ID+1和ID-1来判别就会呈现找不到纪录的成绩，在这个程序里，
经由过程查询年夜于以后ID的第一笔记录来找出下一篇的ID，
查询小于以后ID的第一笔记录来找出上一篇的ID，如许就算ID不一连也能够一般显现了。
至于相干文章的显现则是在数据内外增加一个boardid字段来辨别分歧的文章栏目，
在每次增加一篇新文章时加上boardid号就能够了，
显现一篇文章时依据boardid来查询数据库就可以显现出相干文章。
数据表articles中的字段有id,boardid,title,content,author,addtime。
<!--程序入手下手-->
界说一个thenext函数来找出下一篇的ID，假如以后纪录已是最初一笔记录，则输入笔墨“没有了”
<%
functionthenext
newrs=server.CreateObject("adodb.recordset")
sql="selecttop1*fromarticleswhereid>"&a1&"orderbyid"
setnewrs=conn.execute(sql)
ifnewrs.eofthen
response.Write("没有了")
else
a2=newrs("id")
response.Write("<ahref=view.asp?id="&a2&">下一篇</a>")
endif
endfunction
%>
界说一个thehead函数来找出下一篇的ID，假如以后纪录已是最后面的一笔记录，则输入笔墨“没有了”
<%
functionthehead
headrs=server.CreateObject("adodb.recordset")
sql="selecttop1*fromarticleswhereid<"&a1&"orderbyiddesc"
setheadrs=conn.execute(sql)
ifheadrs.eofthen
response.Write("没有了")
else
a0=headrs("id")
response.Write("<ahref=view.asp?id="&a0&">上一篇</a>")
endif
endfunction
%>
数据库毗连文件
<!--#includefile="conn.asp"-->
获得传送过去的ID，显现文章题目作者和内容
<%
id=request("id")
sql="select*fromarticleswhereid="&id
setrs=conn.execute(sql)
%>
<%
boardid=rs("boardid")
%>
<title>文章体系-<%=rs("title")%></title>
<bodyleftmargin="0"topmargin="0">
<!--#includefile="top.asp"-->
<%DoWhileNotrs.EOF%>
<tablewidth="773"border="0"cellspacing="0"cellpadding="0"align="center"><tr><tdwidth="576"align="left"><tablewidth="557"border="0"cellspacing="5"cellpadding="4"align="left"><tr><tdcolspan="2"align="center">
<spanstyle="font-size:9ptcolor:#efefef"><%=rs("title")%><br><divalign="right">
<spanstyle="font-size:9ptcolor:#efefef"><%=rs("author")%></span></div></span></td></tr><tr><tdcolspan="2">
<spanstyle="font-size:9ptcolor:#efefef">
<!--将数据库的材料掏出，经由编码后输入，坚持输出时的格局稳定-->
<%=replace(server.HTMLEncode(rs("content")),chr(13),"<br>")%></span></td></tr><%a1=rs("id")%><tr><tdwidth="269"align="right">
<!--挪用后面界说的显现上一篇的函数-->
<%thehead%>
</td>
<tdwidth="257"align="right">
<!--挪用后面界说的显现下一篇的函数-->
<%thenext%></td></tr>
<%rs.MoveNext
Loop
%></table></td><tdwidth="217"valign="top"align="left">相干文章：
依据以后文章的栏目号，找出统一栏目标文章
<%sql="select*fromarticleswhereboardid="&boardid&""
setrs=conn.execute(sql)%>
<%DoWhileNotrs.EOF%>
<tablewidth="207"border="0"cellspacing="2"cellpadding="2">
<tr>
<tdheight="20">
<ahref="view.asp?id=<%=rs("id")%>">
<%=rs("title")%>
</a></td></tr></table>
<%rs.MoveNext%><%Loop%></td>
</tr>
</table>
<!--#includefile="copyright.asp"-->
</body>
<!--程序停止-->
asp是基于web的一种编程技术，可以说是cgi的一种。它可以完成以往cgi程序的所有功能，如计数器、留言簿、公告板、聊天室等等。

如何更好的使自己的东西看上去很不错等等。其实这些都不是问题的实质，我们可以在实践中不断提升自己，不断充实自己。

作为IE上广为流传的动态网页开发技术,ASP以它简单易学博得了广大WEB程序爱好这的青睐,而且它对运行环境和开发品台的不挑剔,以及有大量有效的参考手册,极大的推广了它的发展。

它可通过内置的组件实现更强大的功能，如使用A-DO可以轻松地访问数据库。

我认为比较好的方法是找一些比较经典的例子，每个例子比较集中一种编程思想而设计的。

另外因为asp需要使用组件，所以了解一点组件的知识(ADODB也是组件)

你可以通过继承已有的对象最大限度保护你以前的投资。并且C#和C++、Java一样提供了完善的调试/纠错体系。

Request:从字面上讲就是“请求”，因此这个是处理客户端提交的东东的,例如Resuest.Form，Request.QueryString,或者干脆Request("变量名")