mshta实现弹窗功能

你可以使用以下 mshta 命令来弹出一个简单的弹窗

mshta vbscript:msgbox("弹窗内容",64,"弹窗标题")(window.close)

其中,"弹窗内容" 是弹窗中要显示的文本,"弹窗标题" 是弹窗的标题。64 是弹窗的类型,这里表示弹出一个含有确定和取消按钮的消息框。(window.close) 是指弹窗关闭后自动关闭窗口。

你也可以使用 vbscript 代码来实现更加复杂的弹窗。例如,下面的代码将弹出一个带有输入框和确定按钮的弹窗:

<!DOCTYPE html>
<html>
<head>
    <title>弹窗示例</title>
    <meta charset="utf-8">
    <script type="text/vbscript">
    Sub ShowInputDialog()
        Dim input
        input = InputBox("请输入你的名字:", "输入框示例")
        If input <> "" Then
            MsgBox "你输入的名字是:" & input, 64, "弹窗标题"
        End If
    End Sub
    </script>
</head>
<body>
    <input type="button" value="弹出输入框" onclick="ShowInputDialog()">
</body>
</html>

在这个示例中,点击页面上的按钮将调用 ShowInputDialog 程序。该程序使用 InputBox 方法弹出一个输入框,用户输入后,程序将弹出一个带有确定按钮的消息框,其中包含用户输入的内容。