VBScriptでPCのコンピューター名やユーザー名を取得するときの記録です。
下図は、Windows10です。
< スポンサーリンク >
VBScriptでコンピューター名、ユーザー名を取得する方法
コンピューター名をメッセージで表示します。
msgbox CreateObject(“WScript.Network”).ComputerName
ユーザードメインをメッセージで表示します。
msgbox CreateObject(“WScript.Network”).UserDomain
ユーザー名をメッセージで表示します。
msgbox CreateObject(“WScript.Network”).UserName
まとめて処理したいときは、「With」ステートメントを使うと便利です。
set objNet = CreateObject(“WScript.Network”)
with objNet
str = .ComputerName
str = str & vbCrLf & .UserDomain
str = str & vbCrLf & .UserName
end with
msgbox str
こんな記事も書いています