Windows 8のユーザープロファイルフォルダ(C:\Users)をD:\Usersに移すためのスクリプト

01_icacls_save.bat

@echo off
rem 再解析ポイントのACLの保存

C:
cd \
icacls "Users" /L /save D:\Users.dat

cd C:\Users
icacls "All Users" /L /save D:\User-All_Users.dat
icacls "Default User" /L /save D:\User-Default_User.dat

cd C:\Users\Default
icacls "Application Data" /L /save D:\User-Default-Application_Data.dat
icacls "Cookies" /L /save D:\User-Default-Cookies.dat
icacls "Local Settings" /L /save D:\User-Default-Local_Settings.dat
icacls "My Documents" /L /save D:\User-Default-My_Documents.dat
icacls "NetHood" /L /save D:\User-Default-NetHood.dat
icacls "PrintHood" /L /save D:\User-Default-PrintHood.dat
icacls "Recent" /L /save D:\User-Default-Recent.dat
icacls "SendTo" /L /save D:\User-Default-SendTo.dat
icacls "Start Menu" /L /save D:\User-Default-Start_Menu.dat
icacls "Templates" /L /save D:\User-Default-Templates.dat
icacls "スタート メニュー" /L /save D:\User-Default-スタート_メニュー.dat

cd C:\Users\Default\AppData\Local
icacls "Application Data" /L /save D:\User-Default-AppData-Local-Application_Data.dat
icacls "History" /L /save D:\User-Default-AppData-Local-History.dat
icacls "Temporary Internet Files" /L /save D:\User-Default-AppData-Local-Temporary_Internet_Files.dat

cd "C:\Users\Default\AppData\Roaming\Microsoft\Windows\Start Menu"
icacls "プログラム" /L /save D:\User-Default-AppData-Roaming-Microsoft-Windows-Start_Menu-プログラム.dat

cd C:\Users\Default\Documents
icacls "My Music" /L /save D:\User-Default-Documents-My_Music.dat
icacls "My Pictures" /L /save D:\User-Default-Documents-My_Pictures.dat
icacls "My Videos" /L /save D:\User-Default-Documents-My_Videos.dat

cd C:\Users\Public\Documents
icacls "My Music" /L /save D:\User-Public-Documents-My_Music.dat
icacls "My Pictures" /L /save D:\User-Public-Documents-My_Pictures.dat
icacls "My Videos" /L /save D:\User-Public-Documents-My_Videos.dat

02_move_users_folder.bat

@echo off
rem C:\UsersをD:\Usersに複製したあとC:\Usersをリネーム

C:
cd \
robocopy C:\Users D:\Users /MIR /COPYALL /XJ
move Users Users_orig
mklink /J C:\Users D:\Users

03_icacls_attrib_restore.bat

@echo off
rem 再解析ポイントの作成とACL,属性の復元

rem C:\Users
C:
cd \
icacls "C:\\" /L /restore D:\Users.dat
attrib +R /L "Users"
pause

D:
cd "D:\Users"
rem D:\Users\All Users
mklink /D "All Users" "C:\ProgramData"
icacls "D:\Users" /L /restore D:\User-All_Users.dat
attrib +S +H +I /L "All Users"
pause

rem D:\Users\Default User
mklink /J "Default User" "D:\Users\Default"
icacls "D:\Users" /L /restore D:\User-Default_User.dat
attrib +S +H +I /L "Default User"
pause

cd "D:\Users\Default"
rem D:\Users\Default\Application Data
mklink /J "Application Data" "D:\Users\Default\AppData\Roaming"
icacls "D:\Users\Default" /L /restore D:\User-Default-Application_Data.dat
attrib +S +H +I /L "Application Data"
pause

rem D:\Users\Default\Cookies
mklink /J "Cookies" "D:\Users\Default\AppData\Roaming\Microsoft\Windows\Cookies"
icacls "D:\Users\Default" /L /restore D:\User-Default-Cookies.dat
attrib +S +H +I /L "Cookies"
pause

rem D:\Users\Default\Local Settings
mklink /J "Local Settings" "D:\Users\Default\AppData\Local"
icacls "D:\Users\Default" /L /restore D:\User-Default-Local_Settings.dat
attrib +S +H +I /L "Local Settings"
pause

rem D:\Users\Default\My Documents
mklink /J "My Documents" "D:\Users\Default\Documents"
icacls "D:\Users\Default" /L /restore D:\User-Default-My_Documents.dat
attrib +S +H +I /L "My Documents"
pause

rem D:\Users\Default\NetHood
mklink /J "NetHood" "D:\Users\Default\AppData\Roaming\Microsoft\Windows\Network Shortcuts"
icacls "D:\Users\Default" /L /restore D:\User-Default-NetHood.dat
attrib +S +H +I /L "NetHood"
pause

rem D:\Users\Default\PrintHood
mklink /J "PrintHood" "D:\Users\Default\AppData\Roaming\Microsoft\Windows\Printer Shortcuts"
icacls "D:\Users\Default" /L /restore D:\User-Default-PrintHood.dat
attrib +S +H +I /L "PrintHood"
pause

rem D:\Users\Default\Recent
mklink /J "Recent" "D:\Users\Default\AppData\Roaming\Microsoft\Windows\Recent"
icacls "D:\Users\Default" /L /restore D:\User-Default-Recent.dat
attrib +S +H +I /L "Recent"
pause

rem D:\Users\Default\SendTo
mklink /J "SendTo" "D:\Users\Default\AppData\Roaming\Microsoft\Windows\SendTo"
icacls "D:\Users\Default" /L /restore D:\User-Default-SendTo.dat
attrib +S +H +I /L "SendTo"
pause

rem D:\Users\Default\Start Menu
mklink /J "Start Menu" "D:\Users\Default\AppData\Roaming\Microsoft\Windows\Start Menu"
icacls "D:\Users\Default" /L /restore D:\User-Default-Start_Menu.dat
attrib +S +H +I /L "Start Menu"
pause

rem D:\Users\Default\Templates
mklink /J "Templates" "D:\Users\Default\AppData\Roaming\Microsoft\Windows\Templates"
icacls "D:\Users\Default" /L /restore D:\User-Default-Templates.dat
attrib +S +H +I /L "Templates"
pause

rem D:\Users\Default\スタート メニュー
mklink /J "スタート メニュー" "D:\Users\Default\AppData\Roaming\Microsoft\Windows\Start Menu"
icacls "D:\Users\Default" /L /restore D:\User-Default-スタート_メニュー.dat
attrib +S +H +I /L "スタート メニュー"
pause

cd "D:\Users\Default\AppData\Local"
rem D:\Users\Default\AppData\Local\Application Data
mklink /J "Application Data" "D:\Users\Default\AppData\Local"
icacls "D:\Users\Default\AppData\Local" /L /restore D:\User-Default-AppData-Local-Application_Data.dat
attrib +S +H +I /L "Application Data"
pause

rem D:\Users\Default\AppData\Local\History
mklink /J "History" "D:\Users\Default\AppData\Local\Microsoft\Windows\History"
icacls "D:\Users\Default\AppData\Local" /L /restore D:\User-Default-AppData-Local-History.dat
attrib +S +H +I /L "History"
pause

rem D:\Users\Default\AppData\Local\Temporary Internet Files
mklink /J "Temporary Internet Files" "D:\Users\Default\AppData\Local\Microsoft\Windows\Temporary Internet Files"
icacls "D:\Users\Default\AppData\Local" /L /restore D:\User-Default-AppData-Local-Temporary_Internet_Files.dat
attrib +S +H +I /L "Temporary Internet Files"
pause

cd "D:\Users\Default\AppData\Roaming\Microsoft\Windows\Start Menu"
rem D:\Users\Default\AppData\Roaming\Microsoft\Windows\Start Menu\プログラム
mklink /J "プログラム" "D:\Users\Default\AppData\Roaming\Microsoft\Windows\Start Menu\Programs"
icacls "D:\Users\Default\AppData\Roaming\Microsoft\Windows\Start Menu" /L /restore D:\User-Default-AppData-Roaming-Microsoft-Windows-Start_Menu-プログラム.dat
attrib +S +H +I /L "プログラム"
pause

cd "D:\Users\Default\Documents"
rem D:\Users\Default\Documents\My Music
mklink /J "My Music" "D:\Users\Default\Music"
icacls "D:\Users\Default\Documents" /L /restore D:\User-Default-Documents-My_Music.dat
attrib +S +H +I /L "My Music"
pause

rem D:\Users\Default\Documents\My Pictures
mklink /J "My Pictures" "D:\Users\Default\Pictures"
icacls "D:\Users\Default\Documents" /L /restore D:\User-Default-Documents-My_Pictures.dat
attrib +S +H +I /L "My Pictures"
pause

rem D:\Users\Default\Documents\My Videos
mklink /J "My Videos" "D:\Users\Default\Videos"
icacls "D:\Users\Default\Documents" /L /restore D:\User-Default-Documents-My_Videos.dat
attrib +S +H +I /L "My Videos"
pause

cd "D:\Users\Public\Documents"
rem D:\Users\Public\Documents\My Music
mklink /J "My Music" "D:\Users\Public\Music"
icacls "D:\Users\Public\Documents" /L /restore D:\User-Public-Documents-My_Music.dat
attrib +S +H +I /L "My Music"
pause

rem D:\Users\Public\Documents\My Pictures
mklink /J "My Pictures" "D:\Users\Public\Pictures"
icacls "D:\Users\Public\Documents" /L /restore D:\User-Public-Documents-My_Pictures.dat
attrib +S +H +I /L "My Pictures"
pause

rem D:\Users\Public\Documents\My Videos
mklink /J "My Videos" "D:\Users\Public\Videos"
icacls "D:\Users\Public\Documents" /L /restore D:\User-Public-Documents-My_Videos.dat
attrib +S +H +I /L "My Videos"
pause