8 de diciembre de 2002

Ejecutar comandos DOS en forma oculta

DECLARE LONG WinExec IN kernel32 ;
   STRING lpCmdLine , ;
   LONG nCmdShow

cComando=" regsvr32.exe micontrol.ocx"

WinExec(cComando, 0)

  • 0 - no se muestra (se ejecuta, pero no se hace visible)
  • 1 - la Ventana se Muestra Normal
  • 2 - minimizado
  • 3 - Maximizado
  • 4 - Tamaño Normal, pero no le entrega el Foco al Programa/Comando que se ejecuta

Esto se puede implementar mejor, colocando este código en una función y pasando por parámetros el comando a ejecutar y el forma de visualización. Los comandos a ejecutar pueden ser de DOS o WINDOWS.

Horacio M. Kohler (HK)

No hay comentarios. :

Publicar un comentario