Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Вот почему не работает WMI при установке винды? [D5, Win2k, WinXP]


TankMan ©   (2004-12-29 14:52:00) 

Решил попробовать определять устройства во время установки WinXP, точнее тогда когда остается 13 мин до завершения установки (тогда уже свободно ставятся все программы и т.д.),- накидал проектик, выдает список устройств на компьютере, но вот когда эта программа запуситалсь на 13-й минуте она почему-то выдала ошибку Critical Error (или похожее, вобщем 2 слова и все(ОК) ) - и список не выдает ...
Вот листинг (Кусочек) самой процедуры:
temp1:=CoSWbemLocator.Create.ConnectServer('', 'root\cimv2', '', '', '', '', 0, nil);  // <<Вот сдесь ошибка :(
Enum := temp1.ExecQuery ('Select * from '+Trim(Edit2.text), 'WQL', wbemFlagBidirectional, nil)._NewEnum as IEnumVariant;
while (Succeeded(ADsEnumerateNext(Enum, 1, varArr,
lNumElements))) and (lNumElements > 0) do
     Save(IUnknown(varArr) as SWBemObject,HARDWareList);
   end;
except
...
метку "Вот сдесь ошибка" я вычислил на той машине на которой идет установка, и ведь самое интересное, что через эти чертовы 13 минут, хоть в SaveMode хоть нет - хоть как - программа работает :(
Может кто-нибудь знает, чего не хватает ей?
Я вот подумывал над тем что ConnectServer принимает одним из параметров имя юзера а вот на 13й минуте юзеров вообще нет... но их можно создать (я думаю) но не знаю как :( поэтому догадка - всего лишь догадка :(


TankMan   (2005-01-03 22:48:00) [1]

Так и всетаки, кто-нибудь знает почему не работает?


TankMan   (2004-12-30 11:31:00) [2]

Вообще для того что бы определить какие драйвера ставить...

Очень нада...


Дмитрий Ботвин   (2004-12-29 15:56:00) [3]

Интересно, а зачем вообще понадобилось это делать
на этапе установки???

Кстати, в ConnectServer первым параметром должна быть '.', а не
''. Это если четко следовать хэлпу :-)))
А если хочешь подключится к удаленному компу - то имя компа.


Наверх

Титульная страница Поиск, карта сайта Написать письмо