项目 2 VBScript 编程基础

项目2 VBScript编程基础 • VBScript脚本语言概述 • 设置主脚本语言 • VBScript数据类型与表达式 • 相关实践知识 • 数据输入与输出 • 条件语句 • 循环语句 • 过程

1 VBScript脚本语言概述 • VBScript介绍 • VBScript是一种脚本语言，是ASP默认脚本的语言。VBScript是Microsoft Visual Basic的简化版本，这意味着这种语言比BASIC语言版本容易使用，脚本语言的句法比较简单。在HTML文件中直接嵌入VBScript脚本扩展HTML，使它不仅仅是一种页面格式语言，而且可以对用户的操作作出反应。

1 VBScript脚本语言概述 • ASP的脚本引擎 • 用户可以使用任意一种其相应的脚本引擎已安装在 Web 服务器上的脚本语言。脚本引擎是处理用某种语言书写的命令的程序。Active Server Pages 带有两个脚本引擎，它们是：Microsoft Visual Basic Scripting Edition (VBScript) 和 Microsoft JScript。当然，也可以安装和使用其他的脚本语言引擎。

2 设置主脚本语言 • 设置主脚本语言 • ASP 主脚本语言是用来处理在分界符 <% 和 %> 内部的命令的语言。默认时，主脚本语言是 VBScript。 • 要设置单个页的主脚本语言，可将 <%@ LANGUAGE %> 指令添加到 .asp 文件的开头。该指令的语法是： • <%@ LANGUAGE=ScriptingLanguage %> • 其中 ScriptingLanguage 就是您所设置页的主脚本语言。如果对某页进行了设置，那么该页将忽略在应用程序中对所有页的全局设置。

3 VBScript数据类型与表达式 • 常量 VBScript常量指的是在程序运行过程中其值不改变的量，这些常量包括：颜色常量、比较常量、日期格式常量、日期和时间常量、DriveType常量、File Attributed常量、文件输入/输出常量、MsgBox常量、SpecialFolder常量、字符串常量等。可以用Const语句来创建VBScript常量，格式为： Const 符号常量名=表达式[ ,符号常量名=表达式 ]

3 VBScript数据类型与表达式 • 变量 • 在程序运行过程中可以改变的量。每个变量都有一个名字和相应的数据类型，通过名字来引用一个变量，而数据类型由决定了该变量的储存方式，任何一个变量，一旦存入内存后，就必须用某种方式访问它，才能执行指定的操作。变量是一个名字，给变量命名时应遵守以下几个规则： • （1）名字只能由字母、数字和下划线组成； • （2）名字的第一个字符必须是英文字母，最后一个字符可以是类型说明符； • （3）名字的有效字符为255个； • （4）不能用Visual Basic的保留字作变量名，但可以把保留字嵌入变量名中或在保留字最末尾加一个数字。

3 VBScript数据类型与表达式 • 变量可用dim语句声明变量，由于VBScript 语法的灵活性，也可以不声明就使用。也可在文件开头使用 <%option explicit%>语句强制变量必须声明才能使用。例如：<% dim hygl hygl=“欢迎光临” %>

3 VBScript数据类型与表达式 • 变量也可以private或Public语句声明变量用dim声明的变量一般是局部变量用Public声明的变量一般是全局变量

数组变量 在Visual Basic中将具有相同名字不同下标值的一组变量称为数组变量，简称数组。数组中的元素通过数组中的下标来识别。下标必须放在一对紧跟在数组名之后的括号中，例如：A(10),其中A为数组名，10为下标。由于VBScript中所有的数组都是从0开始，所以这个数组实际上包含了11个元素。其格式如下： Dim <数组名>（下标上界列表）定义一组数组 Dim <数组名>（下标上界列表，下标上界列表）定义二维数组例如： Dim arr(10) Dim abb(15) Dim student(9,4) • 当定义二维数组时，其中的第一个下标指的是“行”，第二个下标指的是“列”

3 VBScript数据类型与表达式 • 数据的表示法数值数据：十进制、十六进制（&H64）、八进制（&O144）（字母O）字符串数据：由一连串的字符组成的串列，用“”括起来 response.write “abc” 日期时间数据：需用# #括起来，标准日期#年/月/日# 时间表示#hh:mm:ss# 布尔数据：“真”用true表示，“假”用false表示

算术运算符 所谓算术运算符，指的是具有算术运算功能的运算符号，用于对数值型数据执行简单的算术运算。在Visual Basic语言中提供了9个算术运算符，它们是：^( 乘方)，-（取负），* （乘法），/（浮点除法），\（整数除法），Mod（求余），+(加法)，-（减法），&（连接）等。

9．算术表达式 算术表达式是由算术运算符与常量、变量、函数等相连接的，并具有一定数学含义的式子称为算术表达式。算术表达式的值为整型的称为整型表达式，算术表达式的值为浮点型的称为浮点型表达式。算术表达式的类型由各操作数的类型决定，如果在一个算术表达式中，有的操作数是整型，有的操作数是浮点型，则表达式的类型为操作数中最高的类型为该表达式的类型，即为浮点型。

10．运算优先级 算术运算符的先后顺序是：^( 乘方)—→ -（取负）—→* （乘法）或/（浮点除法）—→\（整数除法）—→Mod（求余）—→+(加法)或-（减法）—→&（连接）。 11．比较运算符比较运算符也称为关系运算符。所谓关系运算符，指的是具有比较两个运算量之间的大小关系功能的运算符。比较的结果是一个逻辑值，即真（True）或假Flase。在Visaul Basic语言中，关系运算符有以下8个。 =、<、>、<>、>=、<=

12．关系表达式 （1）关系表达式的格式 <表达式> <关系运算符> <表达式> 14．逻辑表达式（1）格式逻辑表达式可用if结构来描述，其格式为： if (逻辑表达式) 语句1 else 语句2 （2）功能该结构的功能是：若逻辑表达式成立，则执行语句1，否则，若逻辑表达式不成立，则执行语句2。

（3）以下都是合法的逻辑表达式 ① 2*3 and x+a ② 4 or I ③ x xor 7 ④ 3 imp a ⑤ a eqv b ⑥ a+10 and b+8 ⑦ not (a*b+I)

复习以下三种方式执行时间有何不同？ • <script language=“vbscript” runat=“server”> </script> • < script language=“jscript” runat=“server”> </script> • <%.....%>

复习判断程序运行完毕后，x、y、z值分别为。 X= “11” + 1 Y= “11” & 1 Z= “11” + “1” A)111 111 111 B)12 111 12 C)12 111 111 D)12 12 12

3 VBScript数据类型与表达式 特殊符号：合并多行语句的“：” response.write 100 response.write 666 response.write 100 : response.write 666 注释符号“ ‘ ” response.write 100 ‘ 输出100

服务器端脚本： <script language=“vbs” runat=“server”> Response.write(“vbs”) </script> 客户端脚本与服务器端脚本客户端脚本： <script language=“vbs”> Document.write(“vbs”) </script> 注意：教材中的案例未有清晰指出

客户端脚本： <html> <head> <title>客户端脚本</title> <script language=vbs> </script> </head> <body> </body> </html> <html> <head> <title>客户端脚本</title> </head> <body> <script language=vbs> </script> </body> </html>

4 相关实践知识 Inputbox函数输入数据：作用：显示可收集用户输入的对话框格式： InputBox（<提示串>[，<对话框标题>，][<默认值>]）对话框标题：该对话框的标题提示串：使用字符串表达式，其作用是提醒用户，该字符串不得超过1024个字符。

4 相关实践知识 Msgbox函数输出数据：作用：显示带有一条信息的对话框 Msgbox(message , buttons , title) Message：是要显示的字符串 Buttons：参数决定对话框中的按钮 Title：该对话框的标题常用参数： Vbokcancel、vbabortretryignore、vbyesnocancel、 Vbyesno、vbretrycancel、vbquestion、 Vbcritical、vbexclamation

例题5.5 <html> <head> <title>InputBox输入举例</title> <script language=“vbscript”> Name1=inputbox(“请输入公司的名称：”,”输入举例”,0) Msgbox “您所在的公司是：”&name1 </script> </head> </html>

例题5.6 <html> <head> <title>MsgBox输出举例</title> <script language=“vbscript”> aa=msgbox(“以上数据已存在，覆盖吗？”,3+32+0) bb=msgbox(“不允许多个文件同时存在！”,vbcritical) cc=msgbox(“文件类型不匹配！”,2+48+256) dd=msgbox(“已完成文件复制”,vbokonly+vbinformation) </script> </head> </html>

4.2 VBScript的条件语句 • 条件语句if <% If表达式 Then 情况1 Else 情况2 End if %> <% If表达式 Then 情况1 Elseif 表达式then 情况2 else情况3 End if %> <% If表达式 Then 情况1 End if %> 注意：1）<条件表达式>必须是逻辑值“真”或“假”， 2）if与end if是一对语句，必须相匹配。

4.2 VBScript的条件语句 格式一：最简格式 If mydate<now( ) then mydate=now( ) 注：只有当then后面只有一条语句时，可以将这条语句放在then后面，此时必须将end if 去掉，否则出错。格式二：执行多条语句 If a>3 then b=a document.write b End if 注：如果条件语句为true，则执行语句块，否则跳出这些语句。

4.2 VBScript的条件语句 格式三：二重分支 If sex=1 then document.write “女士，您好！” else document.write “先生，您好！” end if

4.2 VBScript的条件语句 格式四：多重分支 If value=0 then flag=5 Elseif value=1 then flag=10 Elseif value=2 then else msgbox “先生，您好！” end if

4.2 VBScript的条件语句 练习：在个人主页上添加时间信息，判断下午、晚上、上午和夜间，并分别给出问候：下午好、晚上好、上午好和夜里好。设定： 1~6 夜间 7~12 上午 13~18 下午 19~24 晚上利用服务器端脚本进行编写。

4.2 VBScript的条件语句 • 条件语句select case select case 数据或运算式 case 条件值1 语句块1 case 条件值1 语句块1 … case else 语句块N end select

4.2 VBScript的条件语句 • 条件语句select case <% Select case sex Case “0” : response.write “女士，” Case ”1” : response.write “先生，” Case ”2” : response.write “无此选项，” End select %> 您好！请完成案例5.8

4.2 VBScript的条件语句 综合练习： 1、设计程序让用户填入自己的姓名和性别，如果是男的，请输出“***先生，欢迎您！” 如果是女的，请输出“***女士，欢迎您！” 2、设计程序让用户输入一个百分制分数，须介于0~100之间，否则提示“分数超出范围”； 0~59，输出“不及格”； 60~79，输出“及格良好”； 80~100，输出“优秀”。

项目 2 VBScript 编程基础