Проверьте, является ли диск доступным для записи Windows API-функция

Question

Привет, есть ли какая-либо функция API окон, которая вернется, если диск доступен для записи. Иногда привод виден под дисками, но при попытке его программной записи он дает вам сообщение об ошибке msg, которое замораживает приложение до тех пор, пока пользователь не нажмет кнопку ok. Есть ли встроенная функция, которая проверяет, можно ли записывать диск без раздражающего окна ошибок?

Я попытался trycopy уже и возвращает ту же ошибку MsgBox :(

Спасибо!

Answer 1

Попробуйте вызвать SetErrorMode(SEM_FAILCRITICALERRORS) предотвратить MessageBoxes ошибки от выскакивать.

http://msdn.microsoft.com/en-us/library/ms680621(VS.85).aspx

Answer 2

Вы можете установить ссылка на Microsoft Scripting Runtime.

Затем вы можете использовать код:

Dim FSO as New FileSystemObject 
Dim clsDrive as Scripting.Drive 

Set clsDrive=FSO.GetDrive("C") 

Класс Drive имеет свойство FreeSpace, которое будет равно нулю, если диск не может быть записан.

Кроме того, существует класс Scripting.Folder, который можно использовать с помощью FSO.GetFolder(), который имеет свойство Attributes, которое состоит из флагов типа FileAttribute. Вы можете использовать код как

clsFolder.Attributes And FileAttribute.Readonly для проверки эээ ... ReadOnlyness ;-)

Answer 3

Вызов GetVolumeInformation() и проверить FILE_READ_ONLY_VOLUME в возвращаемом параметре флаги.