html教程ASP教程.docx
- 文档编号:17188079
- 上传时间:2023-07-22
- 格式:DOCX
- 页数:13
- 大小:17.27KB
html教程ASP教程.docx
《html教程ASP教程.docx》由会员分享,可在线阅读,更多相关《html教程ASP教程.docx(13页珍藏版)》请在冰点文库上搜索。
html教程ASP教程
vVBScript语言
v3.2VBScript编程基础
v变量:
dim
v常量:
const
ConstMyString="这是一个字符串。
"
ConstMyAge=49
ConstCutoffDate=#6-1-97#
v运算符
v注意一个特殊的运算符:
字符串连接(&)
例如:
abc&cdef=abccdef
v
v
v
v
vscore=75
vmsgbox"你的成绩为"&score
vscore=90
vmsgbox"你的成绩已改为"&score
v
v
v
v
v
<%
Dimtem
Tem=hour(now())
Iftem<12then
Strg=“早上好”
Else
Strg=“您好”
Endif
%>
<%=strg%>
vVBScript流程控制
v条件语句
If...Then...Else语句
SelectCase语句
v循环语句
Do...Loop:
当(或直到)条件为True时循环。
While...Wend:
当条件为True时循环。
For...Next:
指定循环次数,使用计数器重复运行语句。
ForEach...Next:
对于集合中的每项或数组中的每个元素,重复执行一组语句。
vIf...Then...Else语句
vIf条件then
v语句1
vElse
v语句2
vEndif
v
v
v
vscore=inputbox("请输入成绩:
","输入成绩")
vifscore>=60then
vmsg="及格"
velse
vmsg="不及格"
vendif
vmsgbox"你的成绩:
"&msg
v
v
v
v
v
<%@LANGUAGE="VBSCRIPT"%>
<%
Subjudge(grade)
Ifgrade>=60then
Str=“及格”
Else
Str=“不及格”
Endif
Endsub
%>
DimI
i=2
Ifimod2=0then
Msgbox”这是一个偶数!
”
Elsemsgbox”这是一个奇数!
”
Endif
vSelectCase语句
vSelectcase测试表达式
vCase表达式值1
v语句
vCase表达式值2
v语句
vCaseelse
v语句
vEndselect
v
v
v
vno=inputbox("请输入一个1-5之间的数字:
","中议英")
vselectcaseno
vcase1
vmsg="a"
vcase2
vmsg="b"
vcase3
vmsg="c"
vcaseelse
vmsg="对不起,超过范围了"
vendselect
vmsgboxno&"的英文为"&msg
v
v
v
v
v
Selectcasestr
Case“及格”
Msgbox”你及格了”
Case“不及格”
Msgbox“要继续努力”
Caseelse
Msgboxstr
Endcase
Dimi
i=66
selectcasei
Case65
msgbox=“A"
Case66
msgbox=“B"
Case67
msgbox=“C“
Case68
msgbox=“D“
Caseelse
msgbox=“Z“
Endselect
vDo循环语句
vDo[while/untile循环条件]
v循环体
v[exitdo]
vLoop
v
v
v
vans=inputbox("请输入'计算机'的英文")
vdowhileucase(ans)<>"COMPUTER"
vmsg="不正确"&"请重新输入'计算机'的英文"
vans=inputbox(msg)
vloop
vmsgbox"恭喜你,答对了"
v
v
v
v
v
DimI,str
i=1
DowhileI<10
i=i+1
Loop
Str=cstr(i)
Msgbox”现在变量的值是:
”&str
Subchwhile()
Dimcounter,mynum
Counter=0
Mynum=9
Do
Mynum=mynum-1
Counter=counter+1
Loopwhilemynum>0
msgbox“循环重复了”&counter&“次”
Endsub
vForEach...Next
v
v
v
vDimscore
vScore=array(4,6,1,8)
vForeachnuminscore
vmsg=msg&num
vNext
vmsgboxmsg
v
v
v
Dimi,sum
Fori=1to100
Sum=sum+1
Next
Str=cstr(sum)
Msgbox”现在变量的值是:
”&str
<%
Fori=1to5
Response.write”hello”
Ifi=3thenexit
Fornext
%>
v数组
v包含一个值的变量被称为标量变量,数组变量则包含多个值
v定义:
DimA(3)
v数组
v赋值:
A(0)=256
A
(1)=324
A
(2)=100
A(3)=592
vFor…...Next
Subnewtotal()
Dimmynum,total
Formynum=16to2step-2
Total=total+mynum
Next
Msgbox”总和为:
”&total
Endsub
v
v
v
v
vdimmynum,total
vFormynum=16to2step-2
vTotal=total+mynum
vnext
vMsgbox"总和为:
"&total
v
v
v
v
v<%
vDimmynum,total,tt
vFormynum=16to2step-2
vtotal=total+mynum
vNext
vtt="总和为:
"&total
v%>
v<%=tt%>
v
v过程与函数
v两类过程:
Sub过程和Function函数
过程是编制程序时定义的一个语句序列,用来完成某种指定的操作。
函数是子程序的另一种形式,也是编制程序时定义的一个语句序列.与过程不同的是函数不以实现某种操作为目的,而仅是为了获得一个计算结果值.
这个结果值最终是通过函数名返回给调用者的.
vSub和Function的区别
vFunction可以返回值
vSub不返回值
vFunction可以当作一个变量用在程序中
vSub只能作为单独语句使用
v
vcontemp
vsubcontemp()
vtemp=inputbox("请输入华式温度:
",1)
vmsgbox"温度为"&celsius(temp)&"摄氏度"
vendsub
vfunctioncelsius(fdegrees)
vcelsius=(fdegrees-32)*5/9
vendfunction
v
输入与输出函数:
Inputbox()实现对用户输入的数据程序进行处理并将处理信息反馈给用户。
Msgbox()实现程序给用户提供信息提示窗口,接收用户的选择信息后加以处理反馈。
注:
这两个窗体函数仅能用在客户端脚本。
v错误处理
v“语法”错误
v错误处理
v“运行时”错误
v错误处理
vDoWithError.asp
vVBScript编写客户端脚本
vVBScript编写客户端脚本
v利用客户端脚本程序检验数据的有效性
v
vsubbutton_onclick
vdimtf
vsettf=document.form1
vifIsNumeric(tf.text.value)then
viftf.text.value<1ortf.text.value>10then
vmsgbox"请输入一个1到10之间的数字"
velsemsgbox"谢谢"
vendif
velse
vmsgbox"请输入一个数字"
vendif
vendsub
v
v
v
vsubbutton_onclick
vdimtheform
vsettheform=document.form1
viftheform.select.value>6andtheform.select.value<10then
viftheform.text2.value>20then
vmsgbox"金额为:
"&theform.text1.value*theform.text2.value*0.15
velseiftheform.text2.value>10then
vmsgbox"金额为:
"&theform.text1.value*theform.text2.value*0.05
velsemsgbox"金额为:
"&theform.text1.value*theform.text2.value*1
vendif
vendif
velse
viftheform.text2.value>20then
vmsgbox"金额为:
"&theform.text1.value*theform.text2.value*0.25
velseiftheform.text2.value>10then
vmsgbox"金额为:
"&theform.text1.value*theform.text2.value*0.15
velsemsgbox"金额为:
"&theform.text1.value*theform.text2.value*1
vendif
vendif
vendif
vendsub
v
v
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- html 教程 ASP