想问下asp一个小程序的返回值问题

来源：百度知道 编辑：UC知道 时间：2024/05/20 18:31:22
又麻烦大家啦！如下面：单击“提交”按钮后msgbox并无反应，郁闷。。。相信各位大虾对于这个小程序是小菜一碟啦！到底哪里出错了！请各位批评指正！最好就做个解析！先谢啦！
<html>
<head>
<title>验证返回</title>
<script language="VBScript">
<!--
sub submit_onclick
dim sex
set sex=document.validform
select case sex.radio.value
case sex.rl.value=checked
msgbox"先生，欢迎你的到来！"
case sex.r2.value=checked
msgbox"女士，欢迎你的到来！"
end select
end sub
-->
</script>
</head>
<body>
<form name="validform">
性别：<br>
<input name="r1" type="radio" value="男">男
<input name="r2" type="radio" value="女">女
<input name="b1" type="submit" value="提交">
</form>
</body>
</html>

<%
sub submit_onclick
dim sex
set sex=document.validform
select case sex.radio.value
case sex.rl.value=checked
msgbox"先生，欢迎你的到来！"
case sex.r2.value=checked
msgbox"女士，欢迎你的到来！"
end select
end sub

%>

<form name="validform" onsubmit="submit_onclick()">