试图找到一个用户名变量以在桌面上创建文件说 "user" 正在使用

Question

基本上，我要查找的代码是如何使用变量查找用户名

Dim fso
Set fso = CreateObject("Scripting.FileSystemObject")
fso.CreateTextFile "C:\Users\%username%\Desktop\test.txt"

我尝试用其他代码行找出用户名。但没有任何效果当我输入我用其他代码行编写的代码来找出 %username% 变量时，它不起作用。

请在此处回复我之前代码的新代码行。（我是新手，所以如果您使用未附加的代码行进行响应，会让人感到困惑。）

Answer 1

你应该这样写:

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

然后继续你的代码：

Dim fso,strUser
Set fso = CreateObject("Scripting.FileSystemObject")
strUser = CreateObject("WScript.Network").UserName
'wscript.echo strUser
fso.CreateTextFile "C:\Users\"& strUser &"\Desktop\test.txt"

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

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

你的代码也可以这样写:

Option Explicit
Dim fso,DesktopFolder
Set fso = CreateObject("Scripting.FileSystemObject")
DesktopFolder = CreateObject("WScript.Shell").SpecialFolders("Desktop")
fso.CreateTextFile DesktopFolder &"\test.txt"

试图找到一个用户名变量以在桌面上创建文件说 "user" 正在使用

Trying to find a username variable to creat files on the desktop said "user" is using

vbscript