Probe de esta forma pero no se puede.
Dim a As Long
Private Declare Function WinExec Lib "kernel32" (ByVal lpCmdLine As String, ByVal nCmdShow As Long) As Long
a = WinExec("cmd /c dir", 2)
Tenes algun buen texto sobre las API en general?
|
|||
Tema destacado: Guía rápida para descarga de herramientas gratuitas de seguridad y desinfección |
|
|