漫画大全恋爱青春校园:VBScript怎么获取表单对象的值?

来源:百度文库 编辑:神马品牌网 时间:2024/03/29 17:27:32
举例代码:
<form id="reg" name="reg" method="post" action="">
<input name="un" id="un" type="text" size="12" maxlength="20" />
</form>
怎么才能用VBScript获得输入框里面用户输入的值?
我知道用JavaScript是document.reg.un.value
在VBS里面这么写就提示出错
vbscript里用
document.reg.un.value
un.value
都提示
Microsoft VBScript 运行时错误 (0x800A01A8)
缺少对象: ''

另外
<%
dim newname,theForm
Set theForm = Document.forms("reg") '-------缺少对象
newname = theForm.un.value
%>还是上面提示的错误

这个例子足以说明问题了。

<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 If
End 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>

un.value