电子商务程序设计实验指导书Word下载.docx
《电子商务程序设计实验指导书Word下载.docx》由会员分享，可在线阅读，更多相关《电子商务程序设计实验指导书Word下载.docx（23页珍藏版）》请在冰点文库上搜索。
1、“主目录”选项卡
2、“网站”选项卡
3、“文档”选项卡
4、“HTTP头”选项卡
四、使用IIS
编写程序输出一下内容：
“这是利用ASP网页输出的信息”。
[参考步骤]：
1.启动Dreamweaver8，然后切换到源代码显示方式；
2.在<
body>
与<
/body>
之间，加入以下ASP代码：
3.<
%Response.write（“这是利用ASP网页输出的信息”）%>
；
4.将网页保存到C：
\Inetpub\wwwroot目录下，文件命名为first.asp；
5.启动IE浏览器，在地址栏中键入：
http:
//localhost/first.asp或http:
//127.0.0.1/first.asp，然后按回车。
注意观察输出结果；
6.在wwwroot目录下创建一个myweb子目录，并将first.asp文件移动到myweb目录下，然后在浏览器中键入http:
//Localhost/myweb/first.asp；
VBScript编程
熟悉VBScript的语法、掌握服务器端利用VBScript编程的基本方法
掌握VBScript语言的语法特点和内置的常用函数的用法；
对程序的结构（顺序、分支、循环、过程）的概念和语法比较清晰；
具备基本的编写程序的能力。
1、编写程序显示系统当前日期。
日期格式为：
“×
×
年×
月×
日星期×
”
其中星期×
应为中文习惯，例如：
星期一。
2、P81第2---6题
7、编写程序显示“距2015年元旦倒记时的天数”
8、编写程序，显示用户注册后登陆时的四位验码？
9、随机字符串（选作）
10、递归调用求n的阶乘（选作）
11、制作ASP日历（选作）
附件：
参考代码：
×
<
%
myear=Year（date（））
mmonth=month（date（））
mday=day（date（））
mweekday=weekday（date（））
selectcasemweekday
Case1
shijiweekday="
日"
Case2
一"
Case3
二"
Case4
三"
Case5
四"
Case6
五"
Case7
六"
EndSelect
response.Writemyear&
"
年"
&
mmonth&
月"
mday&
日星期"
shijiweekday
%>
response.Write（date（））
Response.write“距2008北京奥运会开幕还有”&
DateDiff（“d”,date（）,“2015/1/1”）&
”天”
8、编写程序，显示用户注册后登陆时的四位数字验证码？
ForI=1to4
Randomize
suiji=suiji&
Int（（9-0+1）*Rnd+0）
Next
response.writesuiji
9、随机字符串
%@LANGUAGE=VBScript%>
html>
title>
/title>
h3>
FunctionGet_Key（digits）
'
定义并初始化数组
dimchArray（26）
'
初始化数字
Fori=65To90
chArray（i-65）=Chr（i）
Next
Randomize'
初始化随机数生成器。
、
dowhilelen（output）<
digits
num=chArray（Int（（26-0+1）*Rnd+0））
output=output+num
loop
Get_Key=output
EndFunction
/html>
10、递归调用求n的阶乘
<
head>
<
递归计算阶乘<
SCRIPTlanguage="
VBScript"
>
!
--
FunctionFac（n）
Dimf
Dimnum
num=cint（n）
Ifnum=1Ornum=0then
f=1
else
f=Fac（n-1）*n
Endif
Fac=f
EndFunction
SubshowResult（n）
DimResult
Result=Fac（n）
MsgBoxResult
EndSub
-->
/SCRIPT>
/head>
formname="
frmExercise2"
输入一个整数：
INPUTtype="
text"
name="
InputText"
nbsp
inputtype="
button"
value="
计算阶乘"
onclick="
ShowresultfrmExercise2.InputText.Value"
/form>
11、制作ASP日历
Html>
Title>
制作ASP日历<
FunctionCountDays（iMonth,iYear）
SelectCaseiMonth
case1,3,5,7,8,10,12
CountDays=31
case2
ifIsDate（"
2/29/"
&
iYear）Then
CountDays=29
else
CountDays=28
endif
case4,6,9,11
CountDays=30
EndSelect
FunctionFirstDay（iMonth,iYear）
FirstDay=WeekDay（iMonth&
"
/1/"
iYear）
dimmMonth,mYear
mMonth=Month（Date（））
mYear=Year（Date（））
mDate=Day（Date（））
divalign="
center"
style="
background-color:
#CC9933;
color:
#FFFFFF"
strong>
%=mYear%>
年<
%=mMonth%>
月<
/strong>
/div>
hrsize="
1"
color="
#00CC00"
noshade="
noshade"
tablewidth="
90%"
border="
0"
align="
cellpadding="
cellspacing="
2"
bgcolor="
#F1F1F1"
trbgcolor="
#EBEBEB"
tdalign=right>
星期日<
/td>
星期一<
星期二<
星期三<
星期四<
星期五<
星期六<
/tr>
j=1
fori=1to42
ifi>
=FirstDay（mMonth,mYear）andj<
=CountDays（mMonth,mYear）then
ifmDate=jthen
response.write"
tdalign=rightbgcolor='
#CC9933'
fontcolor=RED>
j&
/font>
#FFFFFF'
j
j=j+1
response.write"
nbsp;
ifimod7=0then
tr>
next
/table>
实验三ASP内置对象的使用
一、实验目的：
1、熟练掌握利用Request对象的Form和QueryString方法从客户端获得信息的技术；
2、熟练掌握Response对象的Write、Redirect和Cookies等方法。
3、熟练掌握利用Application对象；
4、熟练掌握利用Session对象，Server对象。
二、实验要求：
学生充分理解面向对象的程序设计；
理解和掌握ASP内建对象request和Response对象、Application、Session、Server对象的的常用属性和方法；
三、实验器材：
IIS、Dreamweaver8、Access2000数据库系统等。
1、试编写一个简单的注册程序，客户注册后显示客户的注册信息。
（在程序中可加验证码，可加表单的客户端验证程序javascript）
2、编写一个ASP页面，实现利用Response对象的write方法，向客户端输出一超级链接，该超链接的标题为“返回首页”，链接的地址为“index.asp”
3、试编写一个HTML页面，该页面中有4个题目（每题25分，题目内容自拟），每个题均有A、B、C和D四个多项选择选项，当用户单击“交卷”按钮时，提交用户选择的答案给grade.asp页面，grade.asp页面获得用户答案数据后，将用户答案数据和正确答案数据输出给客户端，并根据评分规则自动生成分数。
评分规则自定？
4、试编写一个ASP程序，实现在浏览器中显示接受请求的服务器的IP地址、服务器的端口号、当前网页的实际物理路径、当前网页的虚拟路径和发出请求的客户端IP地址。
5、（选做）Windows身份认证。
6、设计用户登陆页面login.htm。
若用户名和口令均为guest，则导航到guest.asp页面；
若用户名为administrator，口令为haweofw，则导航到manager.asp页面。
若口令错误，则输出“口令错误！
单击此处返回”的提示信息，“单击此处返回”为超链接，用户单击后，重新返回到登陆页面。
用于表单处理并实现口令判断的页面为dispose.asp。
要求分别用表单的Post和Get方法，来分别实现该操作；
用户登录
用户名：
口令：
确定重填
7、利用Session编写程序，当用户登陆时，对用户登陆的数据进行有效性验证，并且一次只允许用户尝试登陆三次。
8、防刷新的计数器
9、（选做）猜数字游戏
10、（选做）编写聊天室程序。
五、参考代码
1、参考代码：
Index.asp
metahttp-equiv="
Content-Type"
content="
text/html;
charset=gb2312"
scriptlanguage="
JavaScript"
type="
text/JavaScript"
functionsubmitit（）
{
varmyform=document.newsform;
if（myform.xingming.value=="
）
{
alert（"
请输入姓名！
）;
returnfalse;
}
if（myform.psw.value=="
请输入密码！
returntrue;
}}}
//-->
/script>
newsform"
method="
POST"
action="
Index1.asp"
onSubmit="
returnsubmitit（）;
510"
bordercolor="
#C0C0C0"
>
tdheight="
22"
colspan="
4"
right"
#EFEFEF"
left"
当前位置：
添加用户：
tdwidth="
78"
height="
div>
姓 名：
164"
inputname="
xingming"
id="
size="
20"
tdwidth="
密 码：
psw"
password"
class="
kuang"
tdstyle='
word-break:
break-all'
5"
cols="
palign="
submit"
提交"
B1"
reset"
重置"
B2"
Index1.asp
%optionexplicit%>
%response.buffer=true%>
dimname,mima
name=request.form（"
mima=request.form（"
h2>
下面是你的个人信息<
/h2>
姓名:
%response.writename%>
br>
密码:
%response.writemima%>
2、参考代码：
%
response.write"
ahref='
index.asp'
返回首页<
/a>
3、参考代码：
formid="
form1"
post"
grade.asp"
p>
一、单项选择题（每题2分，共计20分）<
br/>
1、ASP网页是在（）执行的。
radio"
no1"
a"
/>
客户端浏览器
b"
服务器端<
c"
没有定论
d"
第一次在服务器端，以后在客户端<
Submit"
交卷"
/p>
grade.asp
dimno1,chengji
chengji=0
no1=request.Form（"
if（no1="
）then
chengji=chengji+2
endif
response.write（"
你的成绩为：
chengji）
4、参考代码：
pagename=server.MapPath（request.ServerVariables（"
script_name"
））
response.Write（pagename）
servername=request.ServerVariables（"
server_name"
response.Write（servername）
serverport=request.ServerVariables（"
server_port"
response.Write（serverport）
serverip=request.ServerVariables（"
local_addr"
response.Write（serverip）
5、参考代码：
略
6、参考代码：
login.htm
dispose.asp"
479"
98"
tdcolspan="
用户登陆<
211"
327"
username"
td>
口令：
psword"
111111"
确定"
Submit2"
重填"
dispose.asp
%username=request.Form（"
psword=request.Form（"
）
ifusername="
guest"
andpsword="
then
response.Redirect（"
guest.asp"
elseifusername="
administrator"
123456"
then
manager.asp"
response.Write（"
login.asp'
单击此处返回！
升级会员 