投稿日 | : 2003/06/10(Tue) 15:39 |
投稿者 | : 魔界の仮面弁士 |
Eメール | : |
URL | : |
タイトル | : Re: tcp/ip |
> マイネットワークのローカルエリア接続でのTCP/IPをVBで
> 変更するためのプログラムを作ろうと思うのですが
> どうすればいいのかわかりません。
Windows 2000以上であれば、netsh コマンドを呼び出すだけなので、
VBはなくても大丈夫です。VBSもしくはバッチファイルでもOKです。
====== 以下、以前某所に回答した時の投稿から抜粋 ======
> ・IPアドレスの設定
> ・サブネットマスクの設定
NETSHコマンド。
S = "NETSH INTERFACE IP SET ADDRESS"
S = S & " NAME=""ローカル エリア接続"""
S = S & " SOURCE=STATIC"
S = S & " ADDR=172.16.0.1"
S = S & " MASK=255.255.0.0"
Shell S, vbNormalFocus
> ・デフォルトゲートウェイの設定
NETSHコマンド。
S = "NETSH INTERFACE IP SET ADDRESS"
S = S & " NAME=""ローカル エリア接続"""
S = S & " GATEWAY=172.16.254.254"
S = S & " GWMETRIC=1"
Shell S, vbNormalFocus
もしくは、Win32_NetworkAdapterConfigurationクラスのSetGatewaysメソッド
> ・DNSサーバの設定
NETSHコマンド。
S = "NETSH INTERFACE IP SET DNS"
S = S & " NAME=""ローカル エリア接続"""
S = S & " SOURCE=STATIC"
S = S & " ADDR=172.168.254.1"
S = S & " REGISTER=NONE"
Shell S, vbNormalFocus
もしくは、Win32_NetworkAdapterConfigurationクラスのSetDNSServerSearchOrderメソッド