<script language="vbscript">
<!--
function form1_onsubmit
dim theForm
set theForm = Document.form1
dim name,pwd
name = trim(theForm.username.Value)
pwd = trim(theForm.password.value)
if name = "" then
msgbox("用户帐号不能为空")
form1_onsubmit = false
elseif pwd = "" then
msgbox("密码不能为空")
form1_onsubmit = false
else
form1_onsubmit = true
end if
end function
-->
</script>
</head>