備忘録　（私の道具箱）

ＶＢＡ

コンピュータ名，ユーザー名，ドメイン名，Windowsフォルダ名取得

（１）コンピュータ名取得

	Environ("ComputerName")

	CreateObject("WScript.Network").ComputerName


（２）ユーザー名取得

	Environ("UserName")

	CreateObject("WScript.Network").UserName


（３）ドメイン名取得

	CreateObject("WScript.Network").UserDomain


（４）Windowsフォルダ名取得（C:\Windows）

	Environ("WINDIR")

戻る