用vbScript可以做m=MsgBox ("是否与销售单关联?", vbYesNo + vbQuestion, "确认")
if m=6 then
....
end if

解决方案 »

  1.   

    可以模拟一个
    在页面上接管confirm,而不是用系统自带的
      

  2.   

    <BODY>
    <div style="display:none;width:200px;heigth:200px;position:absolute;z-index:3;border:1px solid" id="div1">
    <table style="width:100%">
     <tr>
      <td style="background-color:deeppink">
         IEIEIEIEIE
      </td>
     </tr>
     <tr>
      <td style="text-align:center"><input type="button" value="Yes"><input type="button" value="No"></td>
     </tr>
    </table>
    </div>
    <input type="button" value="just a try,for minyi" onclick="showDiv(div1)">
    <SCRIPT LANGUAGE="JavaScript">
    <!--
    function showDiv(obj)
    {
     obj.style.display='';
     obj.style.left = (document.body.clientWidth-parseInt(obj.style.width))/ 2;
     obj.style.top = (document.body.clientHeight-parseInt(obj.style.heigth))/ 2;
    }
    //-->
    </SCRIPT>
    </BODY>
      

  3.   

    <div style="display:none;width:200px;heigth:200px;position:absolute;z-index:3;border:1px solid" id="div1">
    <table style="width:100%">
     <tr>
      <td style="background-color:#CCCCCC;font-size:12Px" align=center>
    是否与销售单关联?
      </td>
     </tr>
     <tr>
      <td style="text-align:center"><input type="button" value=" 是 " onclick="alert('OK!');"> <input type="button" value=" 否 " onclick="div1.style.display='none';"></td>
     </tr>
    </table>
    </div>
    <input type="button" value="确定" onclick="showDiv(div1)">
    <SCRIPT LANGUAGE="JavaScript">
    <!--
    function showDiv(obj)
    {
     obj.style.display='';
     obj.style.left = (document.body.clientWidth-parseInt(obj.style.width))/ 2;
     obj.style.top = (document.body.clientHeight-parseInt(obj.style.heigth))/ 2;
    }
    //-->
    </SCRIPT>
      

  4.   

    <script language="javascript">
    function Wopen()
    {
    showModalDialog('th.jsp',window,'dialogWidth: 656px; dialogHeight: 460px; status: no; help: no')
    }
    </script>
    <script language="vbscript">
    sub btn_onClick()
    dim m
    m=MsgBox ("是否与销售单关联?", vbYesNo + vbQuestion, "确认")
    if m=6 then
    call Wopen
    end if
    end sub
    </script>
    <input type=button value="vb" name="btn" id="btn">
      

  5.   

    <SCRIPT LANGUAGE="VBScript">
    function show(str)
    show = msgbox(str,4,"确认框")
    '是-->6
    '否-->7
    end function
    </SCRIPT>
    <SCRIPT LANGUAGE="JavaScript">
    alert(show("fsdaf"));
    </SCRIPT>
    --------------------------
    同志们,使用VBS吧。。
    就是两个“是”,“否”的按钮,两个选项的返回值己经给出,方便楼主的调试
      

  6.   

    晕,楼主干嘛要用showModalDialog来做这种对话框?
      

  7.   

    晕,VB里面不是有一个MsgBox ("Hello World!", vbYesNo, "Title") )
    可以输入是否的对话框吗?