Programación General > Visual Basic 6.0 e inferiores

 Visual Y Archivos .bat

(1/1)

luiski:
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

F_Tanori:
Hola te dejo esto a ver si te sirve



--- Código: Text ---  Option Explicit Private Sub Form_Load()        Dim ls_RutaActual, ls_RutaPrograma                ls_RutaActual = CurDir() 'Obterer el directorio Actual        ls_RutaPrograma = App.Path 'Obterer el directorio donde se encuentra el ejecutable                If Right(ls_RutaActual, 1) <> "\" Then ls_RutaActual = ls_RutaActual & "\"        If Right(ls_RutaPrograma, 1) <> "\" Then ls_RutaPrograma = ls_RutaPrograma & "\"                  'Ejecutar .Bat                Shell (ls_RutaActual & "Archivo.bat") ' Si es en el directorio Actual        'Shell (ls_RutaPrograma & "dir.bat") ' O en la carpeta donde esta el programa End Sub   
Suerte

luiski:
hola, y muchas gracias ahora mismo lo pruebo...

Navegación

[0] Índice de Mensajes