ASP教程：自己写的数据库操作类(2)

我的想法是既然是数据库操作类，所以类一实例化的时候就建立数据库连接，所以在使用的时候要先修改 Class_Initialize()中的代码，设置正确的数据库连接数据，设置好了就可以使用了。

1、一般的操作

   set myDb=new dbClass
   myDb.sqlStr="select * from ..."        '这里设置数据库操作语句
   set rs=myDb.rsDB()
'这里返回rs,接着就按平时的写法写表现数据的代码
'.......
   myDb.cRs(rs) '关闭释放rs
   set myDb=nothing

若myDb.sqlStr设置的是更新、删除或添加的sql语句，那么就要用myDb.upDB()来执行，即

set myDb=new dbClass
myDb.sqlStr="update ..."
myDb.upDB()
set myDb=nothing

2、查询分页---一般的，不用存储过程

mypage=request.form("currpage")'得到需要显示第几页
'mypage为空则说明此页是第一次加载
if mypage="" then
mypage=1
end if
dim myDb
set myDb=new ConDb
with myDb
     .tbName="comEmploy"       '表名
     .pKey="empId"             '主键
     .pgFields="empId,empGz"   '显示的字段
     .pgSize=20                '每页显示的条数
     .conditions=""            '查询的条件
     .orderBy="empId desc"     '排序的条件
     .currPg=mypage
end with
dim rs
set rs=myDb.pageRs()
'根据返回的rs写表现代码
myDb.cRs(rs)
'在适当的地方放放置分页导航
<%=myDb.pageNav()%>
set myDb=nothing

3、查询分页---用存储过程

此处的存储我用的叶子分页类用的存储过程，可在网上查找叶子分页类的相关代码

mypage=request.form("currpage")'得到需要显示第几页
'mypage为空则说明此页是第一次加载
if mypage="" then
ypage=1
end if
dim myDb
set myDb=new ConDb
with myDb
     .tbName="comEmploy"       '表名
     .pKey="empId"             '主键
     .pgSize=2                 '每页显示的条数
     .pgFields="empId,empGz"   '显示的字段
     .conditions=""            '查询的条件
     .orderBy="empId desc"     '排序的条件
     .currPg=mypage 
end with
dim rs
set rs=myDb.sqlPage()
'根据返回的rs写表现代码
'若查询条件是根据form提交，查询条件可保存在cookie中
myDb.cRs(rs)
'在适当的地方放放置分页导航
<%=myDb.pageNav()%>
set myDb=nothing

4、若你的分页显示没有什么特别的表现形式，还可以直接输入有分页导航的table

tbTil=Array("作者|200","IP地址|150","发布时间|150","具体内容|300")
'作者是表格的第一个字段的名称
'200是此单元格的宽度
mypage=request.QueryString("currpage")'得到需要显示第几页
'mypage为空则说明此页是第一次加载
if mypage="" then
mypage=1
end if
dim myDb:set myDb=new dbClass
with myDb
   .tbName="guestBook"       '表名
   .pKey="id"             '主键
   .pgFields="mem_Author,mem_PostIP,mem_PostTime,mem_Content"   '显示的字段
   .pgSize=3                 '每页显示的条数
   .conditions=""            '查询的条件
   .orderBy="id desc"     '排序的条件
   .currPg=mypage
end with
myDb.showTb(tbTil)
set myDb=nothing

5、返回总记录数可以用myDb.vRsCount()   返回总页数可以用myDb.vPgCount()

6、myDb.prnSql()打印sql语句，在出现错误时利用此检查sql语句

下面是用到的样式代码,可作相应修改

程序代码：

table{
border-collapse:collapse;
font-size:12px;
}
td{
border:1px solid #FFCC99;
border-collapse:collapse;
height:30px;
text-align:center;
}
#fy{
/*width:545px;*/
margin-left:350px;
}
#fy span,#fy a{
display:block;
float:left;
height:15px;
}
#fy #rpc{
margin-left:20px;
line-height:20px;
}
#fy a{
border:1px solid #CCCCFF;
width:15px;
text-decoration:none;
margin-left:5px;
color:#993300;
cursor:pointer;
}
#fy a.aW{
width:40px;
color:#000000;
border:none;
line-height:20px;
}
#fy a:hover{
color:#125da7;
/*border:1px solid #F8b3d0;
background-color:#F8b3d0;*/
}
#fy a#currP{
color:#125da7;
border:1px solid #FF0000;
background-color:#FF0000;
/*border:1px solid #F8b3d0;
background-color:#fff5fa;*/
}

点击这里查看本站的 ASP教程 频道内容。

复制链接发给好友 收藏本文 关闭此页

上一篇：ASP留言本教程

下一篇：asp实现文件md5