« 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

TrackBack URL for this entry:
http://app.cocolog-nifty.com/t/trackback/68055/11132385

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

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