一个设置系统用户自动登陆的小工具 - 中国DOS联盟论坛

每次设置系统用户自动登陆都要去翻注册表，比较麻烦，所以今天就花了点时间写了一个小脚本，功能很单一，有需要的朋友可以下载试试。代码如下：


on error resume next

dim welcomeinfo
welcomeinfo=msgbox("本工具将帮助你设置Windows自动登陆用户，是否继续？",1,"提示信息")
if welcomeinfo<>1 then wscript.quit

dim wshshell
dim rootkey
dim userkey
dim passwordkey
dim logonkey
dim username
dim password
dim tsinfo

do
	username=inputbox("请输入你的用户账号：","提示信息")
	if username="" then
		tsinfo=msgbox("用户账号不能为空，要重新输入吗？",1,"提示信息")
		if tsinfo<>1 then wscript.quit
	end if
loop until username<>""
password=inputbox("请输入你的用户密码：","提示信息")

set wshshell=createobject("wscript.shell")

rootkey="HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon\"
userkey=rootkey & "\DefaultUserName"
passwordkey=rootkey & "\DefaultPassWord"
logonkey=rootkey & "\AutoAdminLogon"

wshshell.regwrite userkey,username
wshshell.regwrite passwordkey,password
wshshell.regwrite logonkey,"1"

if err then
	msgbox "设置失败，请重试！",,"提示信息"
	err.clear
else
	msgbox "设置成功！",,"提示信息"
end if

set wshshell=nothing

[ Last edited by 112183883 on 2007-1-6 at 02:04 PM ]

其实运行control userpasswords2，把要使用本机需要密码的勾去掉，确定后输入帐户和密码即可

另外楼主使用的是脚本，如果使用批处理和reg命令会更简单

@echo off
set /p um=输入登陆的帐号：
set /p up=输入帐号的密码：
reg add "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon" /v "DefaultUserName" /t REG_SZ /d "%um%" /f >nul
reg add "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon" /v "DefaultPassword" /t REG_SZ /d "%up%" /f >nul
reg add "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon" /v "AutoAdminlogon" /t REG_SZ /d "1" >nul

rundll32 netplwiz.dll,UsersRunDll
也可以

Originally posted by dikex at 2007-1-6 14:20:
其实运行control userpasswords2，把要使用本机需要密码的勾去掉，确定后输入帐户和密码即可

另外楼主使用的是脚本，如果使用批处理和reg命令会更简堮..

好像少了个 /f 的参数

正好需要用到謝謝

Originally posted by dikex at 2007-1-6 14:20:
其实运行control userpasswords2，把要使用本机需要密码的勾去掉，确定后输入帐户和密码即可

另外楼主使用的是脚本，如果使用批处理和reg命令会更简 ...

二楼的你的代码少一个/F，应该是如下：
@echo off
set /p um=输入登陆的帐号：
set /p up=输入帐号的密码：
reg add "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon" /f /v "DefaultUserName" /t REG_SZ /d "%um%" /f >nul
reg add "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon" /f /v "DefaultPassword" /t REG_SZ /d "%up%" /f >nul
reg add "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon" /f /v "AutoAdminlogon" /t REG_SZ /d

"1" >nul

control设置的好像密码不在注册表显示吧

Originally posted by dikex at 2007-1-6 14:20:
其实运行control userpasswords2，把要使用本机需要密码的勾去掉，确定后输入帐户和密码即可

另外楼主使用的是脚本，如果使用批处理和reg命令会更简 ...

汗。。。这个命令想了好久就是想不起来，所以这几年一直用的是：
rundll32 netplwiz.dll UsersRunDll

Vista和Win 7下找不到这几个键了……
有人知道改在哪里了么？

是不是应该把HKEY_LOCAL_MACHINE 替换成HKLM

reg add "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon" 。。。。。。

REG ADD KeyName

KeyName FullKey
Machine Name of remote machine - omitting defaults to the current
machine Only HKLM and HKU are available on remote machines
FullKey ROOTKEY\SubKey
ROOTKEY

正需要。。。下来看看。

第1楼　112183883	发表于 2007-01-06 13:58
初级用户　发帖 31　积分 128
一个设置系统用户自动登陆的小工具每次设置系统用户自动登陆都要去翻注册表，比较麻烦，所以今天就花了点时间写了一个小脚本，功能很单一，有需要的朋友可以下载试试。代码如下： on error resume next dim welcomeinfo welcomeinfo=msgbox("本工具将帮助你设置Windows自动登陆用户，是否继续？",1,"提示信息") if welcomeinfo<>1 then wscript.quit dim wshshell dim rootkey dim userkey dim passwordkey dim logonkey dim username dim password dim tsinfo do username=inputbox("请输入你的用户账号：","提示信息") if username="" then tsinfo=msgbox("用户账号不能为空，要重新输入吗？",1,"提示信息") if tsinfo<>1 then wscript.quit end if loop until username<>"" password=inputbox("请输入你的用户密码：","提示信息") set wshshell=createobject("wscript.shell") rootkey="HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon\" userkey=rootkey & "\DefaultUserName" passwordkey=rootkey & "\DefaultPassWord" logonkey=rootkey & "\AutoAdminLogon" wshshell.regwrite userkey,username wshshell.regwrite passwordkey,password wshshell.regwrite logonkey,"1" if err then msgbox "设置失败，请重试！",,"提示信息" err.clear else msgbox "设置成功！",,"提示信息" end if set wshshell=nothing [ Last edited by 112183883 on 2007-1-6 at 02:04 PM ] 附件 AutoAdminLogon.rar (665 bytes)

第2楼　dikex	发表于 2007-01-06 14:20
高级用户　发帖 366　积分 788
其实运行control userpasswords2，把要使用本机需要密码的勾去掉，确定后输入帐户和密码即可另外楼主使用的是脚本，如果使用批处理和reg命令会更简单 @echo off set /p um=输入登陆的帐号： set /p up=输入帐号的密码： reg add "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon" /v "DefaultUserName" /t REG_SZ /d "%um%" /f >nul reg add "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon" /v "DefaultPassword" /t REG_SZ /d "%up%" /f >nul reg add "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon" /v "AutoAdminlogon" /t REG_SZ /d "1" >nul

第3楼　baomaboy	发表于 2007-01-08 06:35
银牌会员　发帖 554　积分 1,513
rundll32 netplwiz.dll,UsersRunDll 也可以

第4楼　utem999	发表于 2007-01-08 09:02
初级用户　发帖 54　积分 135
Originally posted by dikex at 2007-1-6 14:20: 其实运行control userpasswords2，把要使用本机需要密码的勾去掉，确定后输入帐户和密码即可另外楼主使用的是脚本，如果使用批处理和reg命令会更简堮.. 好像少了个 /f 的参数

第5楼　vgwxz	发表于 2009-05-25 01:25
新手上路　发帖 1　积分 1
正好需要用到謝謝

第6楼　zgrhcf	发表于 2009-05-26 14:12
初级用户　发帖 20　积分 29
Originally posted by dikex at 2007-1-6 14:20: 其实运行control userpasswords2，把要使用本机需要密码的勾去掉，确定后输入帐户和密码即可另外楼主使用的是脚本，如果使用批处理和reg命令会更简 ... 二楼的你的代码少一个/F，应该是如下： @echo off set /p um=输入登陆的帐号： set /p up=输入帐号的密码： reg add "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon" /f /v "DefaultUserName" /t REG_SZ /d "%um%" /f >nul reg add "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon" /f /v "DefaultPassword" /t REG_SZ /d "%up%" /f >nul reg add "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon" /f /v "AutoAdminlogon" /t REG_SZ /d "1" >nul

第7楼　slore	发表于 2009-05-26 16:16
铂金会员　发帖 2,478　积分 5,212
control设置的好像密码不在注册表显示吧

第8楼　Pierre	发表于 2009-05-26 22:32
初级用户　发帖 19　积分 30
Originally posted by dikex at 2007-1-6 14:20: 其实运行control userpasswords2，把要使用本机需要密码的勾去掉，确定后输入帐户和密码即可另外楼主使用的是脚本，如果使用批处理和reg命令会更简 ... 汗。。。这个命令想了好久就是想不起来，所以这几年一直用的是： rundll32 netplwiz.dll UsersRunDll

第9楼　azziporah	发表于 2009-07-27 09:30
初级用户　发帖 47　积分 102
Vista和Win 7下找不到这几个键了…… 有人知道改在哪里了么？

第10楼　aksck	发表于 2009-08-18 09:50
新手上路　发帖 1　积分 1
好东西，下了

第11楼　uiopuiop	发表于 2009-08-18 13:32
中级用户　发帖 211　积分 400
to 6 楼：是不是应该把HKEY_LOCAL_MACHINE 替换成HKLM reg add "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon" 。。。。。。 REG ADD KeyName KeyName FullKey Machine Name of remote machine - omitting defaults to the current machine Only HKLM and HKU are available on remote machines FullKey ROOTKEY\SubKey ROOTKEY

第12楼　lovexywy	发表于 2010-08-27 11:52
新手上路　发帖 1　积分 1
正需要。。。下来看看。