ASP网页编程之ASP完成上一篇,下一篇历程代码
无法实现跨操作系统的应用。当然这也是微软的理由之一，只有这样才能发挥ASP最佳的能力。可是我却认为正是Windows限制了ASP，ASP的概念本就是为一个能让系统运行于一个大的多样化环境而设计的；ASP完成上一篇,下一篇历程代码Rem==上一篇==Rem======================================================
Rem=参数申明:
Rem=pid以后ID,prame:栏今朝辍(如一样平常web_news表,字段时通常是wn_**,prame就代表wn)
Rem=ptable(表前辍.如一样平常表名是:站点名_表名(shenzhe_news)ptable:就代表shenzhe)
Rem=申明:接纳下面定名法,可以使该历程到达通用
Rem=====================================================
FunctionGetPre(pid,prame,ptable)
id=prame&"_id"
title=prame&"_title"
table="city_"&ptable
url="show_"&ptable
sql="SELECTTOP1"&id&","&title&"FROM"&table&"WHERE"&id&"<"&pid&"ORDERBY"&id&"DESC"
setrs=Conn.Execute(sql)
Ifrs.eoforrs.bofThen
pre="上一篇:没有旧事了"
Else
pre="<ahref="&url&".asp?"&id&"="&rs(0)&">"&rs(1)&"</a>"
EndIf
GetPre=pre
EndFunction
Rem=下一篇
Rem=============
Rem=参数函意和上历程一样
Rem==========
FunctionGetNext(nid,nrame,ntable)
id=nrame&"_id"
title=nrame&"_title"
table="city_"&ntable
url="show_"&ntable
sql="SELECTTOP1"&id&","&title&"FROM"&table&"WHERE"&id&">"&nid&"ORDERBY"&id&""
setrs=Conn.Execute(sql)
Ifrs.eoforrs.bofThen
nnext="下一篇:没有旧事了"
Else
nnext="<ahref="&url&".asp?"&id&"="&rs(0)&">下一篇:"&rs(1)&"</a>"
EndIf
GetNext=nnext
EndFunction
完成代码:
偶数据库里有表:
city_activecity_datecity_note
city_active次要字段有:ca_id,cd_title
city_date次要字段有:cd_id,cd_title
city_note次要字段有:cn_id,cn_title
如许援用便可:
在show_note.asp?cn_id=4里援用上一篇下一篇
<%=GetPre(cn_id,"cn","note")%>上一篇
<%=GetNext(cn_id,"cn","note")%>下一篇
ASP最大的缺点在于网络的安全性和可靠性，企业将经营数据放在开放的平台上，最大的担忧就是如何保证这些数据不被其他人破坏。 以上是语言本身的弱点，在功能方面ASP同样存在问题，第一是功能太弱，一些底层操作只能通过组件来完成，在这点上是远远比不上PHP/JSP，其次就是缺乏完善的纠错/调试功能，这点上ASP/PHP/JSP差不多。 你可以通过继承已有的对象最大限度保护你以前的投资。并且C#和C++、Java一样提供了完善的调试/纠错体系。 以上是语言本身的弱点，在功能方面ASP同样存在问题，第一是功能太弱，一些底层操作只能通过组件来完成，在这点上是远远比不上PHP/JSP，其次就是缺乏完善的纠错/调试功能，这点上ASP/PHP/JSP差不多。 封装性使得代码逻辑清晰，易于管理，并且应用到ASP.Net上就可以使业务逻辑和Html页面分离，这样无论页面原型如何改变，业务逻辑代码都不必做任何改动；继承性和多态性使得代码的可重用性大大提高。 兴趣爱好，那么你无须学编程，申请一个域名和空间，在网上下载一些免费开源的CMS系统，你不用改代码，只须熟悉它们的后台操作，像office一样简单方便，很快就能建一个站点，很多站长都是这样做的 虽然ASP也有很多网络教程。但是这些都不系统。都是半路出家，只是从一个例子告诉你怎么用。不会深入讨论，更不会将没有出现在例子里的方法都一一列举出来。 不是很难但是英文要有一点基础网上的教程很少有系统的详细的去买书吧,另不用专门学习vb关于vbscript脚本在asp教材都有介绍
页:
[1]