Changeset: 579 fdbozzo - 23/12/2014 18:22:46:

- INTERACTIVE ya no muestra el mensaje de estado final, solo SHOWMSG, para que el script pueda aprovechar la nueva funcionalidad y seguir mostrando el mensaje

VFP9_FoxBin2Prg.vbs

@@ -89,7 +89,7 @@ Else
 	If nDebug = 0 Or nDebug = 2 Then
 		cCMD	= "oFoxBin2prg.ejecutar( '" & WScript.Arguments(0) & "' )"
 	Else
-		cCMD	= "oFoxBin2prg.ejecutar(  '" & WScript.Arguments(0) & "','0','0','0'," _
+		cCMD	= "oFoxBin2prg.ejecutar(  '" & WScript.Arguments(0) & "','INTERACTIVE','0','0'," _
 			& cFlagDontShowErrMsg & "," & cFlagGenerateLog & ",'1','','',.F.,''," _
 			& cFlagRecompile & "," & cNoTimestamps & " )"
 	End If

foxbin2prg.prg

@@ -2337,7 +2337,7 @@ DEFINE CLASS c_foxbin2prg AS CUSTOM
 			CD (JUSTPATH(THIS.c_CurDir))
 
 			DO CASE
-			CASE ATC('-SHOWMSG', ('-' + tcType)) = 1 OR ATC('-INTERACTIVE', ('-' + tcType)) = 1
+			CASE ATC('-SHOWMSG', ('-' + tcType)) = 1 &&OR ATC('-INTERACTIVE', ('-' + tcType)) = 1
 
 				DO CASE
 				CASE lnCodError = 1799	&& Conversion Cancelled