Форум 3DNews
Вернуться   Форум 3DNews > Программирование > Программирование

Ответ Создать новую тему
Опции темы Опции просмотра
Непрочитано 30.09.2007, 17:48   [включить плавающее окно]   #1
freeof
Интересующийся
Автор темы
 
Регистрация: 04.03.2003
Как получить серийный номер винчестера?

Как программно получить серийник винта и возможные другие его параметры (размер к примеру)??
спасибо.
freeof вне форума  
Ответить с цитированием
Непрочитано 30.09.2007, 19:05   [включить плавающее окно]   #2
designer
Мужской Умудрённый
 
Аватар для designer
 
Регистрация: 22.07.2003
Адрес: Пенза
Например http://www.3dnews.ru/storage/mhdd/

или здесь http://hdd-911.com/
__________________
Все страньше и страньше.
designer вне форума  
Конфигурация ПК
Ответить с цитированием
Непрочитано 01.10.2007, 04:15   [включить плавающее окно]   #3
freeof
Интересующийся
Автор темы
 
Регистрация: 04.03.2003
пасиб конешна, но меня интересует ПРОГРАММНЫЙ КОД, который я смогу использовать в своем приложении....
freeof вне форума  
Ответить с цитированием
Непрочитано 05.10.2007, 19:11   [включить плавающее окно]   #4
Phodopus
Мужской Продвинутый
 
Регистрация: 05.10.2005
Адрес: Санкт-Петербург
Windows?
Phodopus вне форума  
Ответить с цитированием
Непрочитано 06.10.2007, 11:17   [включить плавающее окно]   #5
Krionix
Мужской Администратор
 
Аватар для Krionix
 
Регистрация: 08.02.2003
Адрес: Новосибирск
freeof а указать среду разработки вы не считаете нужным ?
Krionix вне форума  
Конфигурация ПК
Ответить с цитированием
Непрочитано 07.10.2007, 20:22   [включить плавающее окно]   #6
freeof
Интересующийся
Автор темы
 
Регистрация: 04.03.2003
ок. конечно.
в идеале, как ни странно звучит, на VB. в любом случае придется адаптировать именно к нему.
freeof вне форума  
Ответить с цитированием
Непрочитано 10.10.2007, 15:35   [включить плавающее окно]   #7
qwert
Новенький
 
Регистрация: 14.02.2003
Адрес: 123123
On Error Resume Next
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set colDrives = objFSO.Drives

For Each objDrive in colDrives
Wscript.Echo "Drive letter: " & objDrive.DriveLetter
Wscript.Echo "File system: " & objDrive.FileSystem
Wscript.Echo "Serial number: " & objDrive.SerialNumber
Next
qwert вне форума  
Ответить с цитированием
Ответ Создать новую тему

Опции темы
Опции просмотра

Ваши права в разделе
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.

Быстрый переход


Текущее время: 21:07. Часовой пояс GMT +3.


Powered by vBulletin® Version 3.8.4
Copyright ©2000 - 2019, Jelsoft Enterprises Ltd. Перевод: zCarot
Copyright © 2000-2017 3DNews. All Rights Reserved.
Администрация 3DNews требует соблюдения на форуме правил и законов РФ
Серверы размещены в Hostkey