VBScript PCのコンピュータ名やユーザー名を取得する

VBScriptでPCのコンピューター名やユーザー名を取得するときの記録です。

下図は、Windows10です。

VBSコンピュータ名

 

< スポンサーリンク >

 

方法

コンピューター名をメッセージで表示します。

msgbox CreateObject("WScript.Network").ComputerName

VBSコンピュータ名

VBSコンピュータ名

 

ユーザードメインをメッセージで表示します。

msgbox CreateObject("WScript.Network").UserDomain

VBSコンピュータ名

VBSコンピュータ名

 

ユーザー名をメッセージで表示します。

msgbox CreateObject("WScript.Network").UserName

VBSコンピュータ名

VBSコンピュータ名

 

まとめて処理したいときは、「With」ステートメントを使うと便利です。

set objNet = CreateObject("WScript.Network")

with objNet
   str = .ComputerName
   str = str & vbCrLf & .UserDomain
   str = str & vbCrLf & .UserName
end with

msgbox str

VBSコンピュータ名

VBSコンピュータ名

 

< スポンサーリンク >



サブコンテンツ

このページの先頭へ