shell - 使用 VBSCRIPT 创建具有自定义 shell 的用户

Question

我正在使用这个脚本来创建一个用户......我希望它将 shell 设置为“c:\app\myapp.exe”之类的东西，并且只针对那个用户..希望有人可以为我填写空白。谢谢你..对于Windows 7

Set WshShell = WScript.CreateObject("WScript.Shell")

If WScript.Arguments.length = 0 Then

Set ObjShell = CreateObject("Shell.Application")
ObjShell.ShellExecute "wscript.exe", """" & _
WScript.ScriptFullName & """" &_
 " RunAsAdministrator", , "runas", 1

else

strComputer = "PC2"
Set colAccounts = GetObject("WinNT://" & strComputer & "")
Set objUser = colAccounts.Create("user", "Admin2")
objUser.SetPassword "test"
objUser.SetInfo
msgbox "done"

end if

score 0 · Accepted Answer

如果我对这篇文章的理解正确，你需要设置这个：

[HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\IniFileMapping\system.ini\boot]
"Shell"="USR:Software\Microsoft\Windows NT\CurrentVersion\Winlogon"

然后在用户注册表配置单元中的Shell值中指定用户特定的外壳（存储在用户配置文件中，您需要将其加载到注册表中才能对其进行修改）。如果你想用 VBScript 做到这一点，你必须使用这样的东西：Software\Microsoft\Windows NT\CurrentVersion\WinLogonntuser.dat

Set sh = CreateObject("WScript.Shell")
sh.Run "reg load HKU\temp C:\Users\username\ntuser.dat", 0, True

完成后卸载蜂巢：

sh.Run "reg unload HKU\temp", 0, True

shell - 使用 VBSCRIPT 创建具有自定义 shell 的用户

1 回答 1

Related

Reference