FiveTech Support Forums

FiveWin / Harbour / xBase community
Board indexAll discussionsLogin (GitHub)
Board index FiveWin para Harbour/xHarbour Comando DOS desde el programa
jrestojeda
Posts: 601
Joined: Wed Jul 04, 2007 03:51 PM
Comando DOS desde el programa
Posted: Wed Feb 16, 2011 08:02 PM
Hola a todos...
Hay alguna manera de ejecutar un comando DOS desde el programa sin que muestre la ventana negra de DOS?
Es decir algo as铆:

Code (fw): Select all Collapse
Function Main()

RUN ("TASKLIST >TASKLIST.TXT")

Return nil


La idea es hacer un TaskList a un archivo pero sin que se muestre la ventanita de DOS.
Alguna idea?
Desde ya muchas gracias.

Saludos, Esteban.
Ojeda Esteban Eduardo.

Buenos Aires - Argentina.

FWH - PellesC - DBF/CDX - ADS - Gloriosos .Bat - MySql - C# .net - FastReport

Skype: jreduojeda
wmormar
Posts: 1076
Joined: Fri Oct 07, 2005 10:41 PM
Re: Comando DOS desde el programa
Posted: Wed Feb 16, 2011 11:54 PM

waitrun( "miexe.exe", 0 )

William, Morales

Saludos



m茅xico.sureste
JmGarcia
Posts: 654
Joined: Mon May 29, 2006 03:14 PM
Re: Comando DOS desde el programa
Posted: Thu Feb 17, 2011 11:04 AM
En el tema "Guardar la ejecuacion de comandos DOS" doy una soluci贸n usando la SHELL con:
Code (fw): Select all Collapse
CreateObject("WScript.Shell")

http://forums.fivetechsupport.com/viewtopic.php?p=108482#p108482

Ser铆a algo asi:
Code (fw): Select all Collapse
oRemoteShell:=CreateObject("WScript.Shell")
oRemoteShell:Run("cmd /C TASKLIST > TASKLIST.TXT",0,.F.)
SysWait(1) // espera 1 segundo
cTexto:=MemoRead("TASKLIST.TXT")
.../...
oRemoteShell:=nil
Mi abuelo dec铆a: Los aviones vuelan porque Dios quiere, y los helic贸pteros ni Dios sabe porque vuelan.

FWH 16.02, xHarbour 1.2.3, Harbour 3.2.0, WorkShop 4.5, AJ Make 0.30, Borlan BCC 7.00, VisualStudio 2013
jrestojeda
Posts: 601
Joined: Wed Jul 04, 2007 03:51 PM
Re: Comando DOS desde el programa
Posted: Fri Feb 18, 2011 12:00 AM

Muchas gracias a ambos. Qued贸 solucionado con la segunda opci贸n.
Saludos, Esteban.

Ojeda Esteban Eduardo.

Buenos Aires - Argentina.

FWH - PellesC - DBF/CDX - ADS - Gloriosos .Bat - MySql - C# .net - FastReport

Skype: jreduojeda

Continue the discussion

Static archive 路 New replies & topics via GitHub Discussions