欢迎您访问程序员文章站本站旨在为大家提供分享程序员计算机编程知识!
您现在的位置是: 首页  >  IT编程

VBS教程:VBScript 与窗体

程序员文章站 2022-11-14 19:49:08
vbscript 与窗体简单验证使用 visual basic scripting edition,您可以完成通...

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_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 ifend sub--></script>

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

到目前为止,您只看到了标准 html <form> 对象。internet explorer 还可以使您利用 activex(r) 控件(以前称为 ole 控件)和 java(tm) 对象的全部功能创建页面。