Скачать: CL | DM;

чтение WMI   Найти похожие ветки 

← →
toropoff   (2012-04-01 04:23) [0]

подскажите пожалуйста,

function getWMIdata(val: String): AnsiString;
var
 objSWbemLocator : OLEVariant;
 objWMIService   : OLEVariant;
 objWbemObjectSet: OLEVariant;
 oWmiObject      : OLEVariant;
 oEnum           : IEnumvariant;
 iValue          : LongWord;
 s: String;
begin
   s:="";
   objWbemObjectSet:= objWMIService.ExecQuery("SELECT * FROM "+val,"WQL",0);
   oEnum           := IUnknown(objWbemObjectSet._NewEnum) as IEnumVariant;
   while oEnum.Next(1, oWmiObject, iValue) = 0 do  begin

      s:= s + VarStrNull(oWmiObject.Properties_.Items(тут нужно указать имя поля).value)+#13;
      oWmiObject:=Unassigned;
   end;

end;

...
getWMIdata("Win32_BIOS");

вот и загвоздка в том, что не знаю какие поля в таблицах могут быть...

s:= s + VarStrNull(oWmiObject.Properties_.Item(тут нужно указать имя поля).value)+#13;

смотрю описан

 IEnumVARIANT = interface(IUnknown)
   ["{00020404-0000-0000-C000-000000000046}"]
   function Next(celt: LongWord; var rgvar : OleVariant;
     out pceltFetched: LongWord): HResult; stdcall;
...
 end;

что такое rgvar : OleVariant так и не понял..
может подскажите, где посмотреть какие свойства.методы есть?

например хотелось бы что то типа:

oWmiObject.Properties_.Items.COUNT
oWmiObject.Properties_.Items(id)

методом тыка не нашел..
как тут можно вывести данные полей не зная их имена?

простите если вопрос задал непонятно..

---

← →
toropoff   (2012-04-01 04:30) [1]

да, меня интересует не именно Win32_BIOS, в ней я понял что есть:
"BIOSVersion","BuildNumber","Description","Manufacturer","Name","SerialNumber"," Version"

хочу для интереса пересмотреть все таблицы что там за инфа есть...
и для универсальности необходимо как-то читать поле по id или х.з. как там...

---

← →
Сергей М. ©   (2012-04-01 11:59) [2]

http://www.activexperts.com/admin/scripts/wmi/

---

← →
Сергей М. ©   (2012-04-01 12:09) [3]

http://www.softsoft.ru/downloads/46288.exe

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.055 c