新西兰硕士gpa:在线等,兄弟们请多帮忙,很急,先谢过了!!!

来源:百度文库 编辑:查人人中国名人网 时间:2024/05/03 03:52:42
ElseIF Not isNumeric(request.Form("user_phone")) Then
rs.close
set rs=nothing
conn.close
set conn=nothing
Call MsgBox("您输入的电话号码应为数字","Back","None")
Response.End()

一个提交注册表单的程序,我想做到的是当我在文本框中不填写电话号码时不会弹出对话框,当用户错填了电话号码时弹出对话框,可现在的问题是当我不填电话号码提交表单时也弹出了对话框.请问这个我应该加上一段什么样的代码能够解决.谢过了,各位仁兄请多多帮忙!!!!注:MsgBox 是调用已经编好了的一个弹出对话框的一段代码.具体如下:
<%
Sub MsgBox(str,stype,url)
response.write "<script language=javascript>"
response.write "alert('"&str&"');"
select case stype
case "Back"
response.write "history.go(-1);"
case "GoUrl"
response.write "window.location='"&url&"'"
case "Close"
response.write "window.close()"
end select
response.write "</script>"
End Sub
%>这段代码不要改,因为还有其他程序也包含并且调用了这个文件.再次感谢!!!!!!!!!!!!!!
不行 试过了不好使啊 兄弟!!

这一句:

ElseIF Not isNumeric(request.Form("user_phone")) Then

改为:

ElseIF (Not isNumeric(request.Form("user_phone"))) AND (request.Form("user_phone") <> "") Then