麻烦大哥帮下忙，下面是一段小小的代码
<%
sub bb_onclick
dim msg
msg=""
if from1.fname.value="" then
msg="用户名不能为空"
end if
if msg<>"" then
alert(msg)
fname.focus
exit sub
else
form1.submit
end if
end sub
%>
<form name="form1" method="post" action="upadd" target="upadd" >
用户名:<input type="text" name="fname" >
成绩:<input type="text" name="cj" >

<input type="button" value="提交" name="bb">
</form>

没看懂你写的程序！！！！
不能提交是因为你那个提交是按钮，想用函数方法，可你写了个过程，那个提交按钮无法调用。而且啊<%%>这里里面from1.fname.value像这样的可以？
这写只能在脚本里使用啊

帮你改了一下你看看
<script language="vbscript">
Sub bb_onclick()
 if document.form1.fname.value="" then
 alert("用户名不能为空")
 document.form1.fname.focus
 else
 document.form1.submit()
 end if
end Sub
</script>
 <form name="form1" method="post" action="b.asp" target="_self" >
 用户名:<input type="text" name="fname" >
 成绩:  <input type="text" name="cj" >
<input type="button" value="提交" name="bb" onclick="vbscript:bb_onclick()">
 </form>

支持楼上的，他用的是用vbscript,其实如果是我的话我会用javascript，但是效果其实是一样的。