网页中使用vbscript怎么用?
来源:百度知道 编辑:UC知道 时间:2024/05/26 16:43:19
<%if trim(request("textfield"))="" then
response.Write("<script>alert('用户名不能为空!')</script>")
else if trim(request("textfield2"))="" then
response.Write("<script>alert('密码不能为空!')</script>")
else if (trim(request("textfield2"))<>trim(request("repassword"))) then
response.Write("<script>alert('密码输入不一致!')</script>")
else
objrs.addnew
objrs("name")=request("textfield")
objrs("gender")=request("radiobutton")
objrs("password")=request("textfield2")
objrs("regtime")=now()
objrs("age")=request("textfield3")
objrs("email")=request("textfield4")
objrs("jieshao")=request("textfield5")
objrs.update}
end if
%>
response.Write("<script>alert('用户名不能为空!')</script>")
else if trim(request("textfield2"))="" then
response.Write("<script>alert('密码不能为空!')</script>")
else if (trim(request("textfield2"))<>trim(request("repassword"))) then
response.Write("<script>alert('密码输入不一致!')</script>")
else
objrs.addnew
objrs("name")=request("textfield")
objrs("gender")=request("radiobutton")
objrs("password")=request("textfield2")
objrs("regtime")=now()
objrs("age")=request("textfield3")
objrs("email")=request("textfield4")
objrs("jieshao")=request("textfield5")
objrs.update}
end if
%>
回复问题补充:
不是 End If 连起来是 Else If 连起来
之所以有时行有时不行, 是因为你的 If 语句在语法是没有钱,
但是逻辑上是不允许那样做
这样写
If a = 3 Then
...
ElseIf a = 4 Then
...
Else
...
End If
是对的
但你的显然就是
If a = 3 Then
...
ElseIf b = 8 Then
...
ElseIf c = 3 Then
...
Else
...
End If
如果有
If (expression) Then
...
ElseIf (expression2) Then
...
End If
ElseIf 其实就是
If Not (expression) And (expression2) Then
...
End If
-------------------------------
是
If expression1 Then
ElseIf expression2 Then
Else
End If
而不是
If ... Then
Else If ... Then
End If
所以, 你的那个 Else If 应该连起来一起写
objrs.update} 多了个"}"
else if (trim(request("textfield2"))<>trim(request("repassword"))) then
修改: