无忧启动论坛

标题: 随心所欲改变我的文档-收藏夹-IECache位置－批处理 [打印本页]

作者: 瓦斯曲 时间: 2007-10-31 13:02
标题: 随心所欲改变我的文档-收藏夹-IECache位置－批处理
网上有很多改变我的文档-收藏夹-IECache位置的方法和软件

我只是将他们组合了下用批处理写出来，
1、是为了方便大家
2、是使东东更透明，便于相互交流和学习
批处理原码：

@Echo Off
color 0A
Set Prog=  改变我的文档-收藏夹-IECache位置
Set L1=　　　　　　　　　╭─────────────────╮
Set L2=　　　　　　╭──┤%Prog% ├──╮
Set L3=　　　　　　│　　╰─────────────────╯　　│
Set L4=　　　　　　│==============================================│
Set L5=　　　　　　│       仅供网友们交流　翻版不究          │
Set L6=　　　　　　╰───────────────────────╯
set mypath=%CD:\=\%
:Start
CLS
Title %Prog%
Echo.
Echo %L1%
Echo %L2%
Echo %L3%
Echo          │                                           │
Echo 　　　　　　│  [ 1 ] 改变我的文档位置                   │
Echo          │                                           │
Echo 　　　　　　│　[ 2 ] 改变IE收藏夹位置                　　│
Echo          │                                           │
Echo 　　　　　　│　[ 3 ] 改变IECache位置                   　│
Echo          │                                           │
Echo 　　　　　　│　[ Q ] 退出安装　　　　　　　　　　　　　　　│
Echo          │                                           │
Echo %L4%
Echo %L5%
Echo %L6%
echo  ═══════════════════════════════════════
echo          提示：请在你运行前将该程序复制到你要改变位置的盘符或目录下。
echo          建议: 将该程序复制到你要改变位置的盘符根下运行
echo  ═══════════════════════════════════════

Set Choice=
Set /P Choice=　　　　    请选择要进行的操作 (1/2/3/Q) ，然后按回车：
If %Choice%Choice==Choice Goto :Start
If Not '%Choice%'=='' SET Choice=%Choice:~0,1%
If /I '%Choice%'=='1' GOTO :MyPersonal
If /I '%Choice%'=='2' GOTO :MyFavorites
If /I '%Choice%'=='2' GOTO :MyIeCache
If /I '%Choice%'=='Q' EXIT
Goto :Start

:MyPersonal
mkdir %mypath%\我的文档
reg add "HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\User Shell Folders" /v "Personal" /t reg_expand_sz /d "%mypath%我的文档" /f>nul
reg add "HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\User Shell Folders" /v "My Pictures" /t reg_expand_sz /d "%mypath%我的文档\Pictures" /f>nul
reg add "HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\User Shell Folders" /v "My Music" /t reg_expand_sz /d "%mypath%我的文档\Music" /f>nul
reg add "HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\User Shell Folders" /v "My Video" /t reg_expand_sz /d "%mypath%我的文档\Video" /f>nul
Goto :SUCCESS

:MyFavorites
mkdir %mypath%IE收藏夹\Favorites
reg add "HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\User Shell Folders" /v "Favorites" /t reg_expand_sz /d "%mypath%IE收藏夹\Favorites" /f>nul
Goto :SUCCESS

:MyIeCache
mkdir %mypath%IECache\Temporary Internet Files
reg add "HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\User Shell Folders" /v "Cache" /t reg_expand_sz /d "%mypath%IECache\Temporary Internet Files" /f>nul
Goto :SUCCESS

:SUCCESS
Title %Prog%_OK
set RESDEST=
cls
echo  ═══════════════════════════════════════
Echo.
Echo.
echo                      提示: 已完成您选定的操作
echo.
Echo                         重新启动机器后生效。。。
echo.
echo  ═══════════════════════════════════════
set /P RESDEST=       (    [重新开始请按 0 ]    [按任意键退出] )
echo.
if /I "%RESDEST%" == "0" goto :Start
Exit

[ 本帖最后由打狗协会理事于 2007-10-31 01:14 PM 编辑 ]

改变我的文档-收藏夹-IECache位置.rar

1.11 KB, 下载次数: 295, 下载积分: 无忧币 -2

作者: aionegirl 时间: 2007-11-2 01:47
哦还是那个注册表...

作者: littletalent 时间: 2007-11-2 02:33
呵呵...
这个批文件虽然不是太难..
呵呵...
难的有心..
批文件确是方便...
谢谢分享

作者: CMD 时间: 2007-11-10 09:19
呵，呵，，，很多的 Ghost光盘，都有这个工具，我自己也曾整理了一份批处理，谢谢楼主能够拿出一共享……

作者: livejunjie 时间: 2011-11-15 11:24
标题: 呵呵
谢谢，这个对我很有用
有些GHOST系统的我的文档都设在C盘，很麻烦正着这样的工具呢，没想到LZ有这么好的一个批处理，谢啦！

作者: crackman 时间: 2011-12-2 16:35
兼容Windows7吗？

作者: 2011SHENGAI 时间: 2011-12-4 12:05
很实用的说，下载收藏备用！

欢迎光临无忧启动论坛 (http://wuyou.net/)