Как открыть файл с помощью VBScript, как если бы пользователь дважды щелкнул файл?
CreateObject ("WScript.Shell" ) .Run ("" "C: Program Files my_html_files file.htm" "")
И проверьте приложение, зарегистрированное с расширением .htm (возможно, IExplore.exe
) в следующих разделах реестра:
HKLM SOFTWARE Classes .htmHKLM SOFTWARE Classes htmlfile shell open commandHKCU Software Classes .htm
CreateObject ("WScript. Shell "). Выполнить (" C: \ Program Files \ my_html_files \ file.htm ")
CreateObject ("WScript.Shell"). Выполнить ("C: \ Program Files \ my_html_files \ file.htm")
http://msdn.microsoft.com/en-us/library/bb774148 (VS.85) .aspx
функция fnShellExecuteVB () dim objShell set objShell = CreateObject ("Shell.Application") objShell.ShellExecute "notepad.exe", "", "", "open", 1 набор функций objShell = nothingend
http://msdn.microsoft.com/en-us/library/bb774148 (VS.85) .aspx
function fnShellExecuteVB () dim objShell set objShell = CreateObject ("Shell.Application") objShell.ShellExecute "notepad.exe", "", "" , "open", 1 набор функций objShell = nothingend