2010-08-09 60 views

回答

3

你的意思是打開文件在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" 
0

可以使用File System Object這樣的:

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

它不好 我需要在file.html 的行動,雙擊你的腳本不能顯示真正的file.html – lidia 2010-08-09 08:18:47

6

下面的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字符串可能需要被引用來處理包含空格的路徑。這可以使用@aland的Chr(34)建議或我在代碼示例中所做的完成。

+1

你需要包裹Chr(34)的路徑如果有空格,例如 wshShell.Run Chr(34)&「C:\ Program Files \ my_html_files \ file.html」&Chr(34) – aland 2013-08-07 19:58:49

1

您可以使用此

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

+0

有一個&丟失。 *兩位* upvoter應該感到羞恥。 – 2016-10-11 12:09:28

相關問題