【asp源码栏目提醒】:网学会员asp源码为您提供asp动态网页制作课程实验指导书 - 电子电信参考,解决您在asp动态网页制作课程实验指导书 - 电子电信学习中工作中的难题,参考学习。
《
asp动态网页制作》课程实验指导书 编者:黄凌杰 主审:马 庆 2006年5月 目录 实验1 表单的应用 ........................................................................................................................................... 1 实验2 VBSCRIPT实验猜数字 ...................................................................................................................... 2 实验3 利用FSO对象制作简单留言本.......................................................................................................... 5 实验4 SQL语言 .................................................................................................................................................. 8 实验5 ADO对象实验简单投票系统 ............................................................................................................. 9 实验6 简单BBS用户注册 ......................................................................................................................... 13 实验7 简单BBS用户登录 ......................................................................................................................... 16 实验8 简单BBS找回密码功能 ................................................................................................................. 18 实验9 简单BBS修改密码 ......................................................................................................................... 22 实验10 简单BBS修改用户资料 ................................................................................................................. 24 实验11 简单BBS发帖子 ............................................................................................................................. 27 实验12 简单BBS显示帖子列表 ................................................................................................................. 28 实验13 简单BBS显示帖子详细内容 ......................................................................................................... 32 实验14 简单BBS回复 ................................................................................................................................. 34 实验15 简单BBS显示回复内容 ................................................................................................................. 36 实验16 简单BBS修改帖子 ......................................................................................................................... 38 实验17 简单BBS删除帖子 ......................................................................................................................... 40 实验18 简单BBS搜索 ................................................................................................................................. 41 1 实训1 表单的应用 1.1 实验目的和要求 理解表单在动态网页制作中的作用。
掌握表单的制作。
掌握表单的重要属性。
掌握常用表单组件的使用。
1.2 实验重点和难点 表单的属性。
组件的使用。
1.3 实验内容 制作用户登录网页。
输入用户名密码点击“登录”按钮之后在后台页面把用户输入的用户名和密码显示出来。
1.4 实验步骤 1、 前台登录网页login.
asp的制作。
i. 新建一个
ASP VBScript动态页用Login.
asp名字保存起来。
图 1-1 ii. 添加表单。
指定action属性action”trade.
asp”。
2 iii. 在表单制作如图1-2的用户登录界面。
iv. 设置表单组件的名字1username2psw。
图 1-2 2、 后台处理页面的制作。
i. 新建一个
ASP VBScript动态页用trade.
asp名字保存起来。
ii. 在ltbodygtlt/bodygt之间输入以下代码。
3、 测试效果。
实训2 VBScript实验猜数字 2.1 实验目的和要求 掌握程序结构。
掌握Session变量的作用和使用。
掌握用“”来传递参数的方法。
2.2 实验重点和难点 程序结构的语句格式。
Session变量。
用“”来传递参数的方法。
2.3 实验内容 制作一个猜数字的游戏。
由程序产生一个从1-99之间的数作为要猜的数字。
用提供界面让用户选择要猜的数字。
根据用户每次所猜的数字和电脑产生的数的大小关系逐渐缩小要猜的数字的范围最后让用户猜中。
程序界面见图2-1结果见图2-2。
1 2 lt username TrimRequest.Formquotusernamequot取得用户名 Psw TrimRequest.Formquotpswquot取得密码 Response.write “您输入的用户名是”ampusernameamp”ltbrgt” 显示用户名ltBRgt换行 Response.write “您输入的密码是”psw显示密码 gt 3 图 2-1 图 2-2 2.4 实验步骤 程序分析 1. 产生一个从1到99的数。
利用随机数函数来产生。
2. 产生的数要如何保存普通变量只能在本页面范围内起作用如果需要要多个页面中用到同一个变量的话就需要用到一种特殊的变量Session变量。
3. 我们所猜的数字是怎么发送的把每个数字做成超链接用“”的方式来传递数据。
4. 如何缩小要猜的范围 a 电脑生成一个要让我们猜的数Session“num”。
b 得到用户所猜的数user。
c 最小数:Session“first”。
d 最大数:Session“last”。
e 确定范围 f 最小数 Session“num” 最大数 g 一、userSession“num” 猜中 h 二、最小数 Session“num” 最大数 i 范围user Session“num” 最大数。
显示从user到最大数之间的数。
j 三、最小数 Session“num” 最大数 k 范围最小数 Session“num” user。
显示从最小数到user之间的数。
l 说明蓝方块代表用户所猜的数所在区域 5. 显示要猜的数 a 利用循环根据显示数字的范围来显示。
b 分行显示一行20个字。
4 程序代码 ltdiv alignquotcenterquotgtltspan classquotstyle1quotgt超级无敌开口中 lt/spangtltbrgt lt/divgt ltdiv alignquotcenterquot classquotstyle1quotgt lt Num EvalRequest.QueryStringquotNumquot得到用户所猜的数 if SessionquotFirstquot quotquot then SessionquotFirstquot 1 if SessionquotLastquot quotquot then SessionquotLastquot 99 if Numltgtquotquot then if SessionquotNumquot quotquot then Randomize初始化随机函数 SessionquotNumquot Int100Rnd 1 产生一个从1到99之间的随机数并保存在Session变量中 End if if Num lt SessionquotFirstquot Or Num gt SessionquotLastquot then Response.write quot你猜的数字有误请重新猜数字范围在:quotampSessionquotFirstquotampquot到quotampSessionquotLastquotampquot之间quot else if Num gt SessionquotFirstquot And Num lt SessionquotNumquot then判断h情况 Response.write Numampquot到quotampSessionquotLastquot SessionquotFirstquot Num end if if Num lt SessionquotLastquot And Num gt SessionquotNumquot then判断j情况 Response.write SessionquotFirstquotampquot到quotampNum SessionquotLastquot Num End if if Num SessionquotNumquot then猜中情况 Session.Abandon清除Session变量 Response.write quotltimg src1.bmpgtGame Over你猜得是:quotampSessionquotNumquot猜中时显示图片和再来一次的超链接 Response.write quotlta hrefindex.aspgt再来一次lt/agtquot End if End if End if gt 5 实训3 利用FSO对象制作简单留言本 3.1 实验目的和要求 掌握组件的使用方法。
掌握fso对象里对文本文件进行读写操作的方法。
。
3.2 实验重点和难点 fso对象操作文本文件的方法。
3.3 实验内容 利用fso对象里面对文本文件进行读写操作的方法制作一个简单的留言本实现写留言和看留言这两个功能。
3.4 实验步骤 程序分析 1. 限于FSO操作文本文件的局限性本程序只能实现写留言和查看留言这两个功能。
留言的内 lttable widthquot500quot borderquot1quotgt lttrgt lttdgt请选择你猜的数字lt/tdgt lttdgt lt j 1 For i SessionquotFirstquot to SessionquotLastquot显示要猜的数字 if j mod 20 0 then分行显示每行20个数字 Response.write quotlta hrefindex.aspnumquotampiampquotgtquotampiampquotlt/agtltbrgtquot数字显示的格式把每个数字做成超链接链接的地址是index.aspnumquotampiampquot“”后面是要传递的参数num是要传递的参数名“”后面的是所传递的参数的值。
else Response.write quotlta hrefindex.aspnumquotampiampquotgtquotampiampquotlt/agtampnbspquot end if j j 1 Next gt lt/tdgt lt/trgt lt/tablegt lt/Divgt 6 容是保存在文本文件里面的。
2. 保存的格式也就是我们需要保存的内容。
a 留言最基本的内容留言人留言内容留言时间。
b 利用FSO写文件时都是一行行的写的所以我们设计保存在文本文件里面的留言是每三行是一条留言第一行是留言人第二行是留言内容第三行是留言时间。
3. 写留言。
a 前台让用户填写留言的网页index.
asp。
b 后台处理用户留言的网页把用户所填写的留言写到文本文件里面去Write.
asp。
4. 查看留言的网页Read.
asp。
程序代码 1. 新建一个文本文件Message.txt。
2. 填写留言的网页。
Index.
asp。
如图3-1。
a 表单Action属性要指定处理留言的网页。
Action”write.
asp” b 表单组件的名字1names2Message。
图 3-1 3. 后台处理留言的网页。
Write.
asp。
a 新建一个
asp VBScript动态网把里面的代码全部删除用Write.
asp保存起来。
b 把以下代码输入保存。
1 2 lt names Request.Formquotnamesquot 获取留言人的姓名 Message ReplaceRequest.FormquotMessagequotchr13chr10quotltbrgtquot 获取留言内容 Set fso Server.CreateObjectquotScripting.FileSystemObjectquot 用Server.CreateObject“对象名字”来创建fso对象实例 Set txtStream fso.OpenTextFileServer.MapPathquotMessage.txtquot8 打开文本文件创建文本流对象。
Server.MapPathquot虚拟路径quot把虚拟路径转成实际路径因为操作文件时要用实际路径来操作。
txtStream.WriteLinenames用WriteLine的方法往文本文件里面写一行文字。
写第一行姓名 txtStream.WriteLineMessage 写第二行留言内容 txtStream.WriteLineNow 写第三行留言时间 txtStream.close 关闭对象 Set fso nothing 关闭对象 Response.Redirect quotread.aspquot 用Response.Redirect从当前页面转到查看留言页面 gt 7 4. 查看留言页面。
Read.
asp。
如图3-2。
a 每条留言之间用一条横线lthrgt来分隔。
b 文本文件是以三行为一条完整的留言所以读取的时候也是每读三行就是一条完整的留言。
c 如何判断已经把全部留言读取完毕用到txtStream对象里面的AtEndOfLine属性来判断是否已经到达文件的最后一行也就是判断是否已经把内容读取完了。
当AtEndOfLine的值为True的时候即是已经把留言内容全部读取完了所以我们是在AtEndOfLine的值为False时候需要继续读取留言内容。
图 3-2 ltpgt lt Set fso Server.CreateObjectquotScripting.FileSystemObjectquot 创建fso对象实例 Set txtStream fso.OpenTextFileServer.MapPathquotMessage.txtquot 打开文本文件来读 i 1 第几条留言的标记 Do While Not txtStream.AtEndOfLine 判断留言是否已经全部读取 Response.write quot第quotampiampquot条留言ltbrgt留言人quotamptxtStream.ReadLine 用ReadLine方法一次读取一行。
读第一行 Response.write quotltbrgt留言内容quotamptxtStream.ReadLineampquotltbrgtquot 读第二行 Response.write quot留言时间quotamptxtStream.ReadLineampquotltbrgtquot 读第三行 Response.write quotlthrgtquot 画一条直线 i i 1 Loop txtStream.close 关闭对象 Set fso nothing 关闭对象 gt lt/pgt ltpgtlta hrefquotindex.aspquotgt留言lt/agtlt/pgt 8 实训4 SQL语言 4.1 实验目的和要求 掌握增、删、改、查询这四种常用操作的SQL语句格式。
4.2 实验重点和难点 SQL语句的格式。
4.3 实验内容 根据要求利用SQL语句完成对数据库的操作。
4.4 实验步骤 查询出表Student中来自惠来县的学生的姓名。
Select from Student where stuCounty惠来县 查询出表Student中姓“李”的学生的省市县姓名性别的记录。
Select StuProvinceStuCityStuCountyStuNameStuSex from student where StuName Like 李 查询出表Student中姓名中有“佳”的学生的省市县姓名性别的记录。
Select StuProvinceStuCityStuCountyStuNameStuSex from student where StuName Like 佳 统计出表Student中来自“广州市”的学生的人数。
Select StuCountyCountStuCounty from student group by stuCounty 查询出表Score中期中考试成绩及格的学生的记录。
Select from Score where Midgt60 查询出表Score中期中考试成绩在70-80分之间的学生的记录 Select from Score where Midgt70 And Midlt80 查询出期中考试的平均分总分最高分最低分人数。
Select AvgMidSumMidMaxMidMinMidCountMid from score 增加一个“国际贸易”的专业。
Insert Into Dep dep values国际贸易 9 将“办公自动化”专业改成“文秘” Update Dep Set Dep文秘 where dep办公自动化 删除“会计”专业的记录 Delete from dep where dep会计 删除id等于10的专业的记录 Delete from dep where id10 实训5 ADO对象实验简单投票系统 5.1 实验目的和要求 掌握Connection对象的使用。
掌握Connection对象操作数据库步骤。
5.2 实验重点和难点 Connection对象操作数据库的步骤。
连接字符串的写法。
5.3 实验内容 制作一个简单投票系统包括投票和查看投票结果。
5.4 实验步骤 数据库设计。
根据我们所要保存的内容来设计数据库。
本例子中我们将要对四个选项进行投票所以在数据库里面要有相应的表来保存这四个选项的投票结果。
表结构如表格5-1。
建好表之后在表中加入一条全0的新记录做为四个选项的初始票数。
表名为VV。
Vote1对应保存第一个图的投票结果Vote2对应保存第二个图的投票结果Vote3对应保存第三个图的投票结果Vote4对应保存第四个图的投票结果。
字段名称 数据类型 字段大小 Vote1 数字 长整型 Vote2 数字 长整型 Vote3 数字 长整型 Vote4 数字 长整型 表格 5-1 10 投票网页的制作Vote.
asp。
图 5-1 1、 新建一个VbScript动态页用Vote.
asp保存起来。
2、 添加表单设置表单Action属性。
Action”T_Vote.
asp”。
指定后台网页用来处理投票数据。
3、 自己排版好网页。
4、 四个单选框的名字要一样。
5、 每个单选框的值要和数据表VV里面用来保存结果的字段名相对应方便我们后台编写程序。
第一个单选框值为Vote1第二个单选框的值为Vote2第三个单选框的值为Vote3第四个单选框的值为Vote4 后台处理页面的制作T_Vote.
asp。
1、 程序分析根据用户在前台网页上所选的选项去更新数据表VV里面的相应字段的值例如用户选了第一个图那么数据表VV里面相应的Vote1字段的值就要加1。
2、 新建一个VbScript动态页用T_Vote.
asp保存起来。
把里面的代码全部删除输入以下代码。
lt Set Conn Server.CreateObjectquotADODB.Connectionquot创建连接对象Connection对象实例 ConnStr quotDriverMicrosoft Access Driver .mdbDBQquotampServer.MapPathquotdb1.mdbquot指定连接字符串 Conn.Open ConnStr用连接对象的Open方法来打开数据库连接 vote Request.Formquotvotequot获取用户所选的选项 SqlStr quotUpdate VV Set quotampvoteampquot quotampvoteampquot 1quot用SQL语句Update来更新数据库相应的字段加1 Conn.Execute SqlStr用连接对象的Execute方法去执行SQL语句 Conn.close关闭对象 Set Conn nothing释放资源 Response.Redirect quotshow.aspquot重定向到显示投票结果页面 gt 11 显示投票结果网页Show.
asp。
1、 显示界面的设计。
用图形的方式来显示投票结果根据票数的多少来改变图片的宽度如图5-2。
图 5-2 2、 程序分析。
i. 从数据表VV里面把投票结果读取出来然后显示到相应的位置。
ii. 查询和更新插入删除之间的不同。
更新插入删除只是执行某一个操作执行之后并没有一个具体记录返回给我们的而查询在执行之后会有一个查询结果也就是一些记录返回给我们我们把这些查询结果叫做记录集。
iii. 执行查询语句时要把查询到的结果保存到一个记录集对象里面之后我们才可以去用查询到的结果。
用法Set 记录集对象实例名字Conn.ExecuteSelect语句 iv. 通过记录集对象来使用我们所查询到的结果。
用法“记录集对象实例名“相应字段名” ” v. 当只有一行代码并且是显示用的。
那么这时可以用“”来代替“Response.Write”。
lt”hello World”gt和ltResponse.write “hello World”gt的作用是一样的但只限定在只有一行代码的情况下。
vi. 用图形的方式来显示投票结果。
把票数读取出来改变图片的Width属性。
在这里乘以2是为了让对比更加明显。
ltimg srcquotvficon.gifquot widthquotltRsquotVote2quot2gtquot heightquot15quotgt vii. 用JavaScript来实现关闭当前网页的功能。
lta hrefquotquot onClickquotjavascript:window.closequotgt关闭lt/agt viii. 代码见下页。
12 lt Set Conn Server.CreateObjectquotADODB.Connectionquot创建连接对象Connection对象实例 ConnStr quotDriverMicrosoft Access Driver .mdbDBQquotampServer.MapPathquotdb1.mdbquot指定连接字符串 Conn.Open ConnStr用连接对象的Open方法来打开数据库连接 SqlStr quotSelect From VVquot’用SQL语句Select从数据表VV里面查询出投票结果 Set Rs Conn.ExecuteSqlStr’ 用连接对象的Execute方法去执行SQL语句并把查询结果赋给一个记录集对象Rs gt lttable borderquot0quot alignquotcenterquotgt lttrgt lttd widthquot65quotgtltimg srcquot11.GIFquot widthquot50quot heightquot50quotgtlt/tdgt lttdgtltimg srcquotvficon.gifquot widthquotltRsquotVote1quot2gtquot heightquot15quotgtltRsquotVote1quotgt票lt/tdgt lt/trgt lttrgt lttdgtltimg srcquot22.GIFquot widthquot50quot heightquot50quotgtlt/tdgt lttdgtltimg srcquotvficon.gifquot widthquotltRsquotVote2quot2gtquot heightquot15quotgtltRsquotVote2quotgt票lt/tdgt lt/trgt lttrgt lttd heightquot50quotgtltimg srcquot33.GIFquot widthquot50quot heightquot50quotgtlt/tdgt lttdgtltimg srcquotvficon.gifquot widthquotltRsquotVote3quot2gtquot heightquot15quotgtltRsquotVote3quotgt票lt/tdgt lt/trgt lttrgt lttd borderquot0quotgtltimg srcquot44.GIFquot widthquot50quot heightquot50quotgtlt/tdgt lttdgtltimg srcquotvficon.gifquot widthquotltRsquotVote4quot2gtquot heightquot15quotgtltRsquotVote4quotgt票lt/tdgt lt/trgt lttrgt lttd colspanquot2quot borderquot0quotgtlta hrefquotvote.aspquotgt投票lt/agt lta hrefquotquot onClickquotjavascript:window.closequotgt关闭lt/agtlt/tdgt lt/trgt lt/tablegt lt Rs.close’关闭记录集对象 Conn.close’关闭连接对象 Set Conn nothing’释放资源 gt 13 实训6 简单BBS用户注册 6.1 实验目的和要求 掌握用户注册的流程。
掌握查询语句和插入语句的格式和用途。
6.2 实验重点和难点 注册流程。
SQL语句的使用。
6.3 实验内容 制作BBS的用户注册功能。
6.4 实验步骤 数据库设计。
1、 新建一个空白数据库BBS.MDB。
2、 根据我们所要保存的内容来设计数据库。
用户表需要保存相应的用户信息。
包括用户名密码性别头像QQ找回密码问题找回密码答案。
数据库设计如下表。
数据表名User。
字段名 .
上一篇:
ASP+SQL Server典型网站建设案例
下一篇:
心力衰竭的中医证素及常见证型