【分享】静默转移用户文件夹

chishingchan

使用 DeepSeek 生成自动扫描选择本地磁盘，整合这个帖子的代码，并经过精简优化。
特点：
自动扫描所有本地磁盘：
排除系统盘
根据 Drivers\ 和 Users\ 文件夹的优先级选择最佳驱动器
将所有"反馈"信息都精简掉。

1. <#*,:
   
2. @echo off
   
3. cd /d "%~dp0"
   
4. set "batchfile=%~f0"
   
5. Powershell -ExecutionPolicy Bypass -C "Set-Location ([Environment]::CurrentDirectory);. ([ScriptBlock]::Create([IO.File]::ReadAllText($env:batchfile,[Text.Encoding]::Default)))"
   
6. exit /b
   
7. #>
   
8. 
   
9. # 1. 获取符合条件的驱动器
   
10. $selected = $null
    
11. $top_priority = 0
    
12. 
    
13. # Windows 7的Get-WmiObject写法
    
14. try {
    
15.     $allDrives = Get-WmiObject -Class Win32_LogicalDisk -Filter "DriveType=3" -ErrorAction Stop
    
16. } catch {
    
17.     # 如果Get-WmiObject失败，尝试备用方法
    
18.     $allDrives = @()
    
19.     Get-PSDrive -PSProvider FileSystem | Where-Object { $_.Root -like "*:" } | ForEach-Object {
    
20.         $driveLetter = $_.Root.Substring(0,1)
    
21.         $allDrives += New-Object PSObject -Property @{
    
22.             DeviceID = "$driveLetter`:"
    
23.         }
    
24.     }
    
25. }
    
26. 
    
27. foreach ($driveObj in $allDrives) {
    
28.     $drive_letter = $driveObj.DeviceID.Substring(0,1)
    
29.    
    
30.     # 跳过C盘
    
31.     if ($drive_letter -eq "C") { continue }
    
32.    
    
33.     $drive_path = "$drive_letter`:"
    
34.    
    
35.     if (Test-Path $drive_path) {
    
36.         # 排除系统盘
    
37.         if (-not (Test-Path "$drive_path\Windows\explorer.exe")) {
    
38.             $priority = 0
    
39.             $has_drivers = 0
    
40.             $has_users = 0
    
41.             
    
42.             if (Test-Path "$drive_path\Drivers") { $has_drivers = 1 }
    
43.             if (Test-Path "$drive_path\Users") { $has_users = 1 }
    
44.             
    
45.             # 计算优先级
    
46.             if ($has_drivers -eq 1 -and $has_users -eq 1) {
    
47.                 $priority = 3
    
48.             } elseif ($has_drivers -eq 1) {
    
49.                 $priority = 2
    
50.             } elseif ($has_users -eq 1) {
    
51.                 $priority = 1
    
52.             }
    
53.             
    
54.             # 选择优先级最高的驱动器
    
55.             if ($priority -gt $top_priority) {
    
56.                 $top_priority = $priority
    
57.                 $selected = "$drive_letter`:"
    
58.             } elseif ($priority -eq $top_priority -and $selected -eq $null) {
    
59.                 $selected = "$drive_letter`:"
    
60.             }
    
61.         }
    
62.     }
    
63. }
    
64. 
    
65. if ($selected -eq $null) { exit }
    
66. 
    
67. $BaseDir = "$selected$env:HOMEPATH"
    
68. 
    
69. # 2. 文件夹GUID映射
    
70. $FolderMap = @{
    
71.     "Downloads"   = "{374DE290-123F-4565-9164-39C4925E467B}"
    
72.     "Saved Games" = "{4C5C32FF-BB9D-43B0-B5B4-2D72E54EAAA4}"
    
73.     "Contacts"    = "{56784854-C6CB-462B-8169-88E350ACB882}"
    
74.     "Searches"    = "{7D1D3A04-DEBB-4115-95CF-2F29DA2920DA}"
    
75.     "Links"       = "{BFB9D5E0-C6A9-404C-B2B2-AE6DB6AF4968}"
    
76.     "Desktop"     = "{B4BFCC3A-DB2C-424C-B029-7FE99A87C641}"
    
77.     "Favorites"   = "{1777F761-68AD-4D8A-87BD-30B759FA33DD}"
    
78.     "Music"       = "{4BD8D571-6D19-48D3-BE97-422220080E43}"
    
79.     "Pictures"    = "{33E28130-4E1E-4676-835A-98395C3BC3BB}"
    
80.     "Videos"      = "{18989B1D-99B5-455B-841C-AB7C74E4DDFC}"
    
81.     "Documents"   = "{FDD39AD0-238F-46AF-ADB4-6C85480369C7}"
    
82. }
    
83. 
    
84. # 3. C#代码
    
85. $CSource = @"
    
86. using System;
    
87. using System.Runtime.InteropServices;
    
88. 
    
89. public class ShellManager {
    
90.     [DllImport("shell32.dll", CharSet = CharSet.Unicode)]
    
91.     public static extern void SHSetKnownFolderPath(
    
92.         [MarshalAs(UnmanagedType.LPStruct)] Guid rfid,
    
93.         uint dwFlags,
    
94.         IntPtr hToken,
    
95.         string pszPath
    
96.     );
    
97.    
    
98.     [DllImport("shell32.dll")]
    
99.     public static extern void SHChangeNotify(
    
100.         uint wEventId,
     
101.         uint uFlags,
     
102.         IntPtr dwItem1,
     
103.         IntPtr dwItem2
     
104.     );
     
105. }
     
106. "@
     
107. 
     
108. # 检查类型是否已存在
     
109. $typeExists = $false
     
110. try {
     
111.     $type = [ShellManager]
     
112.     $typeExists = $true
     
113. } catch {
     
114.     $typeExists = $false
     
115. }
     
116. 
     
117. if (-not $typeExists) {
     
118.     Add-Type -TypeDefinition $CSource -ErrorAction SilentlyContinue
     
119. }
     
120. 
     
121. # 4. 设置文件夹路径
     
122. foreach ($Name in $FolderMap.Keys) {
     
123.     $Target = Join-Path $BaseDir $Name
     
124.    
     
125.     # 创建目录（如果不存在）
     
126.     if (-not (Test-Path $Target)) {
     
127.         try {
     
128.             New-Item -Path $Target -ItemType Directory -Force | Out-Null
     
129.         } catch {
     
130.             continue
     
131.         }
     
132.     }
     
133.    
     
134.     # 设置文件夹路径
     
135.     try {
     
136.         $guidString = $FolderMap[$Name]
     
137.         # Windows 7需要包含大括号的GUID字符串
     
138.         $guid = New-Object Guid($guidString)
     
139.         [ShellManager]::SHSetKnownFolderPath($guid, 0, [IntPtr]::Zero, $Target)
     
140.     } catch {
     
141.         # 静默失败，继续处理其他文件夹
     
142.     }
     
143. }
     
144. 
     
145. # 5. 通知系统更新
     
146. try {
     
147.     [ShellManager]::SHChangeNotify(0x08000000, 0x0000, [IntPtr]::Zero, [IntPtr]::Zero)
     
148. } catch {
     
149.     # 忽略错误
     
150. }

复制代码

代码如有不妥的地方请老大们指正，谢谢！

aloha20200628

回复 1# chishingchan

针对 '获取符合条件的驱动器' 给一个批处脚本如下，运行结果会列出当前全部驱动器的级别（3，2，1，0）...

1. 
   
2. @echo off &if "%~1"=="" ("%~f0" 1|sort /r &pause&exit/b)
   
3. for /f "tokens=1* delims= " %%a in ('fsutil fsinfo drives') do for %%d in (%%b) do if /i "%%d" neq "%SystemDrive%" (
   
4.    set "n=0"
   
5.    if exist "%%dDrivers" set/a "n+=2"
   
6.    if exist "%%dUsers" set/a "n+=1"
   
7.    call echo,%%n%% %%d)
   
8. exit/b
   

复制代码