web-dev-qa-db-ja.com

VBSでユーザー名を取得する方法

だから私は.movefile行で.vbsファイルを移動しようとしています、そして.vbsを友達に与えたいのですが、それが機能するためにはユーザー名が何であるかを知る必要があります。 .vbsにユーザー名を知らせるために何を置くかEx "C:\ users\username\desktop"

12
zDead

現在ログインしているユーザーのユーザー名を取得するには:

strUser = CreateObject("WScript.Network").UserName
24
Bond

VBScriptでは、 SpecialFolders コレクションを使用して、現在のユーザーのデスクトップフォルダーへのパスを取得できます。

WScript.Echo CreateObject("WScript.Shell").SpecialFolders("Desktop")
6
Ansgar Wiechers
strName = wshShell.ExpandEnvironmentStrings( "%USERNAME%" )

これは、ユーザー名を文字列「strName」に格納するため、次のように機能します。

x=messagebox ("Hello ") + strName ,1, strName)

またはあなたの場合:

x=messagebox ("C:\Users\" + strName + "\Desktop\name" ,1, "User name in c:\ directory below"
1
Luke Erickson

このコードをコピーして貼り付けます。

Set wshShell = CreateObject( "WScript.Shell" )
User = wshShell.ExpandEnvironmentStrings( "%USERNAME%" )
WScript.Echo "User: " & strUserName
0
Gladius125