VBScriptPC名ユーザー名取得

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

下図は、Windows10です。

< スポンサーリンク >





VBScriptでコンピューター名、ユーザー名を取得する方法

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

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コンピュータ名

 

< スポンサーリンク >※広告先のお問い合わせは広告主様にお願いします