visual ejecutar archivos .bat

[pandoro]

Hola colegas, me gustaria saber como se haria para que al cargar el formulario se me ejecutase un archivo .bat que se encuentra en el directorio actual del programa...,
un saludo colegas

[~~]

Mira necesitas usar esta api:

Código [Seleccionar] Expandir

Private Declare Function ShellExecuteA Lib "SHELL32.DLL" (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

Se usaria asi en tu caso:

Código [Seleccionar] Expandir

ShellExecuteA Me.hWnd, "Open", app.Path  & "\" "programa.bat", vbNullString, vbNullString, 1

1S4ludo 

[soplo]

¿y no sería mas fácil hacer 'Shell app.path & "\archivo.bat", vbHide'?

[CeLaYa]

checate este link

http://foro.elhacker.net/index.php/topic,142328.0.html

[<--v1c1ous-->]

¿y no sería mas fácil hacer 'Shell app.path & "\archivo.bat", vbHide'?

Yo creo que si

La API ShellExecuteA solo usala con los ejecutables que no queden invisibles con vbhide, pero en tu caso, los .bat los ejecuta ocultos.

[MORFEO_2]

hola tab lo puedes hacer con un code script  desde vbs o vb

Set variable = CreateObject("WScript.Shell")
variable.Run ".\archivo.bat"

esto te permite ejecutar un archivo q se encuentre contenido en la misma carpeta