中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --

联盟域名：www.cn-dos.net 论坛域名：www.cn-dos.net/forum
DOS，代表着自由开放与发展，我们努力起来，学习FreeDOS和Linux的自由开放与GNU精神，共同创造和发展美好的自由与GNU GPL世界吧！

中国DOS联盟论坛 » DOS批处理 & 脚本技术（批处理室） » 使伪装文件夹不易被删除的批处理

369d
新手上路

积分 8
发帖 3
注册 2007-4-18
状态离线

『楼主』: 使伪装文件夹不易被删除的批处理

首先声明我是在scriptman兄的基础上修改的
scriptman的帖子在http://www.cn-dos.net/forum/view ... 7144&sid=WPpjgQ
看了scriptman兄的帖子后觉得很实用，但是伪装后文件夹可以被删除，万一哪个菜鸟打不开文件夹时又被他删除了就麻烦大了，所以就在批处理的基础上改进了下，如下

@echo off
mode con:cols=90 lines=3
title 进入解除伪装程式
echo 请输入要解除伪装文件夹的绝对路径
echo 输入后按回车键(若还没有需解除伪装的文件夹，则回车进入伪装程式）
set b=
set /p b=
del %b%\desktop.ini
attrib -s -h -r %b%
attrib %b%\a -s -h -r
echo y|rd /s \\.\%b%\a\pig~1
echo y|rd /s %b%\a
@echo off
@echo [.ShellClassInfo]>%temp%\desktop.ini
mode con:cols=90 lines=3
title 进入伪装程式
echo 请选择伪装文件夹的样式（若不需要伪装则回车退出）:
echo 回收站[A] 拨号网络[B] 打印机[C] 控制面板[D] 网上邻居[E] 我的电脑[F] 计划任务[G] ] 字体[H]
set z=
set /p z=
goto %z%
:start
title 进入伪装程式
echo 请输入要伪装文件夹的绝对路径
echo 输入后按回车键
set a=
set /p a=
copy %temp%\desktop.ini %a%
attrib +s +h +r %a%
md %a%\a %a%\a\pig..\
attrib %a%\a +s +h +r
exit
:A
rem 回收站
@echo CLSID={645FF040-5081-101B-9F08-00AA002F954E}>>%temp%\desktop.ini
goto :start
:B
rem 拨号网络
@echo CLSID={992CFFA0-F557-101A-88EC-00DD010CCC48}>>%temp%\desktop.ini
goto :start
:C
rem 打印机
@echo CLSID={2227a280-3aea-1069-a2de-08002b30309d}>>%temp%\desktop.ini
goto :start
:D
rem 控制面板
@echo CLSID={21ec2020-3aea-1069-a2dd-08002b30309d}>>%temp%\desktop.ini
goto :start
:E
rem 网上邻居
@echo CLSID={208D2C60-3AEA-1069-A2D7-08002B30309D}>>%temp%\desktop.ini
goto :start
:F
rem 我的电脑
@echo CLSID={20D04FE0-3AEA-1069-A2D8-08002B30309D}>>%temp%\desktop.ini
goto :start
:G
rem 计划任务
@echo CLSID={D6277990-4C6A-11CF-8D87-00AA0060F5BF}>>%temp%\desktop.ini
goto :start
:I
rem 我的文档
@echo CLSID={450D8FBA-AD25-11D0-98A8-0800361B1103}>>%temp%\desktop.ini
goto :start
:J
rem URL历史
@echo CLSID={FF393560-C2A7-11CF-BFF4-444553540000}>>%temp%\desktop.ini
goto :start
:H
rem 字体
@echo CLSID={BD84B380-8CA2-1069-AB1D-08000948F534}>>%temp%\desktop.ini
goto :start

第一次发帖，不当之处恳求批评

2007-6-29 00:40