visual vbs script pantalla mensaje example vbscript

vbscript - vbs - Lanzar programas cuya ruta contiene espacios



vbscript messages (8)

Necesito lanzar programas en mi sistema local usando VBScript. Pero estoy teniendo problemas con la sintaxis. Esto es lo que estoy usando en este momento -

Dim objShell Set objShell = WScript.CreateObject( "WScript.Shell" ) objShell.Run("iexplore") Set objShell = Nothing

El código anterior lanza con éxito IE. Quiero lanzar otros navegadores. Pero, si uso,

Dim objShell Set objShell = WScript.CreateObject( "WScript.Shell" ) objShell.Run("c:/Program Files/Mozilla Firefox/firefox.exe") Set objShell = Nothing

está arrojando un error que dice que el archivo o la ruta no se encontró. No estoy seguro de cómo se toma el parámetro dentro de la función Run (). ¿Debo dar la ruta a un EXE o debo dar algunos comandos de DOS?


Copie la carpeta, firefox.exe está en y coloque en el c: / solamente. El script está teniendo dificultades para subir tu árbol de archivos. Descubrí que cuando coloqué el archivo * .exe en la c: / eliminó el mensaje de error "archivo no encontrado".


Está trabajando con

Set WSHELL = CreateObject("Wscript.Shell") WSHELL.Exec("Application_Path")

Pero, ¿cuál debería ser el parámetro en caso de que solo deseemos ingresar el nombre de la aplicación?

por ejemplo, en el caso de Internet Explorer

WSHELL.Run("iexplore")


Lo que intentas lograr es simple, y la forma en que lo estás haciendo no es así. Pruebe esto (Funciona bien para mí) y guarde el archivo como un lote de su editor de texto. Confía en mí, es más fácil.

start firefox.exe


Tratar:-

Dim objShell Set objShell = WScript.CreateObject( "WScript.Shell" ) objShell.Run("""c:/Program Files/Mozilla Firefox/firefox.exe""") Set objShell = Nothing

Tenga en cuenta los "" extra en la cadena. Como la ruta al exe contiene espacios, debe estar entre comillas. (En este caso, simplemente usar "firefox.exe" funcionaría).

También tenga en cuenta que existen muchos programas en la carpeta c: / Archivos de programa (x86) en las versiones de 64 bits de Windows.


Usas el uso de Exec

Dim objShell Set objShell = WScript.CreateObject( "WScript.Shell" ) objShell.Exec("c:/Program Files/Mozilla Firefox/firefox.exe") Set objShell = Nothing


encuentre un archivo .exe para la aplicación que desea ejecutar ejemplo iexplore.exe y firefox.exe y elimine .exe y úselo en objShell.Run ("firefox")

Espero que esto ayude.


Set objShell = WScript.CreateObject("WScript.Shell") objShell.Run("firefox") Set objShell = Nothing

Por favor, intente esto


set shell=CreateObject("Shell.Application") '' shell.ShellExecute "application", "arguments", "path", "verb", window shell.ShellExecute "slipery.bat",,"C:/Users/anthony/Desktop/dvx", "runas", 1 set shell=nothing