Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2007.08.19;
Скачать: CL | DM;

Вниз

convert vartostr   Найти похожие ветки 

 
Новичеек   (2007-07-23 23:43) [0]

при использовании WMI, вытаскиваю из Win32_NetworkAdapterConfiguration данные. Строковые данные получаю в норме (кэпшены и имена,патчи и .т.п). При попытке вытащить ip выскакивает ошибка. Понимаю что Ip храниться не в виде строки,но как надо сконвертить, я не знаю.
Буду рад помощи:)
Could not convert variant of type (Array variant) into type (String)

Как решить эту проблему?


 
bagos ©   (2007-07-24 00:02) [1]

IPAddress
Data type: string array
Access type: Read-only

Array of all of the IP addresses associated with the current network adapter. Starting with Windows Vista, this property can contain either IPv6 addresses or IPv4 addresses. For more information, see IPv6 and IPv4 Support in WMI.

Example IPv6 address: "2010:836B:4179::836B:4179"
Windows Server 2003, Windows XP, Windows 2000, and Windows NT 4.0:  This property contains addresses in IPv4 format.

Example: "172.16.22.0"


 
Новичеек   (2007-07-24 00:02) [2]

IPAddress
Data type: string array
Access type: Read-only

Array of all of the IP addresses associated with the current network adapter. Starting with Windows Vista, this property can contain either IPv6 addresses or IPv4 addresses. For more information, see IPv6 and IPv4 Support in WMI.

Example IPv6 address: "2010:836B:4179::836B:4179"
Windows Server 2003, Windows XP, Windows 2000, and Windows NT 4.0:  This property contains addresses in IPv4 format.

Example: "172.16.22.0"


 
SlymRO ©   (2007-07-24 05:21) [3]

На интерфейс можно навесить несколько IP функция возвращает массив этих IP, т.е. тебе нужно пробежаться по массиву аля Data[i] (незабудь что это VarArray)


 
Новичеек   (2007-07-24 11:09) [4]

делаю так
var
V:Variant;
begin
If Sprop.Name = "IPAddress" then
V := VarArrayCreate([1, 4], varVariant);
For i:=1 to 4 do
begin
V[i] := VarToStr(Sprop.Get_Value);
end;
edit1.Text:=v[1]+v[2]+v[3]+v[4];


запутолся я короче


 
SlymRO ©   (2007-07-24 11:50) [5]

var
V:Variant;
i:integer;
s:string;
begin
If Sprop.Name = "IPAddress" then
begin
 s:=""
 V:=Sprop.Get_Value;
 for i:=VarArrayLowBound(v,1) to VarArrayHighBound(v,1) do
   s:=s+"|"+v[i];
 edit1.Text:=s;
end;
end;


 
Но   (2007-07-24 13:19) [6]

Спасибо.

на интерфейсе один айпи так что хватает:

var
V:Variant;
begin
If Sprop.Name = "IPAddress" then
begin
V:=Sprop.Get_Value;
edit1.Text:=V[0];
end;
end;

Пытаюсь поменять IP:
var
vs:OleVariant;
begin
Vs[0] := "192.168.0.4";
If Sprop.Name = "IPAddress" then
Sprop.Set_Value(Vs);

вылезает ошибка, опять путаюсь с типами


 
Но   (2007-07-24 13:25) [7]

на  MSDN:

IPAddress
   Data type: string array
   Access type: Read-only

И че я ip не смогу поменять че за бред? :(


 
Новичеек   (2007-07-24 18:54) [8]

на помощь пришел метод EnableStatic



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

Текущий архив: 2007.08.19;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.028 c
15-1184934392
Vlad Oshin
2007-07-20 16:26
2007.08.19
Спамер базы, надо удалится оттуда. Не знаю как занесло


2-1185130508
copron
2007-07-22 22:55
2007.08.19
GetNextItem


2-1185515172
Кирей
2007-07-27 09:46
2007.08.19
Ошибка при добавлении записи в таблицу


2-1185121783
ququq
2007-07-22 20:29
2007.08.19
Приведение типов.


15-1184783262
Cyrax
2007-07-18 22:27
2007.08.19
Обеспечение целостности базы данных для интернет-магазина