Запуск внешних приложений (VBScript)
Пример запуска внешнего приложения из макроса
Sub RunPing
' https://msdn.microsoft.com/ru-ru/library/2f38xsxe(v=vs.84).aspx
Dim WshShell
'Создаем объект Shell
Set WshShell = CreateObject("wscript.shell")
'Вызываем программу
ret = WshShell.Run("ping " & "politerm.com", 1, TRUE)
End Sub
Последнее обновление — 27.12.2018 16:31:13