« HDD Health S.M.A.R.T. | Main | Windows 管理ソフト »

Aug 03, 2006

使用者名及び会社名の変更 WSH

Windowsをインストールする際に入力する”使用者名”と”会社名”ですが、
レジストリに書き込まれています。
WSHを使って対話式で変更するスクリプトを作成しました。


Register_name_change.vbs
----
Dim Prompt, Title, WshShell, OwnName, OrgName
set WshShell = WScript.CreateObject("WScript.Shell")

' get Owner name
Prompt = "Please input Owner name "
Title = "Change Rerister Name"
OwnName = InputBox(Prompt, Title, "Owner name")

' get Organization name
Prompt = "Please input Organization name"
OrgName = InputBox(Prompt, Title, "Organization name")

' set these in the registry
WshShell.RegWrite "HKEY_LOCAL_MACHINE\Software\Microsoft\Windows NT\CurrentVersion\RegisteredOwner", OwnName, "REG_SZ"
WshShell.RegWrite "HKEY_LOCAL_MACHINE\Software\Microsoft\Windows NT\CurrentVersion\RegisteredOrganization", OrgName, "REG_SZ"
----


←クリック一票

|

« HDD Health S.M.A.R.T. | Main | Windows 管理ソフト »

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/11248501

Listed below are links to weblogs that reference 使用者名及び会社名の変更 WSH:

« HDD Health S.M.A.R.T. | Main | Windows 管理ソフト »