🚀 go-pugleaf

Thank You!!

"Vladimir Afanasyev" <avv@systema.kiev.ua> wrote in message
news:3f9cf1ac$1@newsgroups.borland.com...
>
> "Maurice Anderson" <mauriceanderson@hotmail.com> wrote:
> >Hello I have succesfully setup and used WMI with class
> >Win32_NetworkAdapterConfiguration.  I have ran quite a few functions such
as
> >EnableDNS.  When I try to execute function  SetGateways, I get an error.
> >Can someone look over this function call and see if you see anything?  I
> >know it should work cause like I said I have ran some other functions.
> >
> >     ret_code = (Variant(NetAdapter)).
> >                Exec(Function("SetGateways") << ("10.0.0.8","10.0.0.9")
<<
> >(1,2));
> It is incorrect.
>
>
> Parameters for SetGateways is Variant array.
> Code must be follow:
>
> int Bounds[]={0,1};
> Variant gateways=Variant(Bounds, 1, varOleStr);
>
> BSTR ip1=SysAllocString(L"10.0.0.8");
> BSTR ip2=SysAllocString(L"10.0.0.9");
> gateways.PutElement(ip1,0);
> gateways.PutElement(ip2,1);
>
> //for Win2000 only
> int Bounds1[]={0,1};
> Variant metric=Variant(Bounds1, 1, varSmallint);
> metric.PutElement(1,0);
> metric.PutElement(2,1);
> //
>
> int
result=(Variant(NetAdapter.pdispVal)).OleFunction<Variant,Variant>("SetGatew
ays",gateways,metric);
> SysFreeString(ip1);
> SysFreeString(ip2);
>
> Vladimir.