ASP教程之bbs的数据布局和存储历程（三）
对用户来说可预见费用、节约费用，可以做到花少钱办大事。由于省去了购买软件和硬件等的前期费用，用户可以租用较高级的应用软件。ASP的收费是根据软件的类型、客制化程度、用户数量、服务期限来定的，对客户来说这笔费用是可以预见的。方便于客户应用软件的升级。存储历程|数据|数据布局/*************************************************************************//**/
/*procedure:up_GetPostedTopicList*/
/**/
/*Description:精髓区贴子列表*/
/**/
/*Parameters:@a_intForumID:版面id*/
/*@a_intPageNo:页号*/
/*@a_intPageSize:每页显现数，以根贴为准*/
/**/
/*Usetable:bbs,forum*/
/**/
/*Author:bigeagle@163.net*/
/**/
/*Date:2000/2/14*/
/**/
/*History:*/
/**/
/*************************************************************************/
ifexists(select*fromsysobjectswhereid=object_id(up_GetPostedTopicList))
dropprocup_GetPostedTopicList
go
createprocup_GetPostedTopicList
@a_intForumIDint,
@a_intPageNoint,
@a_intPageSizeint
as
/*界说部分变量*/
declare@intBeginIDint
declare@intEndIDint
declare@intRootRecordCountint
declare@intPageCountint
declare@intRowCountint
/*封闭计数*/
setnocounton
/*检测是不是有这个版面*/
ifnotexists(select*fromforumwhereid=@a_intForumID)
return(-1)
/*求统共根贴数*/
select@intRootRecordCount=count(*)frombbswhereposted=1andforumid=@a_intForumID
if(@intRootRecordCount=0)--假如没有贴子，则前往零
return0
/*判别页数是不是准确*/
if(@a_intPageNo-1)*@a_intPageSize>@intRootRecordCount
return(-1)
/*求入手下手rootID*/
set@intRowCount=(@a_intPageNo-1)*@a_intPageSize+1
/*限定条数*/
setrowcount@intRowCount
select@intBeginID=rootidfrombbswhereposted=1andforumid=@a_intForumID
orderbyiddesc
/*停止rootID*/
set@intRowCount=@a_intPageNo*@a_intPageSize
/*限定条数*/
setrowcount@intRowCount
select@intEndID=rootidfrombbswhereposted=1andforumid=@a_intForumID
orderbyiddesc
/*恢复体系变量*/
setrowcount0
setnocountoff
selecta.id,a.layer,a.forumid,a.subject,a.faceid,a.hits,a.time,a.UserID,a.fatherid,a.rootid,
Bytes=datalength(a.content),b.UserName,b.Email,b.HomePage,b.Signature,b.Point
frombbsasajoinBBSUserasbona.UserID=b.ID
whereposted=1andForumid=@a_intForumIDanda.rootidbetween@intEndIDand@intBeginID
orderbya.rootiddesc,a.ordernumdesc
return(@@rowcount)
--select@@rowcount
go
selectid,rootid,fatherid,forumid,postedfrombbs
up_getpostedtopiclist3,1,20
/*************************************************************************/
/**/
/*procedure:up_GetTopic*/
/**/
/*Description:取贴子*/
/**/
/*Parameters:@a_intTopicID:贴子id*/
/**/
/*Usetable:bbs*/
/**/
/*Author:bigeagle@163.net*/
/**/
/*Date:2000/2/16*/
/**/
/*History:*/
/**/
/*************************************************************************/
ifexists(select*fromsysobjectswhereid=object_id(up_GetTopic))
dropprocup_GetTopic
go
createprocup_GetTopic@a_intTopicIDint
as
/*假如没有这贴子*/
ifnotexists(select*frombbswhereid=@a_intTopicID)
return(-1)
/*更新该贴的点击数*/
updatebbssethits=hits+1whereid=@a_intTopicID
selecta.*,Bytes=datalength(a.content),
b.UserName,b.Email,b.Homepage,b.point,b.Signature
frombbsasajoinBBSUserasbona.UserID=b.id
wherea.id=@a_intTopicID
go
up_getTopic11
/*************************************************************************/
/**/
/*procedure:up_DeleTopic*/
/**/
/*Description:删除贴子及子贴，更新发贴人信息*/
/**/
/*Parameters:@a_intTopicID:贴子id*/
/**/
/*Usetable:bbs*/
/**/
/*Author:bigeagle@163.net*/
/**/
/*Date:2000/2/24*/
/**/
/*History:*/
/**/
/*************************************************************************/
ifexists(select*fromsysobjectswhereid=object_id(up_DeleTopic))
dropprocup_DeleTopic
go
createprocup_DeleTopic@a_intTopicIDint
as
/*界说部分变量*/
declare@intRootIDint
declare@intLayerint
declare@floatOrderNumfloat(53)
declare@floatNextOrderNumfloat(53)
declare@intCountsint
declare@intForumIDint
/*作废计数*/
setnocounton
/*起首查找这个贴子的rootid和ordernum，没有则前往*/
select@intRootID=RootID,
@floatOrderNum=OrderNum,
@intLayer=layer,
@intForumID=forum</p>缺点：安全性不是太差了，还行，只要你充分利用系统自带的工具；唯一缺点就是执行效率慢，如何进行网站优化以后，效果会比较好。 我可以结合自己的经验大致给你说一说，希望对你有所帮助，少走些弯路。 学习是为了用的，是为了让你的程序产生价值，把握住这个原则会比较轻松点。除此之外，课外时间一定要多参加一些社会实践活动，来锻炼自己的能力。 用户端的浏览器不需要提供任何别的支持，这样大提高了用户与服务器之间的交互的速度。 Response:从字面上讲是“响应”，因此这个是服务端向客户端发送东西的，例如Response.Write 我想问如何掌握学习节奏(先学什么再学什么)最好详细点? 还有如何才能在最短的时间内学完?我每天可以有效学习2小时，双休日4小时。 ASP（ActiveServerPages）是Microsfot公司1996年11月推出的WEB应用程序开发技术，它既不是一种程序语言，也不是一种开发工具，而是一种技术框架，不须使用微软的产品就能编写它的代码，能产生和执行动态、交互式、高效率的站占服务器的应用程序。 学习是为了用的，是为了让你的程序产生价值，把握住这个原则会比较轻松点。除此之外，课外时间一定要多参加一些社会实践活动，来锻炼自己的能力。 跟学别的语言一样，先掌握变量，流程控制语句(就是ifwhileselect)等，函数/过程，数组
页:
[1]