Maybe it's good stuff.--windows Script Host-7[format]

Window '-------------------seems to have failed on my machine-----------------

'**************************************************
' File:Format.vbs (WSH sample in VBScript)
' Author: (c) G. Born
'
' Invoking the Format dialog box for a floppy disk
'**************************************************
Option Explicit

Dim wshobj ' Object for Run method

Set wshobj = WScript.CreateObject ("Wscript.Shell")

Wshobj.run "RunDll32.exe shell32.dll,shformatdrive", _
1, True ' Launch dialog box.

' * * * end