host名、IPアドレス、デフォルトゲートウェイ、サブネットマスク、D

質問

host名、IPアドレス、デフォルトゲートウェイ、サブネットマスク、DNSサーバー(4～6個)
のみを出力する.Vbsを作りたいと思っていますがどのように作ったら宜しいのでしょうか？
詳しい方ご教授下さい。

回答No.3

tsukasa-12r

WMI の Win32_NetworkAdapterConfiguration を使用すれば可能なようです。

↓このあたりが参考になりそうです。
http://wiki.livedoor.jp/fugu_wmi/d/IP%A5%A2%A5%C9%A5%EC%A5%B9%A4%F2%BC%E8%C6%C0
http://www.anchorsystems.jp/anchor/ashp/netmon/samples/wmi_hard.html#Win32_NetworkAdapterConfiguration.htm

回答No.2

imogasi

Vbsはファイル、フォルダ、正規表現、テキストストリーム、ディクショナリなどを含んでいるものなので、質問の場合には適さないのでは。
ーー
参考
エクセルの標準モジュールで実行してみた。
Sub test01()
Dim shl
Set shl = CreateObject("WScript.Shell")
shl.Run "cmd /C ipconfig > dtext.txt "
End Sub
を実行し、メモ帳でdtext.txt を開くと
Windows IP Configuration
Ethernet adapter ローカル エリア接続:
Connection-specific DNS Suffix . :
IP Address. . . . . . . . . . . . :＊＊＊＊＊
　 Subnet Mask . . . . . . . . . . . :＊＊＊＊＊＊
Default Gateway . . . . . . . . . : ＊＊＊＊＊＊
のようなのが表示されましたが。

回答No.1

noname#198951

netコマンドから表示される文字列を検索して、それぞれ表示させる。
どう作るかは人によって違うが、一時的にファイル作ってそこから引っ張りだすのでもいいし、そのままメモリに保管したものを選びだしてきてもいいだろうし。