书签 分享 收藏 举报 版权申诉 / 60

类型ASPSQLServer开发与编程.docx

  • 文档编号:8215863
  • 上传时间:2023-01-29
  • 格式:DOCX
  • 页数:60
  • 大小:366.70KB

●文件ShowPage.asp

<%

SubShowPage(rs,Page)'显示结果集中的一页

Response.Write"

"

Response.Write""

FORi=0TOrs.Fields.Count-1

Response.Write""&rs.Fields(i).Name&""

NEXT

Response.Write""

rs.AbsolutePage=Page

FORi=1TOrs.PageSize

Response.Write""

FORj=0toTO.Fields.Count-1

Response.Write""&rs.Fields(j).Value&""

NEXT

Response.Write""

rs.MoveNext

IFrs.EOFTHENExitFOR'若已到末尾则结束循环

NEXT

Response.Write"

"

EndSub

%>

该程序的执行结果如图14.9所示。

结合Session对象

<%

Session.Timeout=60'设置Session对象的存在时间,单位是分钟

IFNOTIsObject(Session("XSCJ_cn"))THEN

'判断连接是否已经存在,若不存在,则建立连接

Setcn=Server.CreateObject("ADODB.Connection")

cn.Provider="sqloledb"

ProvStr="Server=USER1;Database=XSCJ;UID=lo;PWD=l123;"

cn.OpenProvStr

SetSession("XSCJ_cn")=cn'将cn对象保存在Session对象中

ELSE'连接已经存在,只需从Session对象中恢复出来

Setcn=Session("XSCJ_cn")

ENDIF

IFNOTIsObject(Session("XSCJ_rs"))THEN

Setrs=Server.CreateObject("ADODB.Recordset")

rs.Open"Select*fromXS",cn,adOpenStatic

SetSession("XSCJ_rs")=rs

ELSE

Setrs=Session("XSCJ_rs")

ENDIF

%>

Command对象

命令类型的设置值可以是:

adCmdText(值为1),其中命令是一个查询或数据定义语句;

adCmdTable(值为2),其中命令是一个表名;

adCmdStoredProc(值为4),其中命令是一个服务器端存储过程的引用;

adCmdUnknow(值为8),其中命令是一个未知命令。

例如,下面的程序代码可使服务器执行SQL语句:

Setcmd=Server.CreateObject(“ADODB.Command”)

Setcmd.ActiveConnection=cn;

sql=“select*fromXSwhere总学分>40”

cmd.CommandText=sql

Setrs=cmd.Execute

利用Command对象使服务器执行SQL语句时,先要创建Command对象,然后设置Command对象的ActiveConnection和CommandText属性值,最后才引用Execute方法使服务器执行设定的SQL语句。

属性名

访问属性

描述

ActiveConnection

R/W

当前Connection对象

CommanText

R/W

命令串

CommanTimeout

R/W

等待命令执行的时间,缺省值

配套讲稿:

如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。

特殊限制:

部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。

关 键  词:
ASPSQLServer 开发 编程
提示  冰豆网所有资源均是用户自行上传分享,仅供网友学习交流,未经上传用户书面授权,请勿作他用。
关于本文
本文标题:ASPSQLServer开发与编程.docx
链接地址:https://www.bdocx.com/doc/8215863.html
关于我们 - 网站声明 - 网站地图 - 资源地图 - 友情链接 - 网站客服 - 联系我们

copyright@ 2008-2022 冰点文档网站版权所有

经营许可证编号:鄂ICP备2022015515号-1

收起
展开