いつもお世話になります。
VBScriptのご質問です。
ローカルネットワーク接続の設定でIPアドレスを固定から
自動的に取得に変更するという要件なのですが
ネットでは、Win32_NetworkAdapterConfigurationクラスの
EnableDHCPが紹介されていたので試したところ、
使用するIPが「192.164.nn.nn」から「0.0.0.0」と変わっただけで
自動的に取得するに変更はされていませんでした。
netshコマンドをコマンド実行で埋め込んでもいいのですが
出来れば、Win32_NetworkAdapterConfigurationを使う方法を
知りたいです。
アドバイス宜しくお願い致します。
No.1ベストアンサー
- 回答日時:
手動で自動取得設定にしたら DHCP からアドレスを受け取れるっていう大前提はクリアしていると勝手に期待しています。
まずはどんなスクリプトを書いたのか、提示できないのでしょうかね。
単純に DHCP を有効にするだけなのか、その他の設定も連動して変更するのかとか、要件があるでしょうに。
私のところでは DHCP 化するにあたり、以下の方針で行いました。
1. DHCP から受け取るもの
IP アドレス
ルーター(デフォルト ゲートウェイ) のアドレス
DNS サーバーのアドレス
DNS ドメイン名("この接続の DNSサフィックス" という項目)
2. 静的に設定するもの
DNSの検索サフィックス順 (社内に複数のドメインが存在するため)
スクリプトは以下のような流れ。
1. 無効化されていないアダプターのうち、DHCP が無効になっているアダプターのコレクションを取得する。
2. コレクションをループして 1つずつのアダプターに設定を以下の行う。
3. 静的に設定されていた DNS サフィックスを空にする。
4. 静的に設定されていた DNS サーバーのアドレスを空にする。
5. 3と4をアダプターごとに行う。
6. コレクション全体に対して DNS 検索サフィックス順を設定する。
Dim locatorObject, serviceObject
Set locatorObject = WScript.CreateObject("WbemScripting.SWbemLocator")
Set serviceObject = locatorObject.ConnectServer()
serviceObject.Security_.ImpersonationLevel = 3
Dim dnsServers, dnsSuffixSearchOrders
dnsServers = Array()
dnsSuffixSearchOrders = Array("hoge1.local", "hoge2.local", "hoge3.local")
Dim ipConfigItems, ipConfig
Set ipConfigItems = serviceObject.ExecQuery( _
"SELECT * FROM Win32_NetworkAdapterConfiguration " & _
"WHERE (IPEnabled = True) AND (DHCPEnabled = False)")
For Each ipConfig In ipConfigItems
ipConfig.SetDNSDomain()
ipConfig.SetDNSServerSearchOrder(dnsServers)
ipConfig.EnableDHCP()
Next
Set ipConfigItems = serviceObject.Get("Win32_NetworkAdapterConfiguration")
ipConfigItems.SetDNSSuffixSearchOrder(dnsSuffixSearchOrders)
上記コードのインデントは全角空白なので、コピペしたら半角空白にすること。
temtecomai2様
お礼が遅くなりすみませんでした。
丁寧なご説明と、コードまで書いて頂き
ありがとうございました。
勉強させて頂きます。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- UNIX・Linux raspberry piを使ったWebサーバー制作をしています、接続するネットワークを変更したときに 1 2023/01/09 15:57
- VPN 接続のたびにIPが変わるVPNサービスが知りたい 2 2022/06/27 02:34
- FTTH・光回線 グローバルIPアドレスの変更について 1 2022/04/23 05:32
- ツイキャス ツイキャスでアカウントロックされたとき、IPアドレスが自動取得で変更されても、PC端末が特定される? 1 2022/10/15 15:49
- ルーター・ネットワーク機器 10Gbpsの恩恵 5 2022/11/16 15:48
- Wi-Fi・無線LAN 無線ルーターのIPアドレスは、iPhoneのように簡単に変更できる??? 2 2022/04/02 19:00
- SoftBank(ソフトバンク) スマホ ipアドレス 4 2022/08/24 01:26
- サーバー ネットワークの構成に困っています 3 2023/07/05 11:55
- Wi-Fi・無線LAN iPhoneのIPアドレスは機内モードをオンで変わるように、無線ルーターも何かの方法で変更できる? 2 2022/04/02 14:37
- 固定IP パソコン(無線ルーター)のIPアドレスは、iPhoneのIPアドレスのように簡単に変更可能? 4 2022/04/02 13:00
このQ&Aを見た人はこんなQ&Aも見ています
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
サーバーのDNSアドレスが見つか...
-
IPアドレスを自動的に取得
-
8000番や8080番のポー...
-
パソコンの「ローカル」って、...
-
ftpサーバー 接続できない
-
インターネット接続できません...
-
スイッチのポート番号について
-
iPhoneでIPアドレスを変更する...
-
JWCADのファイルをネットワーク...
-
ARP は L2 と L3 どちらのプロ...
-
コマンドプロンプトで、ポート...
-
同一ネットワーク内の別セグメ...
-
ワイヤレスマウスUSBレシーバー...
-
Windows10におけるUSB-RS232C機...
-
PINGが通るのにネットワー...
-
Windows10でUDPのポート解放が...
-
EXCEL VBAで、PnPでCOMポート番...
-
iptables dport、sportについて
-
microsoft-ds(445)とnetbios(13...
-
プリンタのUSB接続について(LP...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
リモートによるIPアドレス / DN...
-
ソニックウォールTZ170の設定
-
決まった時間に回線が切断され...
-
サーバーのDNSアドレスが見つか...
-
社内LANがうまくいきません...
-
楽ナビにND-BT1を取り付けたの...
-
IPアドレスを自動的に取得
-
ciscoルータ892JのDNSサーバ設...
-
operaがつながらない。
-
【NetScreen5GT】 デフォルト...
-
ファイアーウォールでルータ経...
-
企業に設置されているファイア...
-
Juniper SA700 VPNへ外から接続
-
klezに感染したPCを探す方法
-
Cisco IPフィルタリングの参考書
-
デフォルトゲートウェイの設定
-
Vine Linux で 自宅WEBサーバー...
-
プロキシサーバの設定を簡略化...
-
コレガのルーター設定
-
非固定IPアドレスで外向き名前...
おすすめ情報