vbs 的 MessageBox 可以,JS 不能,除非用层来模拟实现

解决方案 »

  1.   

    <html>
    <head>
    <meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
    <meta http-equiv="pragma" content="no-cache" />
    <link rel="stylesheet" type="text/css" href="/style/default.css" />
    <style type="text/css">
    <!--
    -->
    </style>
    <script language="JavaScript" src="/Script/Default.js"></script>
    <script language="VBScript">
    <!--
    Public Function MessageBox (strMsg,strTitle,intIcon,intButtons)
    MessageBox=MsgBox(strMsg,intIcon+intButtons,strTitle)
    End Function
    -->
    </script>
    <script language="JavaScript">
    <!--
    function onExit(){
    var ret=MessageBox("是否保存?","退出",547,0);
    if(ret==6){
    alert('你点击了“是”');
    }else if(ret==7){
    alert('你点击了“否”');
    }else if(ret==2){
    alert('你点击了“取消”');
    }else{
    alert("不知道你到底点了哪个["+ret.toString()+';');
    }
    }
    -->
    </script>
    <title></title>
    </head>
    <body>
    <button onclick="JavaScript:onExit()">退出系统</button>
    </body>
    </html>
      

  2.   

    Default.js
    这个JS和这个问题有关系吗?请问
      

  3.   

    <script language="VBScript">
    <!--
    Public Function MessageBox (strMsg,strTitle,intIcon,intButtons)
    MessageBox=MsgBox(strMsg,intIcon+intButtons,strTitle)
    End Function
    -->
    </script>就这段
    MsgBox的
    6=yes
    7=no
    2=cancel
      

  4.   


    Default.js
    这个JS和这个问题有关系吗?请问没有关系