网页中使用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
%>

回复问题补充:

不是 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
修改: