JSP实验报告
JSP程序设计实验报告
JSP程序设计（一）班级：170408学号：20172693姓名：刘馨雨一、实验题目：JSP语法。
二、实验目的：1．掌握如何使用Tomcat的基础知识，为以后实验打下基础。
2．掌握怎样JSP页面中使用成员变量，怎样Java程序片，Java表达式；3．掌握怎样在JSP页面中使用include标记动态加载文件，使用forward 实现页面转向。
三、实验内容：（1）程序代码：1、inputWord.jsp<%@page language="java"contentType="text/html; charset=UTF-8"pageEncoding="UTF-8"%><!DOCTYPE html><html><head><meta charset="UTF-8"><title>输入单词</title><style type="text/css">input[type=text] {width: 20%;padding: 12px 20px;margin: 8px 0;box-sizing: border-box;border: 3px solid #ccc;-webkit-transition: 0.5s;transition: 0.5s;outline: none;}input[type=text]:focus {border: 3px solid #555;}input[type=text],select {width: 20%;padding: 12px 20px;margin: 8px 0;display: inline-block;border: 1px solid #ccc;border-radius: 4px;box-sizing: border-box;}input[type=submit] {width: 20%;background-color: #4CAF50;color: white;padding: 14px 20px;margin: 8px 0;border: none;border-radius: 4px;cursor: pointer;}input[type=submit]:hover {background-color: #45a049;}</style></head><body style="background:url('bg.jpg');background-repeat:no-repeat;background-size: cover;"><div align="center"style="margin-top:200px;"><form action = "showDictionary.jsp"method = "get"name = "form">请输入单词（用空格分隔）：<input type = "text"name = "word"><br/><br/><input type = "submit"value = "送出"name = "submit"> </form></div></body></html>2、showDictionary.jsp<%@page language="java"contentType="text/html; charset=UTF-8"pageEncoding="UTF-8"%><%@page import = "java.util.TreeSet"%><%@page import = "java.util.Iterator"%><!DOCTYPE html><html><head><meta charset="UTF-8"><title>显示单词</title><style type="text/css">.font {font-size: 40px;color: white;text-shadow: 5px 5px 5px black, 0px 0px 2px black;letter-spacing:10px;}</style></head><body style="background:url('bg.jpg');background-repeat:no-repeat;background-size: cover;"><div align="center"style="margin-top:250px;" class = "font"> <p><i><%!TreeSet<String> dictionary = new TreeSet<String>();public void addWord(String s) {String word[] = s.split(" ");for(int i = 0; i < word.length; i++){dictionary.add(word[i]);}}%><%String str = request.getParameter("word");addWord(str);Iterator<String> t = dictionary.iterator();while(t.hasNext()){String word = t.next();out.println(" " + word);}</i></p></div></body></html>3、giveFileName.jsp<%@page language="java"contentType="text/html; charset=UTF-8"pageEncoding="UTF-8"%><!DOCTYPE html><html><head><meta charset="UTF-8"><title>读取文件的名称</title><style type="text/css">.font {font-size: 20px;color: black;text-shadow: 5px 5px 5px black, 0px 0px 2px black;letter-spacing:5px;}</style></head><body style="background:url('bg.jpg');background-repeat:no-repeat;background-size: cover;"><div align="center"style="margin-top:200px;" class = "font"><p><i>读取名字是ok.txt的文件：<br/><jsp:include page = "readFile.jsp"><jsp:param name = "file"value = "E:\\JavaWork\\ok.txt"/> </jsp:include></i></p></div></body>4、readFile.jsp<%@page language="java"contentType="text/html; charset=UTF-8"pageEncoding="UTF-8"%><%@page import = "java.io.*"%><!DOCTYPE html><html><head><meta charset="UTF-8"><title>读取文件</title></head><body><br/>This is readFile.jsp!<br/><br/><%String s= request.getParameter("file");File f = new File(s);if(f.exists()){out.println("文件" + s + "的内容:");FileReader in = new FileReader(f);BufferedReader bIn= new BufferedReader(in);String line = null;while((line = bIn.readLine()) != null){out.println("<br/><br/>" + line);}}else{%><jsp:forward page = "error.jsp"><jsp:param name="message"value = "File Not Found!!!"/> </jsp:forward><%}</body></html>5、error.jsp<%@page language="java"contentType="text/html; charset=UTF-8"pageEncoding="UTF-8"%><!DOCTYPE html><html><head><meta charset="UTF-8"><title>错误</title><style type="text/css">.font {font-size: 30px;color: black;text-shadow: 5px 5px 5px black, 0px 0px 2px black;letter-spacing:5px;}</style></head><body style="background:url('bg.jpg');background-repeat:no-repeat;background-size: cover;"><div align="center"style="margin-top:200px;" class = "font"> <p><i>This is error.jsp!<br/><br/><%String s= request.getParameter("message");out.println("本页面得到的信息：" + s);%></i></p></div></body></html>（2）程序运行结果截图：四、实验心得体会本次实验掌握了jsp界面的基本结构，能够在初始界面输入一系列未排序的单词或字母，提交给另一个界面并排序。
web程序设计-JSP实验报告
实验一Web程序开发平台的构建一、实验目的和要求巩固知识点——JDK的安装及环境变量的设置。
JDK是Java开发工具，是进行JSP开发必备的软件支持。
巩固知识点——Tomcat以及My SQL的安装。
Tomcat是Web服务器为Web 项目提供运行的环境。
My SQL用于存储数据信息。
二、实验内容和原理在进行JSP开发Web项目前需要搭建开发环境，JDK是开发环境中必备的软件。
然而Windows并没有默认安装JDK，所以需要进行手动的安装及环境变量的设置。
在开发的过程中数据库和Web服务器是必不可少的软件支持，在Windows中并没有预先安装这两种软件，所以需要进行手动的安装。
三、实验环境硬件：计算机软件：Windows XP和以Java语言为基础的开发环境、软件开发包（JDK）和运行环境（JRE）。
四、实验步骤1、JDK的安装和配置由于JDK不是Windows XP系统的默认配置软件，所以需要手动安装，安装JDK 后就可以提供Java语言开发和运行环境了。
具体安装步骤如下：(1)从Sun公司网站下载JDK软件。
双击安装文件，弹出【许可证协议】对话框，如图1-1所示。
(2)选择【我接受】选项，弹出【自定义安装】对话框，如图1-2所示。
单击【更改】按钮，选择JDK安装目录。
图1-1 【许可证协议】对话框图1-2 【自定义安装】对话框(3)单击【下一步】按钮，进入JDK安装等待界面，如图1-3所示。
(4)JDK安装结束，弹出【JRE自定义安装】对话框，开始安装JRE，如图1-4所示。
单击【更改】按钮，选择JRE安装目录。
图1-3 JDK安装等待界面图1-4 【JRE自定义安装】对话框(5)单击【下一步】按钮，进入JRE安装等待界面，如图1-5所示。
(6)JRE安装结束，弹出【安装完成】对话框，如图1-6所示。
单击【完成】按钮，完成JDK和JRE的安装。
图1-5 JRE等待安装界面图1-6 【安装完成】对话框2、JDK安装结束后需要进行Java环境变量的配置，具体配置步骤如下。
jsp实验报告
jsp实验报告JSP实验报告。
一、实验目的。
本实验旨在通过实际操作，加深对JSP（Java Server Pages）技术的理解，掌握JSP的基本语法和应用方法，以及JSP与Servlet的区别与联系。
二、实验内容。
1. 搭建JSP开发环境，安装Tomcat服务器，配置好JSP开发环境。
2. 编写简单的JSP页面，创建一个简单的JSP页面，包括HTML和JSP代码。
3. JSP页面中的表达式，在JSP页面中使用表达式输出动态内容。
4. JSP页面中的脚本，在JSP页面中使用脚本实现流程控制和变量赋值。
5. JSP页面中的动作，在JSP页面中使用动作实现页面跳转和数据传递。
6. JSP与Servlet的联系，比较JSP与Servlet的不同之处，了解它们各自的应用场景。
三、实验步骤。
1. 搭建JSP开发环境，按照Tomcat官方文档的指引，下载Tomcat服务器并进行安装配置。
2. 编写简单的JSP页面，创建一个名为index.jsp的文件，其中包括HTML和JSP代码，用于展示JSP页面的基本结构。
3. JSP页面中的表达式，在index.jsp页面中，使用表达式输出当前系统时间，并在页面上显示出来。
4. JSP页面中的脚本，在index.jsp页面中，使用脚本实现一个简单的计算器，用户输入两个数字，页面输出它们的和。
5. JSP页面中的动作，在index.jsp页面中，使用动作实现页面跳转，点击按钮后跳转到另一个JSP页面，并传递数据。
6. JSP与Servlet的联系，通过阅读相关资料，对比JSP与Servlet的特点和用法，总结它们各自的优劣和适用场景。
四、实验结果。
1. 成功搭建了JSP开发环境，Tomcat服务器正常运行，可以进行JSP页面的开发和测试。
2. 编写的index.jsp页面能够正常显示当前系统时间，并且页面结构清晰，代码规范。
3. 实现了一个简单的计算器功能，用户输入数字后，页面能够正确输出计算结果。
JSP程序设计实验报告
JSP程序设计实验报告JSP程序设计实验报告1、实验目的1.1 将Java代码与页面相结合，实现动态网页的开发 1.2 学习和掌握JSP程序设计的基本原理与技巧1.3 掌握使用JSP实现数据库操作的方法2、实验环境2.1 操作系统：Windows 102.2 开发工具：Eclipse IDE2.3 服务器：Apache Tomcat2.4 数据库：MySQL3、实验内容3.1 搭建JSP开发环境3.1.1 安装Eclipse IDE3.1.2 配置Apache Tomcat服务器3.1.3 连接Eclipse与Tomcat服务器3.2 创建JSP页面3.2.1 新建一个JSP文件 3.2.2 编写标签和JSP代码 3.2.3 展示动态数据3.3 JSP基本语法3.3.1 声明标签3.3.2 表达式标签3.3.3 脚本标签3.3.4 注释标签3.3.5 动作标签3.4 JSP中的控制语句3.4.1 条件判断语句3.4.2 循环语句3.4.3 转向语句3.5 JSP中的对象与方法3.5.1 request对象3.5.2 response对象3.5.3 session对象3.5.4 JSP表单处理3.6 JSP与数据库交互3.6.1 连接数据库3.6.2 执行SQL语句3.6.3 处理数据库返回结果4、实验步骤4.1 搭建JSP开发环境4.1.1 并安装Eclipse IDE4.1.2 并配置Apache Tomcat服务器4.1.3 在Eclipse中连接Tomcat服务器4.2 创建JSP页面4.2.1 在Eclipse中创建新的JSP文件4.2.2 编写JSP页面的标签和JSP代码4.2.3 保存并运行JSP页面4.3 学习和练习JSP基本语法和控制语句4.3.1 编写JSP页面，使用各种JSP标签和控制语句4.3.2 运行JSP页面，查看结果4.4 实现JSP与数据库的交互4.4.1 创建一个数据库，并设计相应的表4.4.2 连接数据库，执行SQL语句4.4.3 在JSP页面中展示数据库查询结果5、实验结果分析在本次实验中，我们成功搭建了JSP开发环境，并创建了多个JSP页面。
JSP程序设计实验报告
实验报告6月8日交，源代码不必全写，给的源代码仅供参考课程设计6月8日交（至少7页）课程设计应该：1.系统总体设计（功能设计、数据库设计）2.界面设计（要有图）3.系统实现（部分源代码）4.运行测试附交源程序实验一JSP编程环境3月9日一、实验目的1.搭建Web编程环境，能正确安装配置java运行环境、WEB服务器2.掌握正确运行jsp文件的方法二、实验内容1.安装并配置java运行环境JDK和JRE2.安装Web服务器tomcat, 配置Tomcat服务器三、实验步骤1、JDK、JRE安装结果：2、Classpath和path、Java_Home设置path为java的bin目录，Classpath为jre中rt.jar目录，Java_Home为及java安装目录3、安装并配置Tomcat安装Tomcat服务器后并启动之。
即：启动Tomcat服务器目录中bin\startup.bat文件。
在“开始菜单--运行”中输入http://localhost:8080/点击确定。
4、第一个JSP文件在Tomcat服务器目录webapps\ROOT下：1)新建一个文本文件，改名为first.jsp.2)右击此文件，选择打开方式为记事本。
3）编辑内容如下：<%@ page contentType="text/html;charset=GB2312" %><HTML><BODY BGCOLOR=cyan><FONT Size=4><P>JSP页面的测试<% int x=100,y=500,z;z=x+y;%><P> x+y的和为：<%= z %></FONT></BODY></HTML>4）在地址栏或者运行菜单输入http://localhost:8080/first.jsp回车，然后观察运行结果5、要求，理解常用html标签的含义：<html><body><p><br><hr><table><tr><td><img><a><form><input><font> <ol><ul><li>了解以下属性含义：align bgcolor size根据各人情况，最好能了解DIV+css布局方式实验二、jsp页面和jsp标记3月16一、实验目的1、掌握JSP的页面的基本结构，让学生掌握怎样在JSP页面中使用成员变量，怎样使用Java 程序片、Java表达式。
jsp课程实验报告
jsp课程实验报告JSP课程实验报告引言：JSP（JavaServer Pages）是一种动态网页技术，它允许开发人员在HTML页面中嵌入Java代码。
在本次实验中，我将介绍我在JSP课程实验中所学到的知识和经验。
实验目的：本次实验的目的是让我们熟悉JSP的基本语法和使用方法，并通过实践来加深对JSP的理解。
在实验中，我们将创建一个简单的学生信息管理系统，通过JSP 页面实现学生信息的增删改查功能。
实验过程：1. 环境搭建在开始实验之前，我们需要先搭建好JSP开发环境。
我选择使用Eclipse作为开发工具，并安装了Tomcat作为服务器。
通过配置Tomcat服务器，我们可以在本地运行JSP页面。
2. 创建JSP页面在Eclipse中，我创建了一个名为"student.jsp"的JSP页面。
在该页面中，我使用HTML标签来设计用户界面，并通过JSP标签嵌入Java代码，实现与数据库的交互。
我使用了JDBC（Java数据库连接）来连接数据库，并编写了相应的Java代码来实现学生信息的增删改查功能。
3. 编写Java代码在JSP页面中，我使用了Java代码来处理用户的请求。
通过JDBC，我连接到了MySQL数据库，并编写了相应的SQL语句来执行增删改查操作。
通过在JSP 页面中使用Java代码，我们可以方便地处理用户的输入，并将结果返回给用户。
4. 测试与调试在完成JSP页面和Java代码的编写后，我通过在Tomcat服务器上运行该页面来进行测试。
我模拟了不同的用户操作，包括添加学生信息、删除学生信息、修改学生信息以及查询学生信息。
通过测试，我发现了一些bug并进行了调试，最终使系统能够正常运行。
实验结果：通过本次实验，我成功地创建了一个简单的学生信息管理系统。
该系统可以实现学生信息的增删改查功能，并且具有良好的用户界面。
通过JSP页面和Java代码的结合，我们可以快速地开发出功能强大的Web应用程序。
jsp实验报告
专业：网络工程班： 2 学号：2220141644 姓名：王泽宇课程名称：互联网软件基础实验时间：2016.6.7 指导教师：李辉实验名称：JavaBean随机产生大小文字实验成绩：一、实验目的1）实现用户输入一段文字并提交该文字后，JavaBean调用Java文件，使用for循环随机设置文字大小并输出这一段文字。
2）掌握JavaBean的使用，与如何调用java文件。
二、实验过程1.创建一个命名为“input.html”的HTML页面，用于输入产生随机大小的文字。
执行【新建】HTML(advanced Templates)命令，弹出【新建JSP页面】对话框，在文件名称中输入input.jsp，单机【完成】按钮。
2.在HTML文件中输入如下内容并保存<html><head><title>随机大小文字</title><head><body><center><font size=5 color=blue>随机大小的文字</font></center><br><hr><br><form name="form1" method="get" action="RandSizeText.jsp">请输入文字：<input type="text" name="Text" value="" maxlength="18" size="18"><input type="submit" name="Submit" value="输入"></form></body></html>3.在bean文件夹下创建RandSize.java文件，实现文件的大小设置，执行【兴建】【类】命令，弹出【新建Java类】对话框，在文件名称中输入RandSize.java，单击完成【与完成】按钮。
jsp_基础实验报告
计算机科学与技术系实验报告课程名称：JSP网络开发逐步深入实验名称：JSP基础实验班级：******* **学号：************姓名：********2012年12 月20 日Java web应用编程基础实验报告实验1：JSP基础实验一、实验目的：●熟悉HTML语法，理解和掌握JSP基本语法。
●初步掌握利用指令、脚本元素和动作元素，进行简单的JSP和HTML混合编程的方法和技术。
●理解对象概念，掌握application、session等对象的基本使用方法。
二、实验要求：●理解Web Server，正确使用Apache的Tomcat建立JSP Server。
●编写程序完成以下实验容，通过手工和MyEclipse两种方式分别完成JSP文件的布署。
●上交实验报告电子文档。
三、实验容：1、编写一个JSP程序，计算10!，并显示出结果。
要求先声明计算阶乘的方法，再调用该方法，最后在页面上输出结果。
（进阶要求：通过表单提交一个正整数，然后计算它的阶乘。
）2、在JSP页面中静态包含文件。
要求程序包含两个文件，主文件静态包含一个能够计算数据的算术平方根的页面。
3、动态包含页面并传递数据。
要求程序包含两个文件，主文件加载次文件，并将随机产生的0 ~ 1之间的数据传递给它，并且在页面上显示出来。
（进阶要求：把动态包含改为动态重定向，比较两者之间的区别。
）4、计算三角形的面积。
要求由用户输入三角形的三条边，判断这三条边是否能构成一个三角形，若能构成三角形，则输出三角形的面积。
5、编写一个简单的网上商店，用application对象存放网上的商品清单和库存量，用session 对象存放用户的购买信息（用户名、商品名及购买数量），然后利用这些信息给用户结账。
四、实验过程中遇到的问题及解决手段：（1）首先就是网页的布局设置，由于我对html不是很熟悉，所以在试验中的页面布局不是很好看。
只能说是尽量让界面看起来好看点吧，但是跟专业的比起来就差远了。
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
一、实验目的1.掌握HTML语言书写表单页面2.编写JSP网页获取用户通过表单提交数据3.编写JSP网页获取超链传递的数据二、实验环境eclipse+jdk+tomcat+数据库三、实验内容四、实验步骤4.1业务流程分析4.1.1用户登录页面（index.asp）<html><head><meta http-equiv="Content-Type" content="text/html; charset=gb2312"> <title>选课系统首页－登录页面</title></head><body><table width="98%" height="215" border="0"><tr><td height="48"><div align="center"><p> </p><p><font color="#9900FF" size="7" face="华文新魏">校园网选<fontcolor="#9900CC">课系统</font></font></p><hr size="10" color="#FF0000"><p><font color="#0000FF" size="7" face="华文新魏"></font></p></div></td></tr><tr><td><div align="center"><form action="login.asp" method="post" name="frmLogin" id="frmLogin"> <p> </p><p>用户名：<input name="Username" type="text" id="Username"></p><p>密 码:<input name="Password" type="password" id="Password"></p><p> </p><p><input type="submit" name="Submit" value="登录"> <input type="reset" name="Submit2" value="重填"></p><p> </p></form></div></td></tr></table></body></html>4.1.2信息录入页面（insert.asp）<%@LANGUAGE="VBSCRIPT"%><!--#include file="adovbs.inc"--><!--#include file=connection.asp --><%'判断是否具有教务员权限If Session("UserLevel")<>"Admin" ThenResponse.Redirect "illegal.asp"End IfSet rsTest=Server.CreateObject("ADODB.RecordSet")rsTest.Open "Teacher",Conn,adOpenStatic,adLockReadOnly%><html><head><meta http-equiv="Content-Type" content="text/html; charset=gb2312"><title>输入课程信息</title></head><body><table ><tr><td width="804" height="55" valign="top"><div align="center"><font color="#990033" size="7" face="华文新魏">输入课程信息</font></div></td> </tr><tr><td height="504" valign="top"><form action="insertCourse.asp" method="POST" name="frmInsertCourse" id="frmInsertCourse"><div align="center"><pre><font color="#0000FF" size="4">课程号：</font><input name="txtCourseno" type="text" id="txtCourseno"><font color="#0000FF" size="4">学分：</font><select name="selCredit" id="selCredit"><option value="1">一分</option><option value="2">二分</option><option value="3">三分</option><option value="4" selected>四分</option><option value="5">五分</option></select></pre></div><div align="center"><pre align="center"><font color="#0000FF" size="4">课程名称：<input name="txtName" type="text" id="txtName" size="60"></font></pre><pre align="center"><font color="#0000FF" size="4">课程描述：<textarea name="txtDescription" cols="80" id="txtDescription"></textarea></font></pre><div align="left"><pre align="center"><font color="#0000FF" size="4">最大选课人数：<input name="txtMaximumNum" type="text" id="txtMaximumNum">教师：<select name="selTeacherno" id="selTeacherno"><% While (NOT rsTest.EOF) %><optionvalue="<%=(rsTest.Fields.Item("Teacherno").Value)%>" <%If (Not isNull((rsTest_first))) Then If (CStr(rsTest.Fields.Item("Teacherno").Value) = CStr((rsTest_first))) Then Response.Write("SELECTED") : Response.Write("")%>><%=(rsTest.Fields.Item("Name").Value)%></option><%rsTest.MoveNext()WendIf (rsTest.CursorType > 0) ThenrsTest.MoveFirstElsersTest.RequeryEnd If%></select></font></pre></div><pre><font color="#0000FF" size="4"><input name="btnInsert" type="submit" id="btnInsert" value="保存输入"><input name="btnClear" type="reset" id="btnClear" value="清除重填"></font></pre></div><p align="center"><a href="main.asp"><font size="5" face="华文新魏">返回</font></a></p><font color="#0000FF" size="4"></font><pre><font color="#0000FF" size="4"></font></pre><p> </p></td></tr><tr><td height="42"> </td></tr></table><%rsTest.CloseConn.CloseSet rsTest = NothingSet Conn=Nothing%></body></html>4.1.3选择要修改课程页面（modifycourse.asp）<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%><!--#include file="adovbs.inc"--><!--#include file=connection.asp --><%'判断是否具有教务员权限If Session("UserLevel")<>"Admin" ThenResponse.Redirect "illegal.asp"End IfSet rstCourse=Server.CreateObject("ADODB.RecordSet")rstCourse.Open "Course",Conn,adOpenStatic,adLockReadOnly%><html><head><meta http-equiv="Content-Type" content="text/html; charset=gb2312"><title>修改课程信息</title></head><body><table width="741" border="0" cellpadding="0" cellspacing="0"><tr><td width="124" height="41"> </td><td width="498"> </td><td width="119"> </td></tr><tr><td height="91"></td><td valign="top"><div align="center"><font color="#CC6600" size="+7" face="华文新魏">修改课程信息</font></div></td><td> </td><tr><td height="158"></td><td valign="top"><form action="modifycourse1.asp" method="post" name="ModifyCourse" id="ModifyCourse"><p align="center"> </p><p align="center"><font color="#0000FF" size="4">请选择要修改的课程号：<select name="selCourseno" id="selCourseno"><%While (NOT rstCourse.EOF)%><option value="<%=(rstCourse.Fields.Item("Courseno").Value)%>" <%If (Not isNull((rstCourse_first))) Then If (CStr(rstCourse.Fields.Item("Courseno").Value) = CStr((rstCourse_first))) Then Response.Write("SELECTED") : Response.Write("")%>><%=(rstCourse.Fields.Item("Courseno").Value)%></option> <%rstCourse.MoveNext()WendIf (rstCourse.CursorType > 0) ThenrstCourse.MoveFirstElserstCourse.RequeryEnd If%></select></font></p><p align="center"><font color="#0000FF" size="4"><input name="btnNext" type="submit" id="btnNext" value="下一步"></font></p></form></td><td></td></tr><tr><td height="75"></td><td></td><td></td></tr></table></body></html><%rstCourse.Close()Set rstCourse = Nothing%>4.1.4浏览课程信息页面（CourseList.asp）<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%><%Option ExplicitResponse.Expires=0%><!--#include file=adovbs.inc --><!--#include file=connection.asp --><%Dim RecordPerPage,absPageNUm,TotalPages,absRecordNUm,rsTest,StrSQL'absPageNum-当前页数,TotalPages-总页数,absRecordNum-当前页中某一条记录的序号RecordPerPage=4 '每页显示的记录数absPageNum=CInt(Request.Form("PressPageNum"))'若返回的是"上一页",则页数减一，若是"下一页"，则页数加一If Request.Form("Submit")="上一页" ThenabsPageNum=absPageNum-1ElseIf Request.Form("Submit")="下一页" ThenabsPageNum=absPageNum+1End IfStrSQL="Select *From Course"Set rsTest=Server.CreateObject("ADODB.RecordSet")rsTest.CacheSize=RecordPerPage '设置这个属性选项会提高性能rsTest.Open StrSQL,Conn,adOpenStatic,adLockReadOnly,adCmdText'设置RecordSet对象的每一页数据记录条数rsTest.PageSize=RecordPerPageIf rsTest.RecordCount=0 ThenResponse.Redirect "selectedlisterror.asp"End IfIf absPageNum=0 ThenabsPageNum=1End IfIf Not rsTest.EOF ThenrsTest.AbsolutePage=absPageNumEnd IfTotalPages=rsTest.PageCount%><Html><Head><Meta http-equiv="Content-Type" content="text/html; charset=gb2312"><Title>浏览课程信息</Title></Head><Body><P> </P><Table width="99%" align="center" border="0"><Tr><Td height="49"><Div align="center"><Font color="#009900" size="7" face="华文新魏">课程信息一览表</Font></Div></Td></Tr><Tr><Td height="100"><Table width="100%" height="90" border="1" bordercolor="#0000FF"><Tr><Td width="8%" height="38"><Div align="center"><Font color="#CC6600" size="4" face="华文隶书">课程号</Font> </Div></Td><Td width="27%"><Div align="center"><Font color="#CC6600" size="4" face="华文隶书">课程名称</Font> </Div></Td><Td width="7%"><Div align="center"><Font color="#CC6600" size="4" face="华文隶书">学分</Font> </Div></Td><Td width="9%"><Div align="center"><Font color="#CC6600" size="4" face="华文隶书">最大选课人数</Font></Div></Td><Td width="9%"><Div align="center"><Font color="#CC6600" size="4" face="华文隶书">目前选课人数</Font></Div></Td><Td width="8%"><Div align="center"><Font color="#CC6600" size="4" face="华文隶书">教师号</Font> </Div></Td><Td width="41%"><Div align="center"><Font color="#CC6600" size="4" face="华文隶书">课程描述</Font> </Div></Td></Tr><%For absRecordNum=1 to rsTest.PageSizeResponse.Write "<Tr valign=middle>"'将每条记录的各个字段输出Response.Write "<Td>"&rsTest("Courseno").Value&"</Td>"Response.Write "<Td>"&rsTest("Name").Value&"</Td>"Response.Write "<Td>"&rsTest("Credit").Value&"</Td>"Response.Write "<Td>"&rsTest("Maximumnum").Value&"</Td>"Response.Write "<Td>"&rsTest("Currentnum").Value&"</Td>"Response.Write "<Td>"&rsTest("Teacherno").Value&"</Td>"Response.Write "<Td>"&rsTest("Description").Value&"</Td>"Response.Write "</Tr>"rsTest.MoveNextIf rsTest.EOF ThenExit For '若到记录尾，退出－如当最后一页数据不满页时。