江 西 科 技 师 范 大 学 实 验 报 告

年级 班级 号 姓名 同组姓名 实验日期 年 月 日 成绩

实验一 ASP编程环境配置

一、实验目的：

了解并掌握windows xp或windows 2007上IIS的安装与配置； 了解并掌握虚拟目录的设置方法；

了解并掌握ASP文件上传、下载和运行方法。

二、实验类型：验证型

三、实验内容：

按教材所介绍的方法，在自己的个人计算机上不同的Windows系统上安装IIS。

编写一个简单的ASP网页程序，实现在浏览器IE中输出“这是我的第一个ASP程序”

四、实验步骤：

1. 启动dreamweaver或frontpage，切换到源代码显示方式。（或者其他文本编辑器）

2. 在之间加入如下ASP代码：<% response.write (“这是我的第一个ASP程序！”) %> 3. 将网页保存到WEB服务器的根目录下，文件可命名为first.asp

4. 启动IE浏览器，在地址栏中输入：http://localhost/first.asp，然后按回车，注意观察输出结果。

5. 在wwwroot目录下创建一个子目录，如myroot，然后将first.asp文件复制到其中，在IE浏览器的地址栏中输入：http://localhost/myroot/first.asp，按回车，注意观察能否正确运行。 6. 注意观察输出结果。

指导老师： 第 页

江 西 科 技 师 范 大 学 实 验 报 告

年级 班级 号 姓名 同组姓名 实验日期 年 月 日 成绩

实验二 Vbscript程序设计

一、实验目的：

了解并掌握Vbscript脚本程序设计语言的基本语法知识及简单程序设计方法； 熟练掌握Vbscript的IF语句和select case语句的编程技术；

熟练掌握Vbscript的for…next、do…loop、for each….in等循环语句的编程技术。

二、实验类型：验证型

三、实验内容：

利用Vbscript在网页中输出当前的时间和日期；

试用Vbscript编程，实现计算并输出1到10的阶乘之和；

四、代码：

1. 利用Vbscript在网页中输出当前的时间和日期

2. 试用Vbscript编程，实现计算并输出1到10的阶乘之和 <% dim s dim i dim sum i = 0 s = 1

do while(i<10) i=i+1 s = s * i

sum = sum + s loop msgbox sum %>

指导老师： 第 页

江 西 科 技 师 范 大 学 实 验 报 告

年级 班级 号 姓名 同组姓名 实验日期 年 月 日 成绩

实验三 request和response程序设计

一、实验目的：

熟练掌握利用resquest对象从客户端获得信息的技术；

熟练掌握Form和querystring方法，编制用户注册信息的填写与显示程序； 熟练掌握利用response对象向客户端输出信息的技术；

熟练掌握write、redirect和cookies方法，编制相关的验证演示程序

二、实验内容：

试编写一个简单的注册程序，客户注册后显示客户的注册信息

试编写一个HTML页面，在页面中输出4个多项选择题，题目内容自拟，每个题目均有A、B、C、D四个选项，当用户单击“交卷”按纽时，提交答案给grade.asp页面，grade.asp页面获得表单所提交的数据后，将数据直接输出给客户端，以显示用户对各题所作出的选择。

试编写一个ASP程序，实现在浏览器中显示接受请求的服务器的IP地址、服务器的端口号、当前网页的实际物理路径、当前网页的虚拟路径和发出请求的客户端IP地址。

三、实验步骤

1. 将表单提交给自身。并判断：如果今天正好是用户的生日，就输出祝贺信息。 代码如下：

<%If Request.Form(\

Dim txtYear,txtMonth,txtDay '为了引用方便，声明变量 txtYear=Request.Form(\

'前面的txtYear是一个变量，后面的txtYear是表单中一个元素的名字，不是一'回事，名字可以一样，也可以不一样，这里主要是为了方便记忆。 txtMonth=Request.Form(\txtDay=Request.Form(\

If Cint(txtYear)=Cint(Year(Date())) and Cint(txtMonth)=Cint(Month(Date())) and Cint(txtDay)=Cint(Day(Date())) then Response.write \祝您生日快乐！\End if End If %>

2. 请开发一个页面，显示来访者的IP地址。并判断：如果IP地址以202.112开头，则显示欢迎信息；否则显示为非法用户，并终止执行程序。 代码如下： <%Dim IP IP=Request.ServerVariables(\

指导老师： 第 页

江 西 科 技 师 范 大 学 实 验 报 告

年级 班级 号 姓名 同组姓名 实验日期 年 月 日 成绩

If Mid(IP,1,7)=\Response.Write \欢迎您\Else

Response.Write \您是非法用户\Response.End End If %>

指导老师： 第 页

江 西 科 技 师 范 大 学 实 验 报 告

年级 班级 号 姓名 同组姓名 实验日期 年 月 日 成绩

实验四 session和application程序设计

一、实验目的：

熟练掌握利用session对象记载特定客户信息的技术，编制相关的验证演示程序；

熟练掌握利用application对象记载所有客户信息的技术，编制相关的验证演示程序，并设计一个 简单“聊天天室”

二、实验类型：验证型和设计型 三、实验内容：

上机验证教材上的例子；

试编写一个ASP程序，实现并显示当前网页的在线人数和计数器；

试编写一个ASP程序，实现一个简单的聊天室，能够显示发言人的姓名、发言内容和发言时间等。

四、实验步骤

1. 编写两个页面，在第一个页面中用户要输入姓名，然后保存到Session中，然后自动引导到第二个页面。在第二个页面中读取该Session信息，并显示欢迎信息。如果用户没有在第一页登录就直接访问第二页，要将用户重定向回第一页。 代码如下：

利用Session保存信息

<%If Request.Form(\

Session(\ End If%>

利用Session显示欢迎信息

<%If Session(\ Response.Redirect \End If %>

<% Response.Write Session(\您好，欢迎光临\

指导老师： 第 页

江 西 科 技 师 范 大 学 实 验 报 告

年级 班级 号 姓名 同组姓名 实验日期 年 月 日 成绩

2. 在示例5-5.asp的基础上添加一些代码，使得每位用户访问期间不管怎么刷新页面都只计数1次。（提示：结合Session对象，但不要使用Global.asa文件） 代码如下：

<% If session(\ Then '给每个用户设定一个session（\）变量 Application.Lock '先锁定 Application(\'给Application变量赋值 Application.Unlock '解除锁定 session(\ End If Dim intVisit intVisit=Application(\ '获取Application变量 Response.Write \您是第\位访客。\ %>

指导老师： 第 页

江 西 科 技 师 范 大 学 实 验 报 告

年级 班级 号 姓名 同组姓名 实验日期 年 月 日 成绩

实验五 ASP存取数据库

一、实验目的：

以sql server数据库为例，熟练掌握ASP存取数据库技术。

设计一个具有查询、更新、删除和插入功能的网络数据库系统。 二、实验类型：验证型和设计型 三、实验内容：

1．设计一个具有查询、更新、删除和插入功能的网络数据库系统。 四、实验步骤

1. 利用数据库在首页开发一个计数器（提示：每次访问该页面就读取数据库中的访问次数，然后再更新记录即可）。

代码如下：

Set db=Server.CreateObject(\

Db.Open \读取计数器 dim sql,visitnumber,rs

sql=\SET rs=db.EXECUTE(sql)

If Not rs.Bof And Not rs.Eof Then visitnumber=rs(\visitnumber=visitnumber+1

sql=\ db.EXECUTE(sql) Else

visitnumber=1

sql=\db.EXECUTE(sql) End If

response.write \您是第\位访问者\

指导老师： 第 页

江 西 科 技 师 范 大 学 实 验 报 告

年级 班级 号 姓名 同组姓名 实验日期 年 月 日 成绩

%> 下面是我的主页的正式内容??

指导老师： 第 页

江 西 科 技 师 范 大 学 实 验 报 告

年级 班级 号 姓名 同组姓名 实验日期 年 月 日 成绩

课程设计：新闻发布系统

一、实训目的：

ASP程序设计实训是为了巩固和加深《ASP程序设计》课程的相关理论知识、提高学生动手能力， 而专门开设的一门综合实践课程。

本课程以一个企业WEB应用程序为例，通过需求分析、系统设计、数据库设计、界面设计、系统 编码、测试、软件部署等环节的训练，使学生进一步巩固和掌握ASP相关知识点，积累ASP WEB 网站开发经验，培养学生应用面向对象的思想分析问题、解决问题的能力，为今后进一步深入学习 打下一个坚实的基础。 二、实训时间：5天 三、实训环境：

电脑，机器联网，dreamweaver或其他网页开发工具，sql server 2005，acess 四、实训题目：新闻发布系统

随着信息时代和因特网的产生，信息变的越来越重要。新闻发布系的创建目标是给用户提供及时并有用的一个信息空间。它主要由新闻管理、评论管理、用户管理和站内搜索等几大部分组成。系统主要包括匿名用户、普通会员和管理员，这三种用户多系统的需求如下：

首先我们要明确，一个新闻发布系统所能实现的最基本的功能： 1、一般在网站的首页有新闻的标题列表（news_list.asp） 2、通过显示的新闻标题可以看到新闻的内容(news_detail.asp) 3、有一个管理员登陆的入口（login.asp） 4、添加新闻的页面（news_add.asp）

5、编辑新闻的列表的页面（news_edit.asp） 6、修改并更新新闻的页面（news_update.asp）

7、此外还有新闻修改和删除成功的页面（news_del_ok.asp，news_update_ok.asp）

五、实验步骤 数据库的建立

动态网站中的内容一般源自数据库，如SQL Server 数据库、甚至是小型的Access数据库，呵呵，对于刚接触动态网页制作的菜鸟来说，还是Access数据库比较容易上手，而且实用一点，所以我们制作的新闻系统是基于Access数据库的。

我们可以用Access2000创建一个数据库文件,并命名为“newstest.mdb”。

用“使用数据库创建表”在newstest.mdb中创建一个存储新闻信息的表，保存名为“news”。

创建一个存储用户名和帐号的表，保存名为“mypass”。表中的字段具体内容如图1-3所示，在表中输入一个用

指导老师： 第 页

本文来源：https://www.bwwdw.com/article/nrnf.html