|
马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
无法实现跨操作系统的应用。当然这也是微软的理由之一,只有这样才能发挥ASP最佳的能力。可是我却认为正是Windows限制了ASP,ASP的概念本就是为一个能让系统运行于一个大的多样化环境而设计的;在线ASP进阶之文章在线办理更新--主页面及搜刮篇
沙岸小子
经由了文章的增加、保留、显现,那末如今应当来谈谈关于办理程序的显现主页面,也就是显现一切文章的题目毗连,以便利扫瞄者查找文章,其应当具有的功效有:显现一切文章的题目毗连,到场日期,扫瞄次数等信息,别的还必需供应分页功效,要否则这么多的文章题目在一个页面都显现出来,那将十分的费时且方便扫瞄,别的因为本程序在这里分离了文章分栏目搜刮的功效,以是在这里也将一同先容了。
上面就为人人具体的先容主页面index.asp的这些功效的完成历程和其详细服从:
"创建数据库毗连
<!--#includefile="conn.asp"-->
<html>
<head>
<metahttp-equiv="Content-Type"content="text/html;charset=gb2312">
<title>ASP专题栏目</title>
<metaname="GENERATOR"content="MicrosoftFrontPage3.0">
<linkrel="stylesheet"type="text/CSS"href="style.css">
<scriptlanguage="javascript">
functionpopwin2(path)
{window.open(path,"","height=450,width=600,resizable=yes,scrollbars=yes,status=no,toolbar=no,menubar=no,location=no");
}
</script>
</head>
<%
"界说每页最年夜文章题目显现量MaxPerPage,你能够本人修正这里的数字来到达你的最好显现效果
constMaxPerPage=18
dimtotalPut
dimCurrentPage
dimTotalPages
dimi,j
"假设前往的页面信息是空的,也就是假如你间接输出index.asp,那末就用这里界说的页数第一页
ifnotisempty(request("page"))then
currentPage=cint(request("page"))
else
currentPage=1
endif
dimsql
dimrs
dimrstype
dimtypesql
dimtypeid,typename
"假如前往的栏目信息为空,那末就用这里界说的栏目,这里指定的是第三个栏目
ifnotisEmpty(request("typeid"))then
typeid=request("typeid")
else
typeid=3
endif
"经由过程前往的栏目typeid号,翻开数据库显现指定的栏目,并把其值交给typename
setrstype=server.createobject("adodb.recordset")
typesql="select*fromtypewheretypeID="&cstr(typeid)
rstype.opentypesql,conn,1,1
typename=rstype("type")
rstype.close
%>
<body>
<divalign="center"><center>
<tableborder="0"width="95%"cellspacing="0"cellpadding="0">
<tr>
<tdwidth="100%"style="border-left:thindottedrgb(0,128,0);border-right:thindottedrgb(0,128,0)"><palign="center"><br>
"显现栏目信息,当你点击了任何一个栏目,在typename的地位城市显现相干信息,这里没有接纳栏目标主动显现体例是思索了页面的显现效果,而接纳手工增加的形式,要想接纳主动形式,就本人写吧:)信任你进修到如今,不会连这个都编不出来吧!
动网ASP技能专题>><fontcolor="#FF0000"><%response.write""&typename&""%></font><br>
<ahref="index.asp?typeid=1">ASPFAQ</a>|<ahref="index.asp?typeid=2">ASP组件</a>|<ahref="index.asp?typeid=3">ASP文摘</a>|<ahref="index.asp?typeid=4">ASP实例</a>|<ahref="index.asp?typeid=5">ASP平安</a></p>
<divalign="center">
"翻开指定的纪录集article并依照文章的到场日期排序,在这里翻开有两个前提,一个是使用like来查询数据库并显现相干文章题目,另有就是经由过程前往的typeid显现指定栏目标文章
<%
sql="select*fromarticlewheretitlelike%"&request("txtitle")&"%andtypeid="+cstr(typeid)+"orderbydatedesc"
Setrs=Server.CreateObject("ADODB.Recordset")
rs.opensql,conn,1,1
"假如查询数据库的了局指向纪录集的入手下手大概开头,暗示数据库中没有任何相干文章
ifrs.eofandrs.bofthen
response.write"<palign=center>没有或没有找就任何文章</p>"
else
"假如数据库内有内容,则获得数据库内文章数量
totalPut=rs.recordcount
"假设页面参数currentpage小于1,则指定为1
ifcurrentpage<1then
currentpage=1
endif
"使用文章总数和每页最年夜文章数算得分页的页数
if(currentpage-1)*MaxPerPage>totalputthen
if(totalPutmodMaxPerPage)=0then
currentpage=totalPutMaxPerPage
else
currentpage=totalPutMaxPerPage+1
endif
endif
"假如分页的页数为1大概页面数减1乘与页面最年夜文章数小于文章总数,则用已做好的functionshowpage在showContent子程序也就是显现文章题目部分的下面和上面显现分页程序
ifcurrentPage=1then
showpagetotalput,MaxPerPage,"index.asp"
showContent
showpagetotalput,MaxPerPage,"index.asp"
else
if(currentPage-1)*MaxPerPage<totalPutthen
rs.move(currentPage-1)*MaxPerPage
"界说书签
dimbookmark
bookmark=rs.bookmark
showpagetotalput,MaxPerPage,"index.asp"
</p>Access是一种桌面数据库,只适合数据量少的应用,在处理少量数据和单机访问的数据库时是很好的,效率也很高。但是它的同时访问客户端不能多于4个。access数据库有一定的极限,如果数据达到100M左右,很容易造成服务器iis假死,或者消耗掉服务器的内存导致服务器崩溃。 |
|