(Solucionado) [VBS] Ruta con paréntesis

[Eleкtro]

El script que estoy probando es simple, Lo he probado muchas otras veces y funciona, Pero esta vez la ruta que pongo me da problemas... Estoy seguro que es por los paréntesis.

¿Alguien me dice la forma correcta para escribir esta ruta?:

Código (vb) [Seleccionar] Expandir

set objshell = createobject("wscript.shell")
objshell.run "C:\Program Files (x86)\Hot Corners\RUN.bat"

Gracias

[HdM]

Buenas.

Ya sé que la solución que te propongo no es lo que buscas, pero bueno, momentáneamente, para hacer funcionar el script, te puede valer:

Igual en tu caso, según tu arbol de directorios, no es un 2, es un 3.

Código (vb) [Seleccionar] Expandir


            objshell.run "C:\Progra~2\Hot Corners\RUN.bat"


Saludos.

[Eleкtro]

Gracias por tu respuesta, la verdad no se me habia ocurrido

Pero tengo desactivado los nombres cortos en mi sistema, y sería un inconveniente rehabilitarlos y mantener activada esa característica de windows solamente por un problema con un caracter de ese vbs

Sigo esperando alguna otra solución

Saludos!

[Leminy]

Puedes Intentar "Tomando El Folder" Primero Y Convertirlo A Su "Nombre Corto" En Otra Variable, Esto Seria:

Código [Seleccionar] Expandir


Set fso = CreateObject("Scripting.FileSystemObject")
Set shell = CreateObject("WScript.Shell")
Set TuPath = fso.GetFolder("C:\Program Files (x86)\Hot Corners")
SPTuFolder = TuPath.ShortPath
shell.run SPTuFolder & Chr(92) & "RUN.bat"


Cualquier Problema Con El "Code" Comenta.

[Eleкtro]

Puedes Intentar "Tomando El Folder" Primero Y Convertirlo A Su "Nombre Corto" En Otra Variable, Esto Seria:
Cualquier Problema Con El "Code" Comenta.

Joder, esto es increible, támpoco me funciona!!

Sigo tus pasos:

Código (vb) [Seleccionar] Expandir

Set fso = CreateObject("Scripting.FileSystemObject")
Set shell = CreateObject("WScript.Shell")
Set TuPath = fso.GetFolder("C:\Program Files (x86)\Hot Corners")
SPTuFolder = TuPath.ShortPath
msgbox SPTuFolder & Chr(92) & "RUN.bat"
shell.run SPTuFolder & Chr(92) & "RUN.bat"

Y a pesar de que en el msgbox sale bien la ruta, no me encuentra la ruta para ejecutar el bat     

[Eleкtro]

También he intentado setear la variable así, Pero no funciona!

Código (vb) [Seleccionar] Expandir

Set wshShell = CreateObject( "WScript.Shell" )
msgbox wshShell.ExpandEnvironmentStrings( "%PROGRAMFILES(X86)%" ) & Chr(92) & "Hot Corners" & Chr(92) & "RUN.bat"
wshShell.run wshShell.ExpandEnvironmentStrings( "%PROGRAMFILES(X86)%" ) & Chr(92) & "Hot Corners" & Chr(92) & "RUN.bat"

Me dice que el sistema no puede encontrar el archivo...

Aunque, El msgbox se muestra correctamente...

Me pone de los nervios...


EDITO:

Claro!!! ya se porque es!!!

Creo que debo entrecomillar la ruta al contener espacios

Pero no se hacerlo, me da error

¿Como puedo añadirle comilla doble al principio y al final de esta ruta?:

Código (VB) [Seleccionar] Expandir

wshShell.run wshShell.ExpandEnvironmentStrings( "%PROGRAMFILES(X86)%" ) & Chr(92) & "Hot Corners" & Chr(92) & "RUN.bat"

[Eleкtro]

Bien, lo conseguí, Era tán fácil como entrecomillar la maldita ruta

No se como no habia caido en eso xDDDDDDDDD


Muchas gracias por la ayuda!

Código (vb) [Seleccionar] Expandir

Set wshShell = CreateObject( "WScript.Shell" )
wshShell.run """" & "C:\Program files (x86)\Hot Corners\Run.bat" & """"

[Leminy]

Joder, esto es increible, támpoco me funciona!!

Sigo tus pasos:

Código (vb) [Seleccionar] Expandir

Set fso = CreateObject("Scripting.FileSystemObject")
Set shell = CreateObject("WScript.Shell")
Set TuPath = fso.GetFolder("C:\Program Files (x86)\Hot Corners")
SPTuFolder = TuPath.ShortPath
msgbox SPTuFolder & Chr(92) & "RUN.bat"
shell.run SPTuFolder & Chr(92) & "RUN.bat"

Y a pesar de que en el msgbox sale bien la ruta, no me encuentra la ruta para ejecutar el bat    

--- EDITO ---

Mi Code No Sirve Por Lo Mismo De La Desactivación De Nombres Cortos... Por Cierto, ¿"Por Que Los Has Desactivado"?   

[Eleкtro]

Por Cierto, ¿"Por Que Los Has Desactivado"?

No me gusta tener cosas habilitadas que nunca uso, ni necesito xD

Seguro que por muy poco que séa, Tenerlo desactivado mejora el rendimiento del PC (Aunque séa un 0,001%)

saludos!