Программирование на Visual Basic, главный форум. Обсуждение тем программирования на VB 1—6.
Даже если вы плохо разбираетесь в VB и программировании вообще — тут вам помогут. В разумных пределах, конечно.
Правила форума
Темы, в которых будет сначала написано «что нужно сделать», а затем просьба «помогите», будут
закрыты.
Читайте
требования к создаваемым темам.
-
Antonariy
-
- Повелитель Internet Explorer
-
-
- Сообщения: 4824
- Зарегистрирован: 28.04.2005 (Чт) 14:33
- Откуда: Мимо проходил
-
Antonariy » 07.09.2005 (Ср) 13:34
Сабж вытаскиваю с помощью WMI
- Код: Выделить всё
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from Win32_CDROMDrive")
For Each objItem In colItems
Debug.Print "VolumeSerialNumber: " & objItem.VolumeSerialNumber
Next
На сколько я понимаю, у чистого диска его нет, появляется при записи сессии. При записи следующей сессии он меняется. Получается, номер прописывается в саму сессию. Если так, то можно ли выцепить номер предыдущей сессии?
Лучший способ понять что-то самому — объяснить это другому.
-
Sebas
-
- Неуловимый Джо
-
-
- Сообщения: 3626
- Зарегистрирован: 12.02.2002 (Вт) 17:25
- Откуда: столько наглости такие вопросы задавать
-
Sebas » 07.09.2005 (Ср) 13:38
гм, это уже серьёзная работа с ASPI
- Я никогда не понимал, почему они приходят ко мне чтобы умирать?
sebas<-@->mail.ru
-
Antonariy
-
- Повелитель Internet Explorer
-
-
- Сообщения: 4824
- Зарегистрирован: 28.04.2005 (Чт) 14:33
- Откуда: Мимо проходил
-
Antonariy » 07.09.2005 (Ср) 13:46
И еще, cохраняются ли эти номера при cd-copy?
Лучший способ понять что-то самому — объяснить это другому.
-
Matew
-
- Постоялец
-
-
- Сообщения: 894
- Зарегистрирован: 28.06.2004 (Пн) 17:44
- Откуда: Дальний Восток, г. Ха
-
Matew » 08.09.2005 (Чт) 4:00
И еще, cохраняются ли эти номера при cd-copy?
Программы типа CloneCD копируют ВСЁ! (даже царапины).
Вернуться в Visual Basic 1–6
Кто сейчас на конференции
Сейчас этот форум просматривают: AhrefsBot, Google-бот, Yandex-бот и гости: 2