回 帖 发 新 帖 刷新版面

主题:[讨论]拜托,帮忙看下哪里错了

大家帮忙看看
这个哪里错了
<html>
<head>
<title>11</title>
<script language="vbscript" for="btnok" event="onclick">

if form1.id.value="" then
alert("用户名忘了哦")
exit sub
else 
if form1.pas1.value="" then
alert("密码")
exit sub
else
if form1.value="" then
alert("确认密码")
exit sub
else 
if form1.pas1.value<>form1.pas2.value then
alert("不一样")
exit sub
else
if form1.email.value="" then
alert(E_mail")
exit sub
else 
alert("欢迎")
end if
end if
end if
end if
end if
end sub
</script>
</head>
<body>
<p>欢迎注册成为用户,下列带*号的资料请务必填写</p>
<form name="form1">
用户名:<input type="text" name="id" size="20">
<font color="red">*</font><br>
密码:<input type="password" name="pas1" size="20">
<font color="red">*</font><br>
确认密码:<input type="password" name="pas2" size="20">
<font color="red">*</font><br>
真实姓名:<input type="text" name="name" size="20"><br>
性别:<select>
      <option selected>请选择</option>
      <option>男  性</option>
      <option>女  性</option>
      </select><br>
出生年月:<input type="text" name="nian" size="8">年
          <input type="text" name="yue" size="4">月
          <input type="text" name="ri" size="4">日<br>
E_mail:<input type="text" name="email" size="50">
<font color="red">*</font><br>
地址:<input type="text" name="add" size="60"><br>
邮编:<input type="text" name="you" size="30"><br>
       <input type="button" value="注册" name="btnok">
       <input type="reset" value="取消" name="btnesc">
</form>
</body>
</html>

回复列表 (共1个回复)

沙发

把脚本的部分改成下面:

<script language="vbscript">
sub btnok_onclick
    if form1.id.value="" then
        alert("用户名忘了哦")
        exit sub
    else 
        if form1.pas1.value="" then
            alert("密码")
            exit sub
        else
            if form1.pas2.value="" then
                alert("确认密码")
                exit sub
            else 
                if form1.pas1.value<>form1.pas2.value then
                    alert("不一样")
                    exit sub
                else
                    if form1.email.value="" then
                        alert("E_mail")
                        exit sub
                    else 
                        alert("欢迎")
                    end if
                end if
            end if
        end if
    end if
end sub
</script>

我来回复

您尚未登录,请登录后再回复。点此登录或注册