一、运行前准备
建议了一个MS SQLServer7数据库 DNS,名称为:Test_DB
数据库中有一个表:guestbook字段为:name(varchar),email(varchar),body(text)
数据库用户为sa 密码空,可以自己修改的。
二、代码
<%@ page="" contenttype="text/html;charset=gb2312">
<%
//变量声明
ection sqlCon; //数据库连接对象
ement sqlStmt; //SQL语句对象
ltSet sqlRst; //结果集对象
ng strCon; //数据库连接字符串
ng strSQL; //SQL语句
int intPageSize; //一页显示的记录数
int intRowCount; //记录总数
int intPageCount; //总页数
int intPage; //待显示页码
ng strPage;
int i,j,k; //设置一页显示的记录数
intPageSize = 5; //取得待显示页码
strPage = arameter("page");
if(strPage==null){
//表明在QueryString中没有page这一个参数,此时显示第一页数据
intPage = 1;
} else{
//将字符串转换成整型
intPage = eInt(strPage);
if(intPage<1) intPage = 1; }
//装载JDBC-ODBC驱动程序
ame("OdbcDriver");
//设置数据库连接字符串
strCon = "jdbc:odbc:Test_DB";
//连接数据库
sqlCon = onnection(strCon,"sa","");
//创建SQL语句对象
sqlStmt = teStatement();
//获取记录总数
strSQL = "select count(*) from guestbook";
sqlRst = uteQuery(strSQL);
//执行SQL语句并取得结果集
(); //记录集刚打开的.时候,指针位于第一条记录之前
intRowCount = nt(1);
e(); //关闭结果集
//记算总页数
intPageCount = (intRowCount+intPageSize-1) / intPageSize;
//调整待显示的页码 if(intPage>intPageCount) intPage = intPageCount;
//设置获取数据SQL语句
strSQL = "select name,email,body from guestbook";
//执行SQL语句并取得结果集
sqlRst = uteQuery(strSQL);
//将记录指针定位到待显示页的第一条记录上
i = (intPage-1) * intPageSize;
for(j=0;j
jdbc-odbc留言版
<%
//显示数据
i = 0;
while(i
姓名:<%=tring(1)%> |
邮件:<%=tring(2)%> |
<%=tring(3)%> |
<%>
第<%=intpage%>页共<%=intpagecount%>页
<%if(intPage
">下一页<%
}
%>
<%if(intpage>1){%>
">上一页<%
}
%>
<%
//关闭结果集
e();
//关闭SQL语句对象
e();
//关闭数据库
e();
%>
三、怎么去运行?
将代码存为文件
Orion Application Server下:
Copy到orion的default-web-app目录下,通过:
http://localhost:port/
访问测试
对于Resin,Tomcat,JWS等等,都可以运行通过。