Страница: 1 |
Вопрос: HDD | Добавлено: 11.08.02 21:12 |
Автор вопроса: ![]() |
Как узнать какого объема винчестер, на сколько дисков он разбит(какого размера каждый диск, его метка), сколько свободного места. |
Ответы | Всего ответов: 3 |
Номер ответа: 1 Автор ответа: ![]() ![]() ![]() ![]() ![]() ![]() Вопросов: 6 Ответов: 4 |
Web-сайт: Профиль | Цитата | #1 | Добавлено: 11.08.02 22:21 |
МНЕ бы тоже узнать!!! |
Номер ответа: 2 Автор ответа: ![]() ![]() ![]() Вопросов: 16 Ответов: 164 |
Web-сайт: Профиль | Цитата | #2 | Добавлено: 12.08.02 02:22 |
Вот немного инфы по этой теме: Public Declare Function GetDiskFreeSpace Lib "kernel32" Alias "GetDiskFreeSpaceA" (ByVal lpRootPathName As String, lpSectorsPerCluster As Long, lpBytesPerSector As Long, lpNumberOfFreeClusters As Long, lpTotalNumberOfClusters As Long) As Long Public Declare Function GetLogicalDrives Lib "kernel32" Alias "GetLogicalDrives" () As Long Public Declare Function GetLogicalDriveStrings Lib "kernel32" Alias "GetLogicalDriveStringsA" (ByVal nBufferLength As Long, ByVal lpBuffer As String) As Long Public Declare Function GetVolumeInformation Lib "kernel32" Alias "GetVolumeInformationA" (ByVal lpRootPathName As String, ByVal lpVolumeNameBuffer As String, ByVal nVolumeNameSize As Long, lpVolumeSerialNumber As Long, lpMaximumComponentLength As Long, lpFileSystemFlags As Long, ByVal lpFileSystemNameBuffer As String, ByVal nFileSystemNameSize As Long) As Long Удачи |
Номер ответа: 3 Автор ответа: ![]() ![]() ![]() ![]() ![]() ![]() Разработчик Offline Client ICQ: 204447456 Вопросов: 180 Ответов: 4229 |
Web-сайт: Профиль | Цитата | #3 | Добавлено: 12.08.02 02:38 |
Есть ещё GetDriveType. Но там глюк Не знаю как в шестом, а в третьем БЕЙСИКе она не отличает Remote от Removable |
Страница: 1 |
|