Estoy pasando de FW a FWH y encontrándome con algunos problemillas. Uno de ellos es que en FW ejecuto WinExec("miprogmsdos.exe") y va perfecto. Con FWH ni siquiera aparece la ventana ms-dos.
He probado con WaitRun y ShellExecute y el resultado es el mismo.
Alguna idea?
WXP
FWH 2.8
xHarbour build 0.99.61
function Main()
WinExec( "calc.exe" )
return nil
STATIC FUNCTION ARCHIVO()
LOCAL Nome_Arq, nRegistro
IF !FILE( "ARCHIVO.BAT" )
NOME_ARQ := FCREATE("ARCHIVO.BAT")
NREGISTRO := "@ECHO OFF" ;
+ CRLF + ;
"CLS" + ;
+ CRLF + CRLF + ;
"BALCAOW.EXE" + ;
+ CRLF + CRLF + ;
"CLS" + ;
+ CRLF + ;
"EXIT"
FWRITE( NOME_ARQ, NREGISTRO )
FCLOSE( NOME_ARQ )
ENDIF
WinExec( "ARCHIVO.BAT", 0 )
ENDIF
RETURN NILHola Antonio,
WinExec( "calc.exe" ) funciona perfecto, pero no asà el programa en MS-DOS. Con FW+Clipper funciona correctamente.
Un saludo,
Manuel
Manuel,
Posiblemente se deba a que el programa que llamas es de 16 bits.
Karinha y Antonio, por favor disculpen por hacerles perder su tiempo 
Funciona correctamente incluso de 16 bit. TenÃa un problema con la ruta del subprograma.
Saludos,
Manuel
Manuel,
Lo importante es que está solucionado 