Function DriveExists(sLetter: AnsiChar): Boolean; Begin Result := GetDriveType(PWideChar(sLetter+':\')) In [DRIVE_REMOVABLE..DRIVE_RAMDISK]; End;
dans Visual Basic / VB.NET
dans C# / .NET