如何使用vbs获取用户名

Question

所以我试图用.move文件行移动一个.vbs文件，我想把.vbs给我的朋友，但为了让它工作，我必须知道他们的用户名是什么。我会把.vbs知道他们的用户名Ex“C：\ users \ username \ desktop”

Answer 1

获取当前登录用户的用户名：

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

Answer 2

在VBScript中，您可以通过SpecialFolders集合获取当前用户桌面文件夹的路径：

WScript.Echo CreateObject("WScript.Shell").SpecialFolders("Desktop")

Answer 3

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"

Answer 4

复制并粘贴以下代码：

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