<script language=VBScript>
function checkname()
  if trim(document.form1.yonghuming.value)="" then
    alert("用户名为空")
    exit function
  end if
end function
</script>