<Script Language="Vbscript">
Function CheckUserName()
Alert "1"
End Function
Function CheckInput()
If Len(Trim(thisform.username.value)) < 3 Then
Alert "用户名不能小于三个字符"
thisform.username.focus()
ElseIf Len(Trim(thisform.username.value)) > 12 Then
Alert "用户名不能大于十二个字符"
thisform.username.focus()
ElseIf Len(Trim(thisform.password1.value)) < 6 Then
Alert "密码不能小于6个字符"
thisform.password1.focus()
ElseIf Len(Trim(thisform.password2.value)) < 6 Then
Alert "密码不能小于6个字符"
thisform.password2.focus()
ElseIf Trim(thisform.password2.value) <> Trim(thisform.password2.value) Then
Alert "两次输入的密码不一致,请检查"
thisform.password1.focus()
ElseIf thisform.Question.value="" then
Alert "请设置您的密码保护问题,在您遗忘密码时可以通过回答此问题找回密码"
thisform.question.focus()
ElseIf Len(Trim(thisform.pwdAnswer.Value)) < 1 then
Alert "请填写您的密码提示答案,在您找回密码时能过提供它来找回密码"
thisform.pwdAnswer.focus()
ElseIf thisform.userType(0).checked = False and thisform.userType(1).checked = False then
Alert "请选择您要注册的会员类型:教师或学生,二者的可用功能将是有区别的"
ElseIf len(trim(thisform.email.value)) < 1 then
Alert "请输入邮箱地址"
thisform.email.focus()
ElseIf Instr(thisform.email.value,"@") = 0 then
Alert " 错误的邮箱格式"
thisform.email.focus()
else
thisform.submit()
End If
End Function
</Script>