这是一个简单的客户端验证的样例。HTML 代码的结果是一个文本框和一个按钮。如果使用 Microsoft? Internet Explorer 查看用以下代码制作的页面，您会看到一个旁边带有按钮的小文本框。
HTML> HEAD>TITLE>简单验证/TITLE> SCRIPT LANGUAGE="VBScript"> !-- Sub Submit_onClick 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 "谢谢。" End If Else MsgBox "请输入一个数字。" End If End Sub --> /SCRIPT> /HEAD> BODY> H3>简单验证/H3>HR> FORM NAME="ValidForm"> 请输入一个 1 到 10 之间的数字： INPUT NAME="Text1" TYPE="TEXT" SIZE="2"> INPUT NAME="Submit" TYPE="BUTTON" VALUE="提交"> /FORM> /BODY> /HTML>
这个文本框与 VBScript 页面的简单样例中示例的不同之处在于文本框的 Value 属性被用于检查输入值。要使用文本框的 Value 属性，代码必须引用文本框的名称。
每次引用文本框时都应写出全称，即 Document.ValidForm.Text1。但是，当多次引用窗体控件时，可以按照以下步骤操作：首先声明一个变量，然后使用 Set 语句将窗体 Document.ValidForm 赋给变量 TheForm，这样就能使用 TheForm.Text1 引用文本框。常规的赋值语句（例如 Dim）在这里无效，必须使用 Set 来保持对对象的引用。
SCRIPT LANGUAGE="VBScript"> !-- Sub Submit_onClick 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 If End Sub --> /SCRIPT>
在数据输入正确时，代码调用窗体对象的 Submit 方法，将数据传递到服务器。除非在数据被传递到服务器之前判断其正误，否则服务器将处理数据，而不论其正确与否。您可以在 Internet Explorer Script Object Model 页面上找到关于 Submit 方法和其他方法的全部信息。
到目前为止，您只看到了标准 HTML FORM> 对象。Internet Explorer 还可以使您利用 ActiveX? 控件（以前称为 OLE 控件）和 Java? 对象的全部功能创建页面。
