关于asp中使用onmouseup的问题

原来代码是这样的:
<input name="button" type="submit" class="STYLE27" id="button" onmouseup="MM_openBrWindow('gxgl-tu2.asp?ID= <%=(Recordset1.Fields.Item("节点号").Value)%>','ABC','width=200,height=320')" value="查 询" />

但是由于输入可能为空值,就会报错,所以想在onmouseup上用个函数进行判断,如果为空就提示,不为空就正常执行上述语句.

如下代码是我乱写的,漏洞百出,请高手指教.

<input name="button" type="submit" class="STYLE27" id="button" onmouseup="open()" value="查 询" />
          <% function open()
    { dim JD
      dim  b
      JD=Trim(Request.Form("JD"))
      If  JD=""Then
Response.Write " <script>alert('请输入数字！');history.go(-1); </script>"
              else
                        b=MM_openBrWindow('gxgl-tu2.asp?ID= <%=(Recordset1.Fields.Item("节点号").Value)%>','ABC','width=200,height=320')    
                        end if