La Web del Programador: Comunidad de Programadores
 
    Pregunta:  5346 - EJECUTAR UN ARCHIVO .VBS COMO SI FUERA UN EJECUTABLE
Autor:  DeL!R!uM
La pregunta es si puedo ejecutar un archivo .VBS sin necesidad de utilizar visual basic y que se ejecute el codigo dentro, como si fuera un .EXE

desde ya gracias!!!

  Respuesta:  Manuel Arredondo
Creo entender por tu pregunta que necesitas saber como ejecutar un Visul Basic Script sin tratar directamente el código que contiene. Esto se hace mediante la API ShellExecute que ejecuta los archivos sean un exe o no. Si no es un exe ejecutará el programa que tenga asociado al archivo, en este caso la libreria Scripting de Windows.

La declaración de la API es:

Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long

Y la llamada podría ser algo así:

Dim respuests
respuesta = ShellExecute(Me.hwnd, "open", "Ruta del VBS", "", "", 3)

Por si esta no fuera la respuesta adecuada también puedo comentarte que se puede ejecutar un VBS desde la linea de comandos del DOS con el comando "start" y por supuesto también directamente mediante doble click.

Espero haber sido de ayuda.
Saludos.