Consultor Eletrônico



Kbase P104692: How to format a floppy using 4GL from Windows?
Autor   Progress Software Corporation - Progress
Acesso   Público
Publicação   26/09/2005
Status: Unverified

GOAL:

How to format a floppy using 4GL from Windows?

FACT(s) (Environment):

Windows 32 Intel

FIX:

DEF VAR res AS INTEGER.
RUN winExec('"rundll32" shell32.dll ,SHFormatDrive',1,OUTPUT res) NO-ERROR.
PROCEDURE WinExec EXTERNAL "KERNEL32.DLL" CDECL:
DEFINE INPUT PARAMETER pcProgName AS CHAR.
DEFINE INPUT PARAMETER plVisualStyle AS LONG.
DEFINE OUTPUT PARAMETER plStatus AS LONG.
END.