Ejecutar programas en VB6

[korn]

Como le hago para ejecutar un programa ajeno a un proyecto de Visual Basic

[Max13]

programa = command(programa.exe,1)

<font color="GRAY" size="-2" face="Arial">[B]
El poder no es tenerlo todo
El poder es unirse con el mundo invisible
El ser a uno con los espíritus
Y nosotros uno con ellos,
Nuestro corazón es el corazón de ellos
Desnudo ante el río de la vida

[JohanDario]

Hola, yo hago lo mismo en una aplicacion pero utilizo la funcion &quot;shell&quot;
Esto esta en la ayuda de visual basic:

Dim RetVal
RetVal = Shell(&quot;C:\WINDOWS\CALC.EXE&quot;, 1)

con esta instruccion ejecutas la calculador a de windows.
espero te sirva si necesitas mas ampliacion me avisas.

[Max13]

Esoooooooo era SHELL no command, me confundi jeje.

<font color="GRAY" size="-2" face="Arial">[B]
El poder no es tenerlo todo
El poder es unirse con el mundo invisible
El ser a uno con los espíritus
Y nosotros uno con ellos,
Nuestro corazón es el corazón de ellos
Desnudo ante el río de la vida

[NRLABS]

Mira es buena opción ocupar el Shell, pero si quieres que te abra cualquier archivo, siempre y cuando tenga el programa para abrirlo claro, te recomiendo que ocupes una referencia al API ShellExecute.


Option Explicit
Const SW_SHOWNORMAL = 1
Private Declare Function ShellExecute Lib &quot;shell32.dll&quot; Alias &quot;ShellExecuteA&quot; (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

Private Sub Command1_Click()
ShellExecute Me.hwnd, &quot;open&quot;, &quot;Ruta\archivo.txt&quot;, &quot;&quot;, App.Path, SW_SHOWNORMAL
End Sub

Con esto podras abrir cualquier tipo de archivo. (txt,exe,doc, etc)
Espero te haya servido.
Nos vemos.

[agarciaa]

Saludos,

tengo la siguiente problematica, cuando ejecuto una aplicación en ms-dos me regresa el resultado en texto, como este es amplio lo que hago es usar &quot;&gt;&quot; para enviar el texto a un archivo

programa.exe &gt; archivo.txt

funciona chido, pero cuando lo hago desde la función SHELL de VB me marca el mismo error que si la cadena anteriormente mencionada la colocara en el ejecutar de Windows (INICIO-&gt;EJECUTAR).

Alguien sabe como se puede solucionar esto o como obtener el texto de regreso del MS-DOS a un archivo desde VB con parecido a SHELL??


Gracias


<a href="http://www.ansiwebs.com"><img border="0" src="http://www.ansiwebs.com/img/agarciaa.jpg"></a>

[agarciaa]

¿Por que nadie contesta?, bueno ya no importa lo anterior, ahora una duda es si de alguna manera se puede saber que programas estan corriendo en memoria y terminarlos si es necesario o iniciarlos en caso de que no estén.

Saludos

<a href="http://www.ansiwebs.com"><img border="0" src="http://www.ansiwebs.com/img/agarciaa.jpg"></a>

[Bravenap]

Hola agarciaa, cuando entras en una discusión lo lógico es que plantees posibles soluciones al tema que se está tratando. Si tienes que plantear una nueva duda abre un nuevo tema en el foro y explica bien la cuestión.

Por otro lado, creo que tu segunda pregunta ya se trató con anterioridad, así que sería mejor si usaras el buscador para encontrar esos temas.

Un saludo.

[Jorge_Mota]

intenta
command.com /c c:\ruta\programa.exe > archivo.txt