WSH/Win32_NetworkAdapterConfigurationのサンプルスクリプト
の編集
Top
/
WSH
/
Win32_NetworkAdapterConfigurationのサンプルスクリプト
[
トップ
] [
編集
|
差分
|
バックアップ
|
添付
|
リロード
] [
新規
|
一覧
|
検索
|
最終更新
|
ヘルプ
]
-- 雛形とするページ --
(no template pages)
#navi(../) * Win32_NetworkAdapterConfigurationのサンプルスクリプト [#s1402495] WMIを使ったWin32_NetworkAdapterConfigurationでネットワークカードに関する情報を表示するサンプルスクリプトを以下に記します。 #contents #htmlinsertpcsp(win-top.html,win-sp.html) * 関連記事 [#g30f99f4] -[[PowerShellでWMIを使用するサンプル>PowerShell/PowerShellでWMIを使用するサンプル]] -[[Win32_ComputerSystemのサンプルスクリプト>WSH/Win32_ComputerSystemのサンプルスクリプト]] -[[Win32_ComputerSystemProductのサンプルスクリプト>WSH/Win32_ComputerSystemProductのサンプルスクリプト]] -[[Win32_OperatingSystemのサンプルスクリプト>WSH/Win32_OperatingSystemのサンプルスクリプト]] -[[Win32_BIOSのサンプルスクリプト>WSH/Win32_BIOSのサンプルスクリプト]] -[[Win32_LogicalDiskのサンプルスクリプト>WSH/Win32_LogicalDiskのサンプルスクリプト]] -[[Win32_Processorのサンプルスクリプト>WSH/Win32_Processorのサンプルスクリプト]] -[[Win32_NetworkAdapterConfigurationのサンプルスクリプト>WSH/Win32_NetworkAdapterConfigurationのサンプルスクリプト]] -[[Win32_DiskDriveのサンプルスクリプト>WSH/Win32_DiskDriveのサンプルスクリプト]] * Win32_NetworkAdapterConfigurationを使ったサンプルスクリプト [#u966a844] 以下にWin32_NetworkAdapterConfigurationを使用したサンプルスクリプトを記します。~ 本サンプルスクリプトでは、以下の値を表示しています。 -IP -アダプタ名 -サブネット -MACアドレス -デフォルトゲートウェイ -DHCPサーバ -DNSホスト名 -DNSドメイン ** サンプルスクリプト [#s8947c16] #ref(net.vbs) hostname="." ' dotは自機を示す ' uid = "username" ' pwd = "password" Set oLocater = CreateObject("WbemScripting.SWbemLocator") Set oService = oLocater.ConnectServer(hostname, "root/cimv2") ' Set oService = oLocater.ConnectServer(hostname, "root/cimv2", uid, pwd) 'ユーザ、パスワード設定をする場合 oService.Security_.ImpersonationLevel = 3 ' デフォルト値は3のため省略可能 Set items = oService.ExecQuery("Select * From Win32_NetworkAdapterConfiguration", , 48) For Each item In items If Not IsNUll(item.IPAddress) Then For i = LBound(item.IPAddress) To UBound(item.IPAddress) WScript.Echo("IP: " & item.IPAddress(i)) WScript.Echo("アダプタ名: " & item.Description(i)) WScript.Echo("サブネット: " & item.IPSubnet(i)) WScript.Echo("MACアドレス: " & item.MACAddress(i)) If IsArray(item.DefaultIPGateway) Then For j = LBound(item.DefaultIPGateway) To UBound(item.DefaultIPGateway) WScript.Echo("デフォルトゲートウェイ: " & item.DefaultIPGateway(j)) Next End If WScript.Echo("DHCPサーバ: " & item.DHCPServer(i)) WScript.Echo("DNSホスト名: " & item.DNSHostname(i)) WScript.Echo("DNSドメイン: " & item.DNSDomain(i)) Next End If Next Set item = Nothing Set oService = Nothing Set oLocater = Nothing ** 実行例 [#da55e395] cscriptを使用して実行した結果です。 C:\Users\sakura\Desktop>cscript net.vbs Microsoft (R) Windows Script Host Version 5.8 Copyright (C) Microsoft Corporation. All rights reserved. IP: 192.168.1.14 アダプタ名: 1x1 11b/g/n ワイヤレス LAN PCI Express Half Mini カード アダプタ サブネット: 255.255.255.0 MACアドレス: 00:00:00:00:00:00 デフォルトゲートウェイ: 192.168.1.1 デフォルトゲートウェイ: fe80::207:7dff:fe5c:aecf DHCPサーバ: 192.168.1.1 DNSホスト名: THINKPAD DNSドメイン: IP: fe80::ed26:1852:578e:2bd9 アダプタ名: 1x1 11b/g/n ワイヤレス LAN PCI Express Half Mini カード アダプタ サブネット: 64 MACアドレス: 00:00:00:00:00:00 デフォルトゲートウェイ: 192.168.1.1 デフォルトゲートウェイ: fe80::207:7dff:fe5c:aecf DHCPサーバ: 192.168.1.1 DNSホスト名: THINKPAD DNSドメイン: IP: 2001:c90:8025:d78a:ecd2:77cd:eaae:ffe4 アダプタ名: 1x1 11b/g/n ワイヤレス LAN PCI Express Half Mini カード アダプタ サブネット: 128 MACアドレス: 00:00:00:00:00:00 デフォルトゲートウェイ: 192.168.1.1 デフォルトゲートウェイ: fe80::207:7dff:fe5c:aecf DHCPサーバ: 192.168.1.1 DNSホスト名: THINKPAD DNSドメイン: IP: 2001:c90:8025:d78a:ed26:1852:578e:2bd9 アダプタ名: 1x1 11b/g/n ワイヤレス LAN PCI Express Half Mini カード アダプタ サブネット: 64 MACアドレス: 00:00:00:00:00:00 デフォルトゲートウェイ: 192.168.1.1 デフォルトゲートウェイ: fe80::207:7dff:fe5c:aecf DHCPサーバ: 192.168.1.1 DNSホスト名: THINKPAD DNSドメイン: IP: 192.168.56.1 アダプタ名: VirtualBox Host-Only Ethernet Adapter サブネット: 255.255.255.0 MACアドレス: 00:00:00:00:00:00 DHCPサーバ: DNSホスト名: THINKPAD DNSドメイン: IP: fe80::d152:215b:8cda:2f01 アダプタ名: VirtualBox Host-Only Ethernet Adapter サブネット: 64 MACアドレス: 00:00:00:00:00:00 DHCPサーバ: DNSホスト名: THINKPAD DNSドメイン: 以上、Win32_NetworkAdapterConfigurationを使ったサンプルスクリプトでした。 #htmlinsertpcsp(win-btm.html,win-sp.html)
タイムスタンプを変更しない
#navi(../) * Win32_NetworkAdapterConfigurationのサンプルスクリプト [#s1402495] WMIを使ったWin32_NetworkAdapterConfigurationでネットワークカードに関する情報を表示するサンプルスクリプトを以下に記します。 #contents #htmlinsertpcsp(win-top.html,win-sp.html) * 関連記事 [#g30f99f4] -[[PowerShellでWMIを使用するサンプル>PowerShell/PowerShellでWMIを使用するサンプル]] -[[Win32_ComputerSystemのサンプルスクリプト>WSH/Win32_ComputerSystemのサンプルスクリプト]] -[[Win32_ComputerSystemProductのサンプルスクリプト>WSH/Win32_ComputerSystemProductのサンプルスクリプト]] -[[Win32_OperatingSystemのサンプルスクリプト>WSH/Win32_OperatingSystemのサンプルスクリプト]] -[[Win32_BIOSのサンプルスクリプト>WSH/Win32_BIOSのサンプルスクリプト]] -[[Win32_LogicalDiskのサンプルスクリプト>WSH/Win32_LogicalDiskのサンプルスクリプト]] -[[Win32_Processorのサンプルスクリプト>WSH/Win32_Processorのサンプルスクリプト]] -[[Win32_NetworkAdapterConfigurationのサンプルスクリプト>WSH/Win32_NetworkAdapterConfigurationのサンプルスクリプト]] -[[Win32_DiskDriveのサンプルスクリプト>WSH/Win32_DiskDriveのサンプルスクリプト]] * Win32_NetworkAdapterConfigurationを使ったサンプルスクリプト [#u966a844] 以下にWin32_NetworkAdapterConfigurationを使用したサンプルスクリプトを記します。~ 本サンプルスクリプトでは、以下の値を表示しています。 -IP -アダプタ名 -サブネット -MACアドレス -デフォルトゲートウェイ -DHCPサーバ -DNSホスト名 -DNSドメイン ** サンプルスクリプト [#s8947c16] #ref(net.vbs) hostname="." ' dotは自機を示す ' uid = "username" ' pwd = "password" Set oLocater = CreateObject("WbemScripting.SWbemLocator") Set oService = oLocater.ConnectServer(hostname, "root/cimv2") ' Set oService = oLocater.ConnectServer(hostname, "root/cimv2", uid, pwd) 'ユーザ、パスワード設定をする場合 oService.Security_.ImpersonationLevel = 3 ' デフォルト値は3のため省略可能 Set items = oService.ExecQuery("Select * From Win32_NetworkAdapterConfiguration", , 48) For Each item In items If Not IsNUll(item.IPAddress) Then For i = LBound(item.IPAddress) To UBound(item.IPAddress) WScript.Echo("IP: " & item.IPAddress(i)) WScript.Echo("アダプタ名: " & item.Description(i)) WScript.Echo("サブネット: " & item.IPSubnet(i)) WScript.Echo("MACアドレス: " & item.MACAddress(i)) If IsArray(item.DefaultIPGateway) Then For j = LBound(item.DefaultIPGateway) To UBound(item.DefaultIPGateway) WScript.Echo("デフォルトゲートウェイ: " & item.DefaultIPGateway(j)) Next End If WScript.Echo("DHCPサーバ: " & item.DHCPServer(i)) WScript.Echo("DNSホスト名: " & item.DNSHostname(i)) WScript.Echo("DNSドメイン: " & item.DNSDomain(i)) Next End If Next Set item = Nothing Set oService = Nothing Set oLocater = Nothing ** 実行例 [#da55e395] cscriptを使用して実行した結果です。 C:\Users\sakura\Desktop>cscript net.vbs Microsoft (R) Windows Script Host Version 5.8 Copyright (C) Microsoft Corporation. All rights reserved. IP: 192.168.1.14 アダプタ名: 1x1 11b/g/n ワイヤレス LAN PCI Express Half Mini カード アダプタ サブネット: 255.255.255.0 MACアドレス: 00:00:00:00:00:00 デフォルトゲートウェイ: 192.168.1.1 デフォルトゲートウェイ: fe80::207:7dff:fe5c:aecf DHCPサーバ: 192.168.1.1 DNSホスト名: THINKPAD DNSドメイン: IP: fe80::ed26:1852:578e:2bd9 アダプタ名: 1x1 11b/g/n ワイヤレス LAN PCI Express Half Mini カード アダプタ サブネット: 64 MACアドレス: 00:00:00:00:00:00 デフォルトゲートウェイ: 192.168.1.1 デフォルトゲートウェイ: fe80::207:7dff:fe5c:aecf DHCPサーバ: 192.168.1.1 DNSホスト名: THINKPAD DNSドメイン: IP: 2001:c90:8025:d78a:ecd2:77cd:eaae:ffe4 アダプタ名: 1x1 11b/g/n ワイヤレス LAN PCI Express Half Mini カード アダプタ サブネット: 128 MACアドレス: 00:00:00:00:00:00 デフォルトゲートウェイ: 192.168.1.1 デフォルトゲートウェイ: fe80::207:7dff:fe5c:aecf DHCPサーバ: 192.168.1.1 DNSホスト名: THINKPAD DNSドメイン: IP: 2001:c90:8025:d78a:ed26:1852:578e:2bd9 アダプタ名: 1x1 11b/g/n ワイヤレス LAN PCI Express Half Mini カード アダプタ サブネット: 64 MACアドレス: 00:00:00:00:00:00 デフォルトゲートウェイ: 192.168.1.1 デフォルトゲートウェイ: fe80::207:7dff:fe5c:aecf DHCPサーバ: 192.168.1.1 DNSホスト名: THINKPAD DNSドメイン: IP: 192.168.56.1 アダプタ名: VirtualBox Host-Only Ethernet Adapter サブネット: 255.255.255.0 MACアドレス: 00:00:00:00:00:00 DHCPサーバ: DNSホスト名: THINKPAD DNSドメイン: IP: fe80::d152:215b:8cda:2f01 アダプタ名: VirtualBox Host-Only Ethernet Adapter サブネット: 64 MACアドレス: 00:00:00:00:00:00 DHCPサーバ: DNSホスト名: THINKPAD DNSドメイン: 以上、Win32_NetworkAdapterConfigurationを使ったサンプルスクリプトでした。 #htmlinsertpcsp(win-btm.html,win-sp.html)
テキスト整形のルールを表示する
添付ファイル:
net.vbs
718件
[
詳細
]