|
ｿｽｿｽVBｿｽfｿｽｿｽｿｽｿｽ(VB2-VB6)
|
WMIｿｽﾅのネｿｽbｿｽgｿｽｿｽｿｽ[ｿｽNｿｽﾝ抵ｿｽﾉつゑｿｽｿｽｿｽ
ｿｽeｿｽｿｽｿｽｿｽﾌ過具ｿｽｿｽｿｽｿｽO
ｿｽEC/C++
ｿｽEDelphi
ｿｽEVisual BasicｿｽｿｽｿｽSｿｽｿｽ
ｿｽ@(VB2-VB6ｿｽｿｽ.NETｿｽｿｽｿｽp)
ｿｽEVisual Basic(VB2-VB6)
ｿｽEVisual Basic .NET
ｿｽEVisual C++
ｿｽﾖ連ｿｽTｿｽCｿｽg
ｿｽﾐまゑｿｽｿｽ 2006/08/10(ｿｽｿｽ) 19:49:53
ｿｽｿｽｿｽｿｽｿｽbｿｽﾉなゑｿｽｿｽﾄゑｿｽｿｽｿｽﾜゑｿｽｿｽB
ｿｽﾟ具ｿｽｿｽｿｽｿｽOｿｽｿｽQｿｽﾆゑｿｽｿｽﾄ、IPｿｽAｿｽhｿｽｿｽｿｽXｿｽｿｽﾏ更ｿｽｿｽｿｽ骼厄ｿｽｿｽｿｽoｿｽｿｽｿｽｿｽｿｽﾌでゑｿｽｿｽｿｽｿｽA
ｿｽｿｽｿｽｿｽｿｽ¥ｿｽｿｽｿｽｿｽAｿｽｿｽﾆ変更ｿｽﾅゑｿｽｿｽﾜゑｿｽｿｽｿｽBｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽﾅゑｿｽｿｽ蛯､ｿｽｿｽｿｽB
[ｿｽｿｽｿｽｿｽ]
DimXAsNewManagementClass("Win32_NetworkAdapterConfiguration")
ForEachmoAsManagementObjectInX.GetInstances()
DimIP()AsString={"192.168.100.100"}
DimMask()AsString={"255.255.255.0"}
DimArgs()AsObject={IP,Mask}
DimrAsObject=mo.InvokeMethod("EnableStatic",Args)
Next
[ｿｽｿｽｿｽs]
DimXAsNewManagementClass"Win32_NetworkAdapterConfiguration")
DimmAsManagementObject
DimreturnValueAsManagementObjectCollection
returnValue=X.GetInstances()
DimIP()AsString={"192.168.100.100"}
DimMask()AsString={"255.255.255.0"}
DimArgs()AsObject={IP,Mask}
DimrAsObject=m.InvokeMethod("EnableStatic",Args)
ｿｽﾅ鯉ｿｽﾌ包ｿｽｿｽﾅ以会ｿｽｿｽﾌｿｽｿｽbｿｽZｿｽ[ｿｽWｿｽｿｽｿｽoｿｽﾜゑｿｽｿｽB
'System.NullReferenceException'ｿｽﾌハｿｽｿｽｿｽhｿｽｿｽｿｽｿｽｿｽｿｽﾄゑｿｽｿｽﾈゑｿｽｿｽｿｽOｿｽｿｽCDSetting.exeｿｽﾅ費ｿｽｿｽｿｽｿｽｿｽｿｽﾜゑｿｽｿｽｿｽｿｽB
ｿｽﾇ会ｿｽｿｽｿｽｿｽ:ｿｽIｿｽuｿｽWｿｽFｿｽNｿｽgｿｽQｿｽﾆゑｿｽｿｽIｿｽuｿｽWｿｽFｿｽNｿｽgｿｽCｿｽｿｽｿｽXｿｽ^ｿｽｿｽｿｽXｿｽﾉ設定さｿｽｿｽﾄゑｿｽｿｽﾜゑｿｽｿｽｿｽB
ｿｽﾜゑｿｽｿｽAWMIｿｽvｿｽｿｽｿｽOｿｽｿｽｿｽ‾ｿｽｿｽｿｽOｿｽｿｽｿｽｿｽｿｽ鼾ｿｽA
ｿｽE.NETFrameworkｿｽNｿｽｿｽｿｽXｿｽｿｽｿｽCｿｽuｿｽｿｽｿｽｿｽ(System.Management)
ｿｽEMicrosoftWMIScriptingV1.2Library(SWbemObject)
ｿｽｿｽ2ｿｽﾊゑｿｽﾌ包ｿｽｿｽ@ｿｽｿｽｿｽｿｽｿｽｿｽﾆゑｿｽｿｽｿｽｿｽｿｽｿｽﾆでゑｿｽしｿｽｿｽｿｽﾅゑｿｽｿｽ蛯､ｿｽｿｽｿｽB
ｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽ閧｢ｿｽvｿｽｿｽｿｽﾜゑｿｽｿｽB
ｿｽiｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽ痰ｲｿｽｿｽｿｽｿｽﾉなゑｿｽｿｽﾄゑｿｽｿｽﾜゑｿｽｿｽｿｽｿｽj
KG 2006/08/10(ｿｽｿｽ) 21:09:26
>DimXAsNewManagementClass"Win32_NetworkAdapterConfiguration")
ｿｽｿｽsｿｽﾚゑｿｽｿｽｿｽXｿｽyｿｽ[ｿｽXｿｽｿｽｿｽﾍゑｿｽｿｽｿｽｿｽﾄゑｿｽｿｽｿｽﾅ擾ｿｽｿｽﾌ「(ｿｽvｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽｿｽ閧ｵｿｽﾄまゑｿｽｿｽｿｽｿｽAｿｽA
#ｿｽRｿｽsｿｽ[ｿｽｿｽｿｽﾈゑｿｽｿｽﾅ趣ｿｽﾅゑｿｽｿｽｿｽｿｽﾄの難ｿｽｿｽeｿｽｿｽｿｽｿｽorz
KG 2006/08/10(ｿｽｿｽ) 21:12:21
#ｿｽrｿｽｿｽｿｽﾅ難ｿｽｿｽeｿｽｿｽｿｽﾄゑｿｽｿｽﾜゑｿｽｿｽﾜゑｿｽｿｽｿｽｿｽBｿｽｿｽｿｽﾝまゑｿｽｿｽｿｽB
>returnValue=X.GetInstances()
ｿｽﾅコｿｽｿｽｿｽNｿｽVｿｽｿｽｿｽｿｽｿｽｿｽreturnValueｿｽﾉセｿｽbｿｽgｿｽｿｽｿｽﾄゑｿｽｿｽｿｽﾌゑｿｽ
mｿｽｿｽManagementObjectｿｽｿｽnｿｽｿｽｿｽﾈゑｿｽｿｽﾜゑｿｽ
>DimrAsObject=m.InvokeMethod("EnableStatic",Args)
ｿｽｿｽｿｽｿｽsｿｽｿｽｿｽﾄゑｿｽｿｽ驍ｩｿｽｿｽﾅは？
