#navi(../)
* VBScriptでコンピュータ名を取得する方法 [#jf502a10]
本資料は、VBScriptで自機のコンピュータ名を取得するサンプルコードを紹介します。
#contents
#htmlinsertpcsp(win-top.html,win-sp.html)
* 関連資料 [#ff9d3c26]
-[[コマンドプロンプト/環境変数でコンピュータ名を取得する方法・COMPUTERNAME]]
-[[コマンドプロンプト/マシンのホスト名を調べる方法(hostname)]]
-[[コマンドプロンプト/Windowsの主要な環境変数一覧と意味]]
* コンピュータ名を取得するサンプルスクリプト [#i78eb062]
#ref(sample.zip)
Set objNetwork = CreateObject("WScript.Network")
strHostName = objNetwork.ComputerName
Set objNetwork = Nothing
WScript.Echo strHostName
** サンプルスクリプトの説明 [#kbb679dc]
+最初にネットワークオブジェクトを作成します。
+作成したネットワークオブジェクト(objNetwork)からComputerNameの値を取得します。
+使用済みとなったネットワークオブジェクト(objNetwork)を開放します。
+コンピュータ名を表示しています。
* 実際に実行した時のスクリーンショット [#l5584d7a]
自機コンピュータ名が表示されているのが確認できます。
#ref(01.gif)
以上、VBScriptを使用してコンピュータ名を取得するサンプルスクリプトでした。
#htmlinsertpcsp(win-btm.html,win-sp.html)