VBS教程：VBScript 与窗体

VBScript 与窗体

简单验证

使用 Visual Basic Scripting Edition，您可以完成通常要在服务器上进行的大量窗体处理工作，也可以完成不能在服务器上进行的工作。

这是一个简单的客户端验证的样例。HTML 代码的结果是一个文本框和一个按钮。如果使用 Microsoft(R) Internet Explorer 查看用以下代码制作的页面，您会看到一个旁边带有按钮的小文本框。

<HTML><HEAD><TITLE>简单验证</TITLE><SCRIPT LANGUAGE="VBScript"> <!--Sub Validate  Dim TheForm  Set TheForm = Document.forms("ValidForm")  If IsNumeric(TheForm.Text1.Value) Then    If TheForm.Text1.Value < 1 Or TheForm.Text1.Value > 10 Then      MsgBox "请输入一个 1 到 10 之间的数字。"    Else      MsgBox "谢谢。"    End If  Else    MsgBox "请输入一个数字。"  End IfEnd Sub--></SCRIPT></HEAD><BODY><H3>简单验证</H3><HR><form id="ValidForm" action="nothing.asp" onsubmit="Validate(); return false;" language="Visual Basic Scripting Edition">请输入一个 1 到 10 之间的数字：<input name="Text1" TYPE="TEXT" class='9v'><input name="Submit" TYPE="Submit" VALUE="提交"></form></BODY></HTML>

这个文本框与 VBScript 页面的简单样例中示例的不同之处在于文本框的 Value 属性被用于检查输入值。要使用文本框的 Value 属性，代码必须引用文本框的名称。

每次引用文本框时都应写出全称，即 Document.ValidForm.Text1。但是，当多次引用窗体控件时，可以按照以下步骤操作：首先声明一个变量，然后使用 Set 语句将窗体 Document.ValidForm 赋给变量 TheForm，这样就能使用 TheForm.Text1 引用文本框。常规的赋值语句（例如 Dim）在这里无效，必须使用 Set 来保持对对象的引用。

使用数字


请注意以上示例直接检测输入值是否是一个数字：使用 IsNumeric 函数确定文本框中的字符串是否是一个数字。虽然 VBScript 能够自动转换字符串和数字，但检测用户输入值的数据子类型，并且在必要时使用转换函数始终是一个好的习惯。在用文本框的 Value 属性进行加法运算时，应将它显式地转换为数字，这是因为加号 (+) 运算符不但可进行加法操作，而且可进行字符串连接操作。例如，如果 Text1 中包含“1”，Text2 中包含“2”，您将会看到以下结果：

A = Text1.Value + Text2.Value      ' A 为“12”A = CDbl(Text1.Value) + Text2.Value   ' A 为 3

验证后将数据传递回服务器


简单验证样例使用的是普通按钮控件。如果使用 Submit 控件，所有数据都会被立即传送到服务器，示例将不会看到数据来进行检查。避免使用 Submit 控件使您可以检查数据，但不能向服务器提交数据。如果要提交数据则需要再添加一行代码，如下所示：

<SCRIPT LANGUAGE="VBScript"> <!--Sub Button1_&#111nClick  Dim TheForm  Set TheForm = Document.ValidForm  If IsNumeric(TheForm.Text1.Value) Then    If TheForm.Text1.Value < 1 Or TheForm.Text1.Value > 10 Then      MsgBox "请输入一个 1 到 10 之间的数字。"    Else      MsgBox "谢谢。"      TheForm.Submit   ' 数据输入正确，传递到服务器。    End If  Else    MsgBox "请输入一个数字。"  End IfEnd Sub--></SCRIPT>

在数据输入正确时，代码调用窗体对象的 Submit 方法，将数据传递到服务器。除非在数据被传递到服务器之前判断其正误，否则服务器将处理数据，而不论其正确与否。您可以在 Internet Explorer Scripting 对象模型页面上找到关于 Submit 方法和其他方法的全部信息,它们在 Microsoft(R) Web 站点(http://www.microsoft.com)上可以找到。

到目前为止，您只看到了标准 HTML <FORM> 对象。Internet Explorer 还可以使您利用 ActiveX(R) 控件（以前称为 OLE 控件）和 Java(TM) 对象的全部功能创建页面。

赞 (0)

相关推荐

  • VBS教程：VBScript 与窗体

    VBScript 与窗体简单验证使用 Visual Basic Scripting Edition,您可以完成通常要在服务器上进行的大量窗体处理工作,也可以完成不能在服务器上进行的工作. 这是一个简单的客户端验证的样例.HTML 代码的结果是一个文本框和一个按钮.如果使用 Microsoft(R) Internet Explorer 查看用以下代码制作的页面,您会看到一个旁边带有按钮的小文本框. <HTML><HEAD><TITLE>简单验证</TITLE>

  • VBS教程：VBScript 页面的简单样例

    VBScript 页面的简单样例一个简单页面使用 Microsoft(R) Internet Explorer 可以查看用以下 HTML 代码制作的页面.如果单击页面上的按钮,可看到 VBScript 的运行结果. <HTML><HEAD><TITLE>一个简单首页</TITLE><SCRIPT LANGUAGE="VBScript"><!--Sub Button1_&#111nClick MsgBox &quo

  • VBS教程：fso方法-CreateTextFile 方法

    CreateTextFile 方法 创建指定文件并返回 TextStream 对象,该对象可用于读或写创建的文件. object.CreateTextFile(filename[, overwrite[, unicode]]) 参数 object 必选项.应为 FileSystemObject 或 Folder 对象的名称. filename 必选项.字符串表达式,指明要创建的文件. overwrite 可选项.Boolean 值指明是否可以覆盖现有文件.如果可覆盖文件,该值为 True:如果不

  • VBS教程：在 VBScript 中使用对象

    在 VBScript 中使用对象使用对象无论使用的是 ActiveX(R) 控件(以前称为 OLE 控件)还是 Java(TM) 对象,Microsoft Visual Basic Scripting Edition 和 Microsoft(R) Internet Explorer 都以相同的方式处理它们.如果您使用的是 Internet Explorer 并且安装了 Label 控件,就会看到由以下代码制作的页面. <OBJECT> 标记用来包含对象,<PARAM> 标记用来设置

  • VBScript教程 第十三课 VBScript与窗体

    简单验证 使用 Visual Basic Scripting Edition,您可以完成通常要在服务器上进行的大量窗体处理工作,也可以完成不能在服务器上进行的工作. 这是一个简单的客户端验证的样例.HTML 代码的结果是一个文本框和一个按钮.如果使用 Microsoft? Internet Explorer 查看用以下代码制作的页面,您会看到一个旁边带有按钮的小文本框. <HTML><HEAD><TITLE>简单验证</TITLE><SCRIPT LA

  • VBS教程：VBScript 基础-使用循环语句

    使用循环语句循环用于重复执行一组语句.循环可分为三类:一类在条件变为 False 之前重复执行语句,一类在条件变为 True 之前重复执行语句,另一类按照指定的次数重复执行语句. 在 VBScript 中可使用下列循环语句: Do...Loop: 当(或直到)条件为 True 时循环. While...Wend: 当条件为 True 时循环. For...Next: 指定循环次数,使用计数器重复运行语句. For Each...Next:对于集合中的每项或数组中的每个元素,重复执行一组语句.(

  • VBS教程：VBScript 基础-VBScript 变量

    VBScript 变量变量是一种使用方便的占位符,用于引用计算机内存地址,该地址可以存储脚本运行时可更改的程序信息.例如,可以创建一个名为 ClickCount 的变量来存储用户单击 Web 页面上某个对象的次数.使用变量并不需要了解变量在计算机内存中的地址,只要通过变量名引用变量就可以查看或更改变量的值.在 VBScript 中只有一个基本数据类型,即 Variant,因此所有变量的数据类型都是 Variant. 声明变量声明变量的一种方式是使用 Dim 语句.Public 语句和 Priva

  • VBS教程：VBscript属性-HelpFile 属性

    HelpFile 属性设置或返回帮助文件的完整有效路径. object.HelpFile [= contextID] 参数object 必选项.Err 对象. contextID 可选项.帮助文件的完整有效路径. 说明如果在 HelpFile 中指定帮助文件,则当用户在错误消息对话框中单击帮助按钮(或按 F1 键)时,自动调用此文件.如果 HelpContext 属性包含指定文件的有效上下文 ID ,则自动显示该主题.如果未指定 HelpFile,则显示 VBScript Help 文件. On

  • VBS教程：VBScript 基础-VBScript 过程

    VBScript 过程在 VBScript 中,过程被分为两类:Sub 过程和 Function 过程. Sub 过程Sub 过程是包含在 Sub 和 End Sub 语句之间的一组 VBScript 语句,执行操作但不返回值.Sub 过程可以使用参数(由调用过程传递的常数.变量或表达式).如果 Sub 过程无任何参数,则 Sub 语句必须包含空括号 (). 下面的 Sub 过程使用两个固有的(或内置的)VBScript 函数,即 MsgBox 和 InputBox,来提示用户输入信息.然后显示

  • VBS教程：VBscript属性-Description 属性

    Description 属性返回或设置与错误相关联的说明性字符串. object.Description [= stringexpression] 参数object Err 对象. stringexpression 包含错误说明的字符串表达式. 说明Description 属性包含错误的简短说明.此属性用于提示用户注意您不能或不想处理的错误.当产生一个用户定义的错误时,将此错误的简要说明赋值给此属性.如果未填充 Description 属性并且 Number 的值对应于 VBScript 运行时

随机推荐