Question

我正在尝试使用我的域帐户通过VBS脚本启动HTA（并让它提示我

脚本和hta将位于闪存驱动器的同一目录中，因此代码必须指向脚本的当前目录。

下面的代码目前从脚本目录启动hta，但是我无法传递用户名（例如域/用户名）来启动hta作为另一个用户

Set objShell = CreateObject("Shell.Application")
Set FSO = CreateObject("Scripting.FileSystemObject")
strPath = FSO.GetParentFolderName (WScript.ScriptFullName)
If FSO.FileExists(strPath & "\main.HTA") Then
     objShell.ShellExecute "mshta", Chr(34) & strPath & "\main.HTA" & Chr(34), "", "runas", 1
Else
     MsgBox "Error - HTA was not found"
End If

如何将用户名（和/或密码）保存为变量并将其传递给脚本的runas部分以启动具有不同用户凭据的HTA？

编辑：

以下是我正在尝试做的批处理文件：

runas /user:domain\username "c:\windows\system32\mshta.exe \"\main.hta\

Answer 1

您可以使用下面的代码获得当前用户名，我认为无法以任何方式获取密码。

Set network = CreateObject("WScript.Network")
currentUser = network.userName

如何通过VBS以另一个用户身份运行HTA

1 个答案: