Abrir cualquier archivo por VBScript

Question

¿Cómo se realiza el efecto de doble clic con VBScipt para abrir archivos?

Gracias

Lidia

Answer 1

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

y comprobar la aplicación registrada con la extensión .htm (probablemente IExplore.exe), en estas claves de registro:

HKLM\SOFTWARE\Classes\.htm 
HKLM\SOFTWARE\Classes\htmlfile\shell\open\command 
HKCU\Software\Classes\.htm 

Answer 2

http://msdn.microsoft.com/en-us/library/bb774148(VS.85).aspx

<script language="VBScript"> 
function fnShellExecuteVB() 
    dim objShell 

    set objShell = CreateObject("Shell.Application") 

    objShell.ShellExecute "notepad.exe", "", "", "open", 1 

    set objShell = nothing 
end function 
</script> 

Answer 3

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