« Run As へのショートカット | Main | ドライブ名を変更する »

Jul 28, 2006

自動ログイン

Windows2000及びWindowsXPにおいて、下記のレジストリを変更すると
指定したユーザーにて起動時、自動ログインをします。

HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon\

AutoAdminLogon 値:1
DefaultDomainName 値:ドメイン名
DefaultUserName 値:ユーザー名
DefaultPassword 値:パスワード

これらをWSHを使ってスクリプト化すると下記の通りです。

auto-logon.vbs 
----
Dim Prompt, WshShell, UserName, UserPasswd, UserDomain
set WshShell = WScript.CreateObject("WScript.Shell")

' get user name
Prompt = "ユーザー名を入力してください"
UserName = InputBox(Prompt, Title, "")

' get password
Prompt = "パスワードを入力してください " & UserName
UserPasswd = InputBox(Prompt, Title, "")

' get domain
Prompt = "ドメイン名を入力してください " & UserName
Userdomain = InputBox(Prompt, Title, "")

' set these in the registry
WshShell.RegWrite "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon\AutoAdminLogon","1","REG_SZ"
WshShell.RegWrite "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon\DefaultDomainName", UserDomain, "REG_SZ"
WshShell.RegWrite "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon\DefaultUserName", UserName, "REG_SZ"
WshShell.RegWrite "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon\DefaultPassword", UserPasswd, "REG_SZ"

' ensure the change is persistent!
WshShell.RegWrite "HKLM\SOFTWARE\Microsoft\WindowsNT\CurrentVersion\Winlogon\ForceAutoLogon", "1", "REG_SZ"
----

no-auto-logon.vbs (自動ログオン キー削除)
----
Option Explicit
On Error Resume Next

Dim Prompt, WshShell
set WshShell = WScript.CreateObject("WScript.Shell")

' delete the relevant keys
WshShell.RegDelete "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon\AutoAdminLogon"
WshShell.RegDelete "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon\DefaultDomainName"
WshShell.RegDelete "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon\DefaultUserName"
WshShell.RegDelete "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon\DefaultPassword"
----

なお、WSHは下記のページより最新版をインストールしておきましょう。

--Windows Script
http://www.microsoft.com/japan/msdn/scripting/default.asp


--参考図書
WINDOWSサーバー HACKS


←クリック一票

|

« Run As へのショートカット | Main | ドライブ名を変更する »

Script」カテゴリの記事

Comments

Post a comment



(Not displayed with comment.)


Comments are moderated, and will not appear on this weblog until the author has approved them.



TrackBack


Listed below are links to weblogs that reference 自動ログイン:

« Run As へのショートカット | Main | ドライブ名を変更する »