无忧启动论坛

 找回密码
 注册
搜索
最纯净的「微PE装机优盘」UEPON大师作品系统gho:最纯净好用系统下载站数据恢复、数据保护、视频编辑
Win To Go 极致利器(IXUNCIS固态U盘)无忧启动网成立20周年!广告联系 QQ:184822951 微信:wuyouceo
查看: 51302|回复: 92
打印 上一主题 下一主题

一键转移个人资料 v1.0 (build 2011.06.24)

    [复制链接]
跳转到指定楼层
1#
发表于 2011-6-24 13:19:51 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
一键转移个人资料 v1.0

    重装系统之后,我习惯在"一键GHOST备份系统"之前将个人资料永久转移到D盘,
目的很简单:避免"一键GHOST恢复系统"后,新近产生的个人资料丢失,另外,可以减小GHO体积。
个人资料包括:桌面、收藏夹、我的文档、共享文档、cookies,
本程序采用批处理方式制作,优点是:执行效率高、节省时间;开放源代码,便于分享、扩展与提高。


    希望大家试用并提出宝贵意见.
    有任何问题请 回复此贴,不要发新贴。


无忧论坛 DOS讨论区 版主 gmy 制作
2011.6.24

一键转移个人资料v1.0.bat 源代码
  1. @echo off
  2. cls
  3. echo 欢迎使用 一键转移个人资料 v1.0
  4. echo.
  5. echo 转移的目标路径是
  6. echo D:\桌面
  7. echo D:\收藏夹
  8. echo D:\我的文档
  9. echo D:\共享文档
  10. echo D:\我的文档\cookies
  11. echo.
  12. echo 按任意键开始转移。
  13. pause >nul
  14. if not exist d:\ goto end
  15. md D:\桌面
  16. md D:\收藏夹
  17. md D:\我的文档
  18. md D:\共享文档
  19. md D:\我的文档\cookies
  20. REM 默认路径
  21. xcopy "C:\Documents and Settings\%USERNAME%\桌面\*.*" D:\桌面 /e /h /c /y
  22. xcopy "%ALLUSERSPROFILE%\桌面\*.*" D:\桌面 /e /h /c /y
  23. xcopy "C:\Documents and Settings\%USERNAME%\Favorites\*.*" D:\收藏夹 /e /h /c /y
  24. xcopy "%ALLUSERSPROFILE%\Favorites\*.*" D:\收藏夹 /e /h /c /y
  25. xcopy "C:\Documents and Settings\%USERNAME%\My Documents\*.*" D:\我的文档 /e /h /c /y
  26. xcopy "%ALLUSERSPROFILE%\Documents\*.*" D:\共享文档 /e /h /c /y
  27. xcopy "C:\Documents and Settings\%USERNAME%\cookies\*.*" D:\我的文档\cookies /e /h /c /y
  28. REM 兼容其它优化程序设置的路径
  29. xcopy "D:\My Documents\desktop\*.*" D:\桌面 /e /h /c /y
  30. xcopy "D:\My Documents\桌面\*.*" D:\桌面 /e /h /c /y
  31. xcopy "D:\desktop\*.*" D:\桌面 /e /h /c /y
  32. xcopy "D:\My Documents\Favorites\*.*" D:\收藏夹 /e /h /c /y
  33. xcopy "D:\My Documents\收藏夹\*.*" D:\收藏夹 /e /h /c /y
  34. xcopy "D:\Favorites\*.*" D:\收藏夹 /e /h /c /y
  35. xcopy "D:\My Documents\*.*" D:\我的文档 /e /h /c /y
  36. xcopy "D:\My Documents\cookies\*.*" D:\我的文档\cookies /e /h /c /y
  37. xcopy "D:\cookies\*.*" D:\我的文档\cookies /e /h /c /y
  38. regedit /s newdir.reg
  39. cls
  40. echo 执行完毕,重启才能生效,请关闭正在使用的其它软件,按任意键将重启电脑。
  41. pause >nul
  42. shutdown -r
  43. :end
复制代码
newdir.reg 源代码
  1. Windows Registry Editor Version 5.00
  2. [HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Explorer\DocFolderPaths]
  3. "Administrator"="D:\\我的文档"
  4. [HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Explorer\Shell Folders]
  5. "Personal"="D:\\我的文档"
  6. "CommonPictures"="D:\\我的文档\\My Pictures"
  7. "CommonMusic"="D:\\我的文档\\My Music"
  8. "CommonVideo"="D:\\我的文档\\My Videos"
  9. "Common Favorites"="D:\\收藏夹"
  10. "Common Desktop"="C:\\Documents and Settings\\All Users\\桌面"
  11. "Common Documents"="D:\\共享文档"
  12. [HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Shell Folders]
  13. "Personal"="D:\\我的文档"
  14. "My Pictures"="D:\\我的文档\\My Pictures"
  15. "My Music"="D:\\我的文档\\My Music"
  16. "My Video"="D:\\我的文档\\My Videos"
  17. "Cookies"="D:\\我的文档\\Cookies"
  18. "Favorites"="D:\\收藏夹"
  19. "Desktop"="D:\\桌面"
  20. [HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Explorer\User Shell Folders]
  21. "Personal"=hex(2):44,00,3a,00,5c,00,11,62,84,76,87,65,63,68,00,00
  22. "CommonPictures"=hex(2):44,00,3a,00,5c,00,11,62,84,76,87,65,63,68,5c,00,4d,00,79,\
  23.   00,20,00,50,00,69,00,63,00,74,00,75,00,72,00,65,00,73,00,00,00
  24. "CommonMusic"=hex(2):44,00,3a,00,5c,00,11,62,84,76,87,65,63,68,5c,00,4d,00,79,00,\
  25.   20,00,4d,00,75,00,73,00,69,00,63,00,00,00
  26. "CommonVideo"=hex(2):44,00,3a,00,5c,00,11,62,84,76,87,65,63,68,5c,00,4d,00,79,00,\
  27.   20,00,56,00,69,00,64,00,65,00,6f,00,73,00,00,00
  28. "Common Favorites"=hex(2):44,00,3a,00,5c,00,36,65,cf,85,39,59,00,00
  29. "Common Desktop"=hex(2):25,00,41,00,4c,00,4c,00,55,00,53,00,45,00,52,00,53,00,\
  30.   50,00,52,00,4f,00,46,00,49,00,4c,00,45,00,25,00,5c,00,4c,68,62,97,00,00
  31. "Common Documents"=hex(2):44,00,3a,00,5c,00,71,51,ab,4e,87,65,63,68,00,00
  32. [HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\User Shell Folders]
  33. "Personal"=hex(2):44,00,3a,00,5c,00,11,62,84,76,87,65,63,68,00,00
  34. "My Pictures"=hex(2):44,00,3a,00,5c,00,11,62,84,76,87,65,63,68,5c,00,4d,00,79,\
  35.   00,20,00,50,00,69,00,63,00,74,00,75,00,72,00,65,00,73,00,00,00
  36. "My Music"=hex(2):44,00,3a,00,5c,00,11,62,84,76,87,65,63,68,5c,00,4d,00,79,00,\
  37.   20,00,4d,00,75,00,73,00,69,00,63,00,00,00
  38. "My Video"=hex(2):44,00,3a,00,5c,00,11,62,84,76,87,65,63,68,5c,00,4d,00,79,00,\
  39.   20,00,56,00,69,00,64,00,65,00,6f,00,73,00,00,00
  40. "Cookies"=hex(2):44,00,3a,00,5c,00,11,62,84,76,87,65,63,68,5c,00,43,00,6f,00,\
  41.   6f,00,6b,00,69,00,65,00,73,00,00,00
  42. "Favorites"=hex(2):44,00,3a,00,5c,00,36,65,cf,85,39,59,00,00
  43. "Desktop"=hex(2):44,00,3a,00,5c,00,4c,68,62,97,00,00
复制代码
下载地址见附件:



[ 本帖最后由 gmy 于 2011-6-24 16:08 编辑 ]

1KEY_MOVE.rar

1.97 KB, 下载次数: 1894, 下载积分: 无忧币 -2

一键转移个人资料_20110624

评分

参与人数 1无忧币 +3 收起 理由
weiling103 + 3 很给力!

查看全部评分

2#
发表于 2011-6-24 15:46:30 | 只看该作者
版主强大,强烈支持,下载了用先!
回复

使用道具 举报

3#
发表于 2011-6-24 21:08:06 | 只看该作者
好!!!
简洁高效!!!
回复

使用道具 举报

4#
发表于 2011-6-24 23:39:14 | 只看该作者
bat是转移个人资料的批处理,那么etnewdir.reg 又是什么作用?
回复

使用道具 举报

5#
发表于 2011-6-25 10:06:51 | 只看该作者
xp和win7都可以用么?
回复

使用道具 举报

6#
 楼主| 发表于 2011-6-25 14:21:38 | 只看该作者
原帖由 sdshi 于 2011-6-25 10:06 发表
xp和win7都可以用么?


目前仅在XP下测试过。还得请有WIN7的网友们测试一下才能知道能否使用。我估计是通用的。

[ 本帖最后由 gmy 于 2011-6-25 14:26 编辑 ]
回复

使用道具 举报

7#
 楼主| 发表于 2011-6-25 14:24:59 | 只看该作者
原帖由 fanghui 于 2011-6-24 23:39 发表
bat是转移个人资料的批处理,那么regedit /s newdir.reg 又是什么作用?


修改注册表啊!newdir.reg是我随便起的名字,意思为“新目录”,可以改成其它名字。
回复

使用道具 举报

8#
发表于 2011-6-25 14:45:35 | 只看该作者
DOS下和PE下都能使用吗?

还有如果是多账户呢?
回复

使用道具 举报

9#
发表于 2011-6-25 17:05:52 | 只看该作者

版主

批处理好啊!这样今后在封装系统的时候,就好玩点!
回复

使用道具 举报

10#
发表于 2011-6-25 22:28:59 | 只看该作者
原帖由 <i>gmy</i> 于 2011-6-25 14:24 发表 <a href="http://bbs.wuyou.net/redirect.php?goto=findpost&pid=2264353&ptid=195955" target="_blank"><img src="http://bbs.wuyou.net/images/common/back.gif" border="0" onload="if(this.width>screen.width*0.7) {this.resized=true; this.width=screen.width*0.7; this.alt='Click here to open new window\nCTRL+Mouse wheel to zoom in/out';}" onmouseover="if(this.width>screen.width*0.7) {this.resized=true; this.width=screen.width*0.7; this.style.cursor='hand'; this.alt='Click here to open new window\nCTRL+Mouse wheel to zoom in/out';}" onclick="if(!this.resized) {return true;} else {window.open(this.src);}" onmousewheel="return imgzoom(this);" alt="" /></a><br />

<br />

<br />
修改注册表啊!newdir.reg是我随便起的名字,意思为“新目录”,可以改成其它名字。
<br />
哦,重装系统之后指定个人资料目录的作用吧,如果只需要备份个人资料好像不需要用这个,不知道理解的对不对。
回复

使用道具 举报

11#
发表于 2011-6-26 19:38:41 | 只看该作者
遇到这个就悲剧了。。。。

未命名.PNG (16.28 KB, 下载次数: 203)

未命名.PNG
回复

使用道具 举报

12#
发表于 2011-6-26 21:35:25 | 只看该作者
不支持win7的话基本没有前景。。。
回复

使用道具 举报

13#
发表于 2011-6-27 08:01:11 | 只看该作者
建议把这些文件夹都放入“我的文档”。
回复

使用道具 举报

14#
发表于 2011-6-28 17:09:12 | 只看该作者
原帖由 135956 于 2011-6-27 08:01 发表
建议把这些文件夹都放入“我的文档”。

我也觉得把这些文件夹都放入一个目录比较好,清爽嘛
另外,这个批处理针对性太强,应该加强下,适应此类文件夹分布在不同分区或者路径下的情况。例如,在D盘搜索到其它此类文件夹后,应该由用户决定是否转移到默认的目录下。对C盘存在此类文件夹时要优先处理下,因为安装版的系统不在少数,其中就有人懒得动此类文件夹的
回复

使用道具 举报

15#
发表于 2011-6-29 21:45:33 | 只看该作者
什么都可以转移, 但我不主张把,cookies  , 桌面 转移。


  有些 流氓软件, 喜欢生成一些,垃圾快键到桌面,保存到D盘目录一点都不好。
回复

使用道具 举报

16#
发表于 2011-6-30 18:02:10 | 只看该作者
这个很不错,正需要呢。
回复

使用道具 举报

17#
发表于 2011-7-2 00:12:31 | 只看该作者
楼主看起来不错 啊
回复

使用道具 举报

18#
发表于 2011-7-6 17:01:21 | 只看该作者
支持g版大大,是不是只能备份资料,装入系统后还能不能恢复原路径呢?
回复

使用道具 举报

19#
发表于 2011-7-7 09:36:23 | 只看该作者
感谢分享!!!!!!!!
回复

使用道具 举报

20#
发表于 2011-7-10 00:09:05 | 只看该作者
支持版主 如果做个DOS版的就更好了
回复

使用道具 举报

21#
发表于 2011-7-10 16:12:53 | 只看该作者
个人建议:尽量使用英文目录名,如“我的文档”改为“My Documents”,现在好多老外的游戏,存档文档在“我的文档”下,它不支持中文目录,也有一些特殊行业软件,如使用一些如JAVA的支持软件,对中文路径也支持不好,造成很多莫名其妙的问题……
回复

使用道具 举报

22#
发表于 2011-7-12 07:12:07 | 只看该作者
建议:
1.支持win7

2.尽量使用英文目录名

3.这些目录放在一个目录.

4.可以选择性转移,有的目录不是必需的
回复

使用道具 举报

23#
发表于 2011-7-12 20:33:04 | 只看该作者
那要怎么还原啊
回复

使用道具 举报

24#
发表于 2011-7-15 19:57:28 | 只看该作者
又一个精品。谢谢楼主,太谢谢了,支持
回复

使用道具 举报

25#
发表于 2011-7-16 19:16:46 | 只看该作者
简洁高效!!!强烈支持
回复

使用道具 举报

26#
发表于 2011-7-16 22:12:32 | 只看该作者
请教葛老大,win7下的~1文件夹是怎么建的呀,都是学易得,悄悄的告诉我
回复

使用道具 举报

27#
发表于 2011-7-18 13:40:47 | 只看该作者
支持葛老大的作品,win732 bit试试
回复

使用道具 举报

28#
发表于 2011-7-18 13:41:04 | 只看该作者
支持葛老大的作品,win732 bit试试
回复

使用道具 举报

29#
发表于 2011-7-22 15:28:53 | 只看该作者
贴个自己搞的VBS版本 修改桌面位置,可以自己选择位置,刷新桌面位置没搞定,重启explorer时有点问题,可以手动重启explorer生效

Const MY_COMPUTER = &H11&
Const WINDOW_HANDLE = 0
Const OPTIONS = 0
Dim WshSHell
Set WshSHell = WScript.CreateObject("WScript.Shell")
Set objShell = CreateObject("Shell.Application")
Set objFolder = objShell.Namespace(MY_COMPUTER)
Set objFolderItem = objFolder.Self
Set FSO = CreateObject("Scripting.FileSystemObject")
InsTitle = "移动桌面到"
intAnswer = MsgBox("【是】 “" + InsTitle + "”" &Chr(10)&Chr(10)&"【否】我点错了,请退出 “" + InsTitle+ "”" , vbQuestion + vbYesNoCancel, "安装 - "+ InsTitle +" - "+ Copyright)
                If intAnswer = vbYes Then
strPath = objFolderItem.Path
Set objFolder = objShell.BrowseForFolder _
(WINDOW_HANDLE, "请选择新的桌面位置:", OPTIONS, strPath)
        If objFolder Is Nothing Then
Wscript.Quit
        End If
Set objFolderItem = objFolder.Self
newpath = objFolderItem.Path
oldpath = WshSHell.RegRead ("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\User Shell Folders\Desktop")
WshSHell.RegWrite "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\User Shell Folders\Desktop",newpath ,"REG_EXPAND_SZ"
'WshSHell.Run "taskkill -f -im explorer.exe",0,True
'WshSHell.Run "explorer.exe"
FSO.CopyFolder oldpath , newpath
Wscript.Echo "您的桌面新的位置:" + newpath
                end if
                If intAnswer = vbNo Then
Wscript.Quit
                End If
回复

使用道具 举报

30#
发表于 2011-7-30 16:09:52 | 只看该作者
好东西,先收下了,谢谢分享!
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则

小黑屋|手机版|Archiver|捐助支持|无忧启动 ( 闽ICP备05002490号-1 )

闽公网安备 35020302032614号

GMT+8, 2021-2-26 14:10

Powered by Discuz! X3.3

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表