Ejecutar comandos de MS-DOS sin que se muestre la ventana
Visual Fox Pro, Trucos Agregar ComentariosExcelente ... Podrás ejecutar tus comando de MS-DOS sin que se muestre la ventana negra del DOS.
En la variable cComando puedes colocar cualquier instrucción válida de MS-DOS que luego será ejecutada; Si deseas que la ventana sea visible solo cambia el último parámetro de a función ShellExecute y colócalo en 1
Declare Integer ShellExecute In shell32.Dll;
Integer hndWin, String cAction, String cFile,;
String cParams, String cDir, Integer nShow
cComando = "Dir
c:*.*"
cArchivo = GetEnv("TEMP") + "" + Sys(2015) + ".bat"
=StrToFile(cComando, cArchivo)
=ShellExecute(0,"Open",cArchivo,"","",0)
Si tienes inquietudes, sígueme en Twitter para contactarme.
Seguir a @davamadort¿Deseas que tu sitio web aparezca en buscadores como google, yahoo, msn?
Contrata un plan de hosting en www.winnethost.com y recibes totalmente gratis el registro de tu sitio web en más de 24 buscadores, entre ellos google, yahoo, msn
El Sitio La Web de Davphantom se encuentra hospedado en WinNetHost.com