没有错误,
就是空白页面
空白页?也就是说你的网页是.asp的网页?如果真是这样,那引起错误的就不是这段代码了,有可能是别的了。
不好意思
我刚才说错了
不是空白的
是有文本框的
但是我按了按钮它没反应
<html>
<head>
<script language=vbscript event="onclick" for="B1">
<!--
Dim frmtmp
Set frmtmp=document.form1
Dim Null
Dim i
Null="F"
For i=0 To frmtmp.textfield.length-1
IF frmtmp.textfield(i).value="" Then
Null="T"
End IF
Next
IF Null="T" Then
Msgbox "带*的不能为空!"
Else
frmtmp.submit
End IF
-->
</script>
<meta http-equiv="Content-Language" content="zh-cn">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<title>姓名</title>
</head>
<body>
<form name="form1" method="POST" action="111.asp">
<p>姓名:<input type="text" name="textfield" size="20"></p>
<p>性别:<input type="text" name="textfield" size="20"></p>
<p>公司名称:<input type="text" name="textfield" size="20"></p>
<p><input type="button" value="按钮" name="B1"><input type="reset" value="全部重写" name="B2"></p>
</form>
</body>
</html>
IF document.form1.textfield(i).value="" Then
isNull="T"
End IF
Next
IF isNull="T" Then
Msgbox "带*的不能为空!"
Else
'frmtmp.submit
End IF
End Function
-->
</script>
<form name="form1" method="POST" action="111.asp">
<p>姓名:<input type="text" name="textfield" size="20"></p>
<p>性别:<input type="text" name="textfield" size="20"></p>
<p>公司名称:<input type="text" name="textfield" size="20"></p>
<p><input type="button" value="按钮" name="B1" OnClick="B1_Click()
" ><input type="reset" value="全部重写" name="B2"></p>
</form>
[此贴子已经被作者于2006-3-24 17:48:23编辑过]
<html>
<head>
<script language=vbscript>
<!--
Function Form_Sub(ArrayStr)
'ArrayStr = 要检测的元素组成的字符串
Dim str
str = split(ArrayStr,",")
for i = 0 to UBound(str)
if document.all(str(i)).value="" Then
Msgbox "带*的不能为空!"
exit for
end if
Next
End Function
//-->
</script>
<meta http-equiv="Content-Language" content="zh-cn">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<title>姓名</title>
</head>
<body>
<form name="form1" method="POST" action="111.asp">
<p>姓名:<input type="text" name="textfield1" size="20"></p>
<p>性别:<input type="text" name="textfield2" size="20"></p>
<p>公司名称:<input type="text" name="textfield3" size="20"></p>
<p><input type="button" value="按钮" name="B1" OnClick="Form_Sub('textfield1,textfield2')"><input type="reset" value="全部重写" name="B2"></p>
</form>
</body>
</html>