Нужен VBScript для открытия локального файла изображения с помощью командной строки

Мне нужен Vbscript, который должен открыть файл изображения с моего компьютера, и через несколько минут он автоматически закроется. Я планирую запустить скрипт через командную строку, любая помощь будет очень полезна.

Источник

1 ответ

Решение

Это может быть проще сделать с помощью 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>

Просто вставьте этот код в текстовый редактор, замените ширину и высоту окна, время ожидания и имя файла изображения вашими значениями и сохраните как файл.HTA (например, showimage.hta).

HTA можно запустить из командной строки по имени, например

showimage.hta

Чтобы запустить HTA из VBScript, вы можете использовать WshShell.Run метод:

CreateObject("WScript.Shell").Run "showimage.hta"
Источник
Другие вопросы по тегам