VB: Diskette formatieren

Wie kann ich aus VB heraus eine Diskette formatieren?

Der Source

lRet = SHELL(„Format a:“, 3)

läuft nicht (Fehler: Datei nicht gefunden) - abgesehen davon ist die Kontrolle des asynchronen Prozesses ja auch nicht ohne…

Das Archiv hier und die MS-Knowledge-Base geben für die Suchbegriffe „Formatieren“ bzw. „Formatting“ auch keine Informationen her.

Hat jemand einen Lösungsvorschlag?

Danke!
Siegfried

Hallo Siegfried,

leider muss man für den Shell-Aufruf das auszuführende Kommando explizit angeben.
Versuchs mal mit

iret = Shell(„Format.com a:“, vbNormalFocus)

Dirk

[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]

Hallo Dirk!

Danke für den Tip!

Gibt es auch eine API-Möglichkeit oder nur den doch recht sperrigen SHELL-Befehl (wg. Fehlermeldungen)

Gruß
Siegfried

Hallo,

das habe ich leider noch nicht benutzt.
Laut Knowledgebase (Artikel Q173688) gibt es aber die API-Funktion
DWORD WINAPI SHFormatDrive(HWND hwnd, UINT drive, UINT fmtID, UINT options)

Für das Laufwerk A müsstest du 0 eingeben.
Für fmtID gibt es die Konstante
SHFMT_ID_DEFAULT mit 0xFFFF

Für Options gibt es die Konstanten
SHFMT_OPT_FULL 0x0001
SHFMT_OPT_SYSONLY 0x0002
Es gibt auch die 0. Wofür die steht, weiss ich allerdings nicht.

Ciao
Dirk

[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]