仓酷云

标题: ASP网页编程之首页显现篇 [打印本页]

作者: 活着的死人 时间: 2015-1-16 22:50
标题: ASP网页编程之首页显现篇
由于ASP提供的是一对多的服务，所以用户的一些特殊需求很难得到满足。显现index.asp

读进数据库链接!

<html>
<%
每页最年夜显现数为20
constMaxPerPage=20
dimtotalPut
dimCurrentPage
dimTotalPages
dimi,j

dimtypename
dimkeyword
keyword=trim(request("keyword"))

ifnotisempty(request("page"))then
currentPage=cint(request("page"))
else
currentPage=1
endif

%>
<head>
<metahttp-equiv="Content-Type"content="text/html;charset=gb2312">
<title>ASP动感在线</title>
<metaname="GENERATOR"content="MicrosoftFrontPage3.0">
<linkrel="stylesheet"href="../css/style.css">
</head>
<bodybgcolor="#FFFFFF">
<tablewidth="90%"cellpadding="0"cellspacing="0"align="center">
<tr>
<tdcolspan="3"height="203">
<tableborder="1"width="100%"bordercolorlight="#000000"bordercolordark="#FFFFFF"cellpadding="0"cellspacing="0"align="center">
<trbgcolor="#ACD6FF">
<tdwidth="100%"height="20">
<palign="center"><fontcolor="#000000"><b>站务公告</b></font>
</td>
</tr>
<tr>
<tdwidth="100%"height="152">
<formmethod="post"action="index.asp">
<br>
<fontcolor="#FF0000"></font>
<tableborder=0cellpadding=0cellspacing=0width="54%"align="center">
<tr>
<tdvalign=centercolspan="3"align="right">
<divalign="center">查询关头字<fontcolor="#FF0000"><%=keyword%></font>
</div>
</td>
</tr>
<tbody>
<tr>
<tdwidth="27%"align="right">请输出搜刮字符：</td>

<tdvalign=centerwidth="54%"align="center">
<inputclass=TextBordermaxlength=25
name=keywordsize=26>
</td>
<tdvalign=buttomwidth="19%"align="left">
<inputalt=站内搜刮border=0
name=submitsrc=http://www.163design.net/a/d/".images/search.gif"type=image>
</td>
</tr>
</tbody>
</table>
</form>
<palign="left"><%
翻开数据库内容安ARTICLEID的倒数分列!
titlelike%"&keyword&"%为对搜刮字的查找,空者暗示全体!
sql="select*fromlearningwheretitlelike%"&keyword&"%orderbyarticleiddesc"
dimsql,rs
Setrs=Server.CreateObject("ADODB.Recordset")
rs.opensql,conn,1,1

判别数据库是不是为空!假如为空显现还没有任何文章

ifrs.eofandrs.bofthen
response.write"<palign=center>还没有任何文章</p>"
else
上面是对文章数,每页显现数的判别!人人可作别的程序的参考!!
totalPut=rs.recordcount
totalPut=rs.recordcount
ifcurrentpage<1then
currentpage=1
endif
if(currentpage-1)*MaxPerPage>totalputthen
if(totalPutmodMaxPerPage)=0then
currentpage=totalPutMaxPerPage
else
currentpage=totalPutMaxPerPage+1
endif

endif
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,"inde</p>使用filesystemobject，可以对服务器上的文件进行操作，浏览、复制、移动、删除等。有ado的支持，asp对数据库的操作非常得心应手。你甚至可以像使用本地数据库那样，管理远程主机上的数据库，对表格、记录进行各种操作。

作者: 仓酷云 时间: 2015-1-26 14:10
Request:从字面上讲就是“请求”，因此这个是处理客户端提交的东东的,例如Resuest.Form，Request.QueryString,或者干脆Request("变量名")

作者: 金色的骷髅 时间: 2015-2-4 15:13
你可以通过继承已有的对象最大限度保护你以前的投资。并且C#和C++、Java一样提供了完善的调试/纠错体系。

作者: 只想知道 时间: 2015-2-10 02:46
Server:这个表示的服务器，操作服务器的一些东西使用这个，如Server.Mappath转换服务器路径,Server.CreateObject实例化一个组件

作者: 若天明 时间: 2015-2-28 16:05
先学习用frontpage熟悉html编辑然后学习asp和vbscript建议买书进行系统学习

作者: 第二个灵魂 时间: 2015-3-10 01:35
我认为比较好的方法是找一些比较经典的例子，每个例子比较集中一种编程思想而设计的。

作者: 谁可相欹 时间: 2015-3-17 04:07
完全不知道到底自己学的是什么。最后，除了教程里面说的几个例子，还是什么都不会。

作者: 海妖 时间: 2015-3-23 18:12
我认为比较好的方法是找一些比较经典的例子，每个例子比较集中一种编程思想而设计的。

欢迎光临仓酷云 (http://ckuyun.com/)