Как открыть файл HTML в приложении по умолчанию, используя VBScript?

Question

У меня есть файл HTML C:\Program Files\my_html_files\file.html. Как открыть этот файл с помощью VBScript? (Под словом «открыть» я имею в виду открыть его с помощью приложения по умолчанию, как если бы оно было дважды щелкнуто в Проводнике.)

Answer 1

Следующий код VBScript эквивалентен двойному щелчку по файлу file.html, и для этого файла выполняется команда открытия по умолчанию:

Dim wshShell
Set wshShell = CreateObject("WScript.Shell")
wshShell.Run """C:\Program Files\my_html_files\file.html"""

Если вы хотите получить действительно хитрый способ, вы можете опустить переменнуюобъявите и запишите его в одной строке кода:

CreateObject("WScript.Shell").Run """C:\Program Files\my_html_files\file.html"""

NB. Для обработки путей, содержащих пробелы, может потребоваться заключить строки в кавычки.Это можно сделать с помощью предложения Chr(34) @aland или как я делал в моих примерах кода.

Answer 2

Вы имеете в виду открыть файл в Internet Explorer?

Dim objIE
'' Create an IE object
Set objIE = CreateObject("InternetExplorer.Application")
'' Open file
objIE.Navigate "C:\Program Files\my_html_files\file.html"

Answer 3

Вы можете использовать это

CreateObject("WScript.Shell").Run Chr(34) & "C:\Program Files\my_html_files\file.html" & Chr(34)

Answer 4

Вы можете использовать Объект Файловой Системы , например:

Set FSO=CreateObject("Scripting.FileSystemObject")
Set iFile = FSO.OpenTextFile ("C:\Program Files\my_html_files\file.html")
Data = iFile.ReadAll
MsgBox(Data)
iFile.Close