Ayudaaa ejecutar 2 comandos de linea cmd

Iniciado por marioNmS, 1 Noviembre 2015, 11:57 AM

0 Miembros y 1 Visitante están viendo este tema.

marioNmS

Ejemplo

Código (vb) [Seleccionar]
AbsPath = Replace(WScript.ScriptFullName, WScript.ScriptName, "")
Set objShell = CreateObject("Wscript.Shell")

strCommand = "cmd /k Ejemplo1"
strCommand2 = "cmd /k Ejemplo2"

objShell.Run strCommand && strCommand2


como hago para ejecutar los dos comandos??. Puedo hacerlo por separado pero no me sirve ya que el comando2 depende del otro..

si alguien sabe, que me ayude por favor..

Eleкtro

Cita de: marioNmS en  1 Noviembre 2015, 11:57 AMPuedo hacerlo por separado pero no me sirve ya que el comando2 depende del otro.

¿Qué quieres decir con que "el comando2 depende del comando1"?, ¿cómo es eso posible, a que te refieres?.

Si lo que pretendes es iniciar una instancia de la CMD y concatenar dos comandos de Batch, entonces puedes hacerlo de la siguiente manera:
Código (vb) [Seleccionar]
Set wshShell = WScript.CreateObject("WScript.Shell")

filepath  = wshShell.ExpandEnvironmentStrings( "%COMSPEC%" )
arguments = "/K ""Echo Hello && Echo World!"""

call wshShell.Run( filepath & " " & arguments )

Wscript.Quit(0)


Si no te refieres a eso, da más detales y muestra los comandos reales para poder indicarte una solución.

Saludos








marioNmS

pero con el ejemplo que me diste se parece mas a lo que estoy buscando, pero no es exactamente me explico con el ejemplo que me diste. Ejemp:

Set wshShell = WScript.CreateObject("WScript.Shell")
AbsPath = Replace(WScript.ScriptFullName, WScript.ScriptName, "")

filepath  = wshShell.ExpandEnvironmentStrings( "%COMSPEC%" )
arguments = "/k ""Echo set JAVA_HOME="&AbsPath&"jre1.8.0_40 && Echo set path=%path%;%JAVA_HOME%\bin"""

call wshShell.Run( filepath & " " & arguments )

Wscript.Quit(0)

cuando quiero que el path me tome el JAVA_HOME no me trae la ruta, se queda igual como esta %JAVA_HOME%
Esto es para un programa hecho en java, lo que intento es que encaso de no tener java instalado, se pueda ejecutar como portable...
Gracias por tu repuesta...