需要VBScript才能使用命令提示符打开本地图像文件

Kth*_*var 3 vbscript

我需要一个Vbscript,它应该从我的电脑上打开一个图像文件,几分钟后会自动关闭.我打算通过命令提示符运行脚本,任何帮助都是值得赞赏的.

Hel*_*len 5

使用HTML应用程序而不是普通的VBScript 可能更容易.这是一个示例HTML应用程序,它在弹出窗口中显示一个图像,该窗口在5秒后自动关闭(您没有说明是否需要将图像名称和超时参数化,因此我假设它们是预定义的并且可以是硬编码的):

<html>
    <hta:application id="oHTA"
        border="none"
        caption="no"
        contextmenu="no"
        innerborder="no"
        scroll="no"
        showintaskbar="no"
    />
    <script language="VBScript">
        Sub Window_OnLoad
            ' Resize and position the window
            width = 500 : height = 400
            window.resizeTo width, height
            window.moveTo screen.availWidth\2 - width\2, screen.availHeight\2 - height\2

            ' Automatically close the windows after 5 seconds
            idTimer = window.setTimeout("vbscript:window.close", 5000)
        End Sub
    </script>
<body>
    <table border=0 width="100%" height="100%">
        <tr>
            <td align="center" valign="middle">
                <img src="myimage.jpg"/>
            </td>
        </tr>
    </table>
</body>
</html>
Run Code Online (Sandbox Code Playgroud)

只需将此代码粘贴到文本编辑器中,用您的值替换窗口宽度和高度,超时和图像文件名,并另存为.HTA文件(例如showimage.hta).

HTA可以通过命令行从命令行运行,例如

showimage.hta
Run Code Online (Sandbox Code Playgroud)

要从VBScript运行HTA,您可以使用以下WshShell.Run方法:

CreateObject("WScript.Shell").Run "showimage.hta"
Run Code Online (Sandbox Code Playgroud)