Borrar diskette

31/07/2003 - 10:05 por Fede | Informe spam
Hola, quisiera poder borrar un diskette antes de copiar unos ficheros en él,
lo uso con un programita que me he hecho para sacar copia de seguridad de
una base de datos pequeña. Quisiera usar los comandos DEL A:*.* o incluso
FOMAT A: /Q pero no sé muy bien como hacerlo, y de forma que sea
transparente al usuario.
Pues eso, gracias y saludos.
Fede.
 

Leer las respuestas

#1 Mario Bucio
31/07/2003 - 12:59 | Informe spam
Hola Fede...

Quizás esto te puda dar una idea.

( No es de mi propiedad...
lo "bajé" y esta en mi carpeta
de \Bajados\VFP )

Saludos.

Mario Bucio
Uruapan, Michoacán, México


*!* SHFD_CAPACITY_DEFAULT = 0 &&' capacidad del drive por default
*!* SHFD_CAPACITY_360 = 3 &&' 360KB, para 5.25" :-)
*!* SHFD_CAPACITY_720 = 5 &&' 720KB, para 3.5" : -(
*!* SHFD_FORMAT_QUICK = 0 &&' formato rápido
*!* SHFD_FORMAT_FULL = 1 &&' formato completo
*!* SHFD_FORMAT_SYSONLY = 2 &&' copia solamente los archivos del sistema
(Solo Win95)

LPARAMETERS oForm, iDrive, nCapacity, nTypeFormat

DECLARE INTEGER SHFormatDrive IN "SHELL32.DLL" INTEGER, INTEGER, INTEGER,
INTEGER

hWnd = GetHwndForm(oForm)

IF hWnd <> 0 THEN
Resultado = SHFormatDrive(hWnd, iDrive, nCapacity, nTypeFormat)
ENDIF

Preguntas similares