Board logo

标题: 一个设置系统用户自动登陆的小工具 [打印本页]

作者: 112183883     时间: 2007-1-6 13:58    标题: 一个设置系统用户自动登陆的小工具

每次设置系统用户自动登陆都要去翻注册表,比较麻烦,所以今天就花了点时间写了一个小脚本,功能很单一,有需要的朋友可以下载试试。代码如下:
CODE:  [Copy to clipboard]
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 ]
附件 1: AutoAdminLogon.rar (2007-1-6 13:58, 665 bytes, 下载附件所需积分 1 点 ,下载次数: 141)

作者: dikex     时间: 2007-1-6 14:20
其实运行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
作者: baomaboy     时间: 2007-1-8 06:35
rundll32 netplwiz.dll,UsersRunDll
也可以
作者: utem999     时间: 2007-1-8 09:02


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

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

好像少了个 /f 的参数
作者: vgwxz     时间: 2009-5-25 01:25
正好需要用到 謝謝
作者: zgrhcf     时间: 2009-5-26 14:12


  Quote:
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
作者: slore     时间: 2009-5-26 16:16
control设置的好像密码不在注册表显示吧
作者: Pierre     时间: 2009-5-26 22:32


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

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

汗。。。这个命令想了好久就是想不起来,所以这几年一直用的是:
rundll32 netplwiz.dll UsersRunDll
作者: azziporah     时间: 2009-7-27 09:30
Vista和Win 7下找不到这几个键了……
有人知道改在哪里了么?
作者: aksck     时间: 2009-8-18 09:50
好东西,下了
作者: uiopuiop     时间: 2009-8-18 13:32    标题: to 6 楼:

是不是应该把HKEY_LOCAL_MACHINE 替换成HKLM

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

REG ADD KeyName [/v ValueName | /ve] [/t Type] [/s Separator] [/d Data] [/f]

  KeyName  [\\Machine\]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  [ HKLM | HKCU | HKCR | HKU | HKCC ]
作者: lovexywy     时间: 2010-8-27 11:52
正需要。。。下来看看。




欢迎光临 中国DOS联盟论坛 (http://cndos.fam.cx/forum/) Powered by Discuz! 2.5