sobre visual studio 6........ayuda

[cuervo]

bueno para ir directo al grano, yo tengo el visual studio 6 y nose como hacer un programa para que llame otro programa del disco C;por ejemplo si yo abro el windows media player(reproductor) quisiera que este programa ejecute otro programa, ya que activo el reproducto.....

Nose que tan dificil sea pero,no lo creo.....recien me estoy familiarizando con este tipo de programas....
Bueno saludos, y espero que me puedan ayudar...

[martinnets]

Si usas Visual NET podrias ejecutar la funcion shell para ejecutar otra aplicacion desde tu programa
en este link esta la funcion
http://msdn.microsoft.com/library/defau ... tshell.asp
y en Visual Studio puedes usarlo de la siguiente forma

Function Shell(PathName, [WindowStyle As VbAppWinStyle = vbMinimizedFocus]) As Double

[raul338]

Simplemente usas la funcion "Shell" con los parametros "Program As String", en el que va el directoriop del programa, por ej: "C:/Archivos de programa/Windows Media PLayer/wmp.exe" y el opcional "WInAppStyle" en el que se refiere al estado del programa. Por defecto viene "MinimizedFocus":

MinimizedFocus : Minimizado Activo
MinimizedNoFocus : Minimizado INACTIVO
NormalFocus : Normal
NormalNoFocus : Normal Inactivo
Maximized : Maximizado activo (Si es que se puede maximizar"

Quedaria de la siguente manera:

Private Sub cmdPrueba_Click()
Shell ("C:/Archivos de programa/Windows Media Player/wmp.exe", NormalFocus)
End Sub

Raúl - BestProgramado

[HCammus]

bueno para ir directo al grano

Ejecuta la API ShellExecute


Private 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

Public Sub ExecuteFile(ByVal hWnd As Long, ByVal Path As String, ByVal Dir As String)
'* Ejecutar un Archivo cualquiera tomando su Controlador.
Call ShellExecute(hWnd, vbNullString, Path, vbNullString, Dir, 1)
End Sub

Lo puedes ejecutar así

Call ExecuteFile(frmPpal.hWnd, App.Path & "Reports\Report.xls", "C:")

[raul338]

Hola. Esta respuesta no te la doy yo , si no el gran maestro guille .
Sigue este link para verlo. ¿Cómo ejecutar otros programas desde Visual Basic?