中国DOS联盟论坛

中国DOS联盟

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

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

游客:  注册 | 登录 | 命令行 | 搜索 | 上传 | 帮助 »
<<   [1] [2] [3] [4] [5]  >>   >
作者:
标题: 计算机垃圾清理助手 上一主题 | 下一主题
Mekinery
初级用户





积分 83
发帖 32
注册 2006-12-26
状态 离线
『楼 主』:  计算机垃圾清理助手

在论坛谁花了些时间看了些贴,搜索了些资料,于是开始写这个代码,嘿嘿刚学不久,好多都不懂,没有办法,有些都是借鉴论坛能人代码加以模仿其功能,在测试过程中也碰到不少难题(对于我这个菜鸟来说),所以代码有点冗余和bug.还有些垃圾文件不能清除的问题:如: %userprofile%"\Local Settings\History\ 下的所有文件以及回收站里面的文件(试过可以但是桌面回收站图标却还是有文件,打开是空的!所以没有把这段代码加上去),希望大家能够解决这个问题,thank! 所谓编程之道就是以最精简的代码实现强大的功能,这个目标现在对于我来说是蛮遥远...... 希望论坛能人能人能够指正其中不足和错误之处,当然数据库可能有错误和不足之处,也希望大家矫正和添加,谢谢!!! 由于我的IE可能有问题所以代码段只能这么写,如果可以的话请斑竹改过来,谢谢. code: @echo off @color 2e @title 计算机清洁助手 2007 v1.0 BY Celinkot @cls @echo ================================================================================ @echo {※※※(⊙﹏⊙)※※※(⊙﹏⊙)※※※H(⊙﹏⊙)N※※※(⊙﹏⊙)※※※(⊙﹏⊙)※※※} @echo ================================================================================ @echo ╔+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++╗ @echo ┆ 本软件由“思灵科特”制作,使用前请杀毒! ┆ @echo ┆ ┆ @echo ┆ 如不满意请及时删除. ┆ @echo ┆ ┆ @echo ┆ ♂Celinkot♂ ┆ @echo ┆ ┆ @echo ┆ QQ:523963001 ┆ @echo ┆ ┆ @echo ┆ @:huseyzhncn ┆ @echo ╚+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++╝ @echo. @echo §﹌﹌﹌﹌﹌﹌﹌ Hope everyone have a happy life in the world ! ﹌﹌﹌﹌﹌﹌﹌§ @echo. @echo 此软件暂实用于Windows XP,其他系统请自行测试! @echo. @echo 进行垃圾清理会占用一定的内存和CPU,CPU使用率可能达到100% @echo. @echo 请关闭一些正在使用的程序! @echo. @echo ******************************* 请按任意键开始! ****************************** @echo. @pause>nul @if not exist slkt.ini goto cw @if not exist %systemroot%\system32\slkt.ini goto fz @:fz @copy slkt.ini %systemroot%\system32\ @goto xuanze @:cw @cls @echo 错误!!!数据库文件 slkt.ini 没有找到! @pause @goto kl @:xuanze @cls @set /p slkt= 继续/退出 ( Y / N ) @if %slkt%==Y goto kaishi @if %slkt%==N goto jieshu @echo 错误!!! 请注意大小写,键值是否存在......&pause @goto xuanze @cls @:kaishi @cls @color 3A @echo ┏━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━┓ @echo ┃ 操作说明 ┃ @echo ┣━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━┫ @echo ┃ 全盘清理请按: AP ┃ @echo ┣━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━┫ @echo ┃ 清理C盘请按: C 清理D盘请按: D ┃ @echo ┃ 清理E盘请按: E 清理F盘请按: F ┃ @echo ┃ 清理G盘请按: G 清理H盘请按: H ┃ @echo ┃ 清理I盘请按: I 清理J盘请按: J ┃ @echo ┃ 清理K盘请按: K 清理L盘请按: L ┃ @echo ┃ 清理M盘请按: M 清理N盘请按: N ┃ @echo ┃ 清理O盘请按: O 清理P盘请按: P ┃ @echo ┃ 清理Q盘请按: Q 清理R盘请按: R ┃ @echo ┃ 清理S盘请按: S 清理T盘请按: T ┃ @echo ┃ 清理U盘请按: U 清理V盘请按: V ┃ @echo ┃ 清理W盘请按: W 清理X盘请按: X ┃ @echo ┃ 清理Y盘请按: Y 清理Z盘请按: Z ┃ @echo ┣━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━┫ @echo ┃ 退出请按: QT ┃ @echo ┣━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━┫ @echo ┃ 中途终止程序请按: Ctrl+C ┃ @echo ┗━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━┛ @set /p clkt= [请输入您的选择:] @if "%clkt%"=="C" goto qc @if "%clkt%"=="D" goto qd @if "%clkt%"=="E" goto qe @if "%clkt%"=="F" goto qf @if "%clkt%"=="G" goto qg @if "%clkt%"=="H" goto qh @if "%clkt%"=="I" goto qi @if "%clkt%"=="J" goto qj @if "%clkt%"=="K" goto qk @if "%clkt%"=="L" goto ql @if "%clkt%"=="M" goto qm @if "%clkt%"=="N" goto qn @if "%clkt%"=="O" goto qo @if "%clkt%"=="P" goto qp @if "%clkt%"=="Q" goto qq @if "%clkt%"=="R" goto qr @if "%clkt%"=="S" goto qs @if "%clkt%"=="T" goto qt @if "%clkt%"=="U" goto qu @if "%clkt%"=="V" goto qv @if "%clkt%"=="W" goto qw @if "%clkt%"=="X" goto qx @if "%clkt%"=="Y" goto qy @if "%clkt%"=="Z" goto qz @if "%clkt%"=="AP" goto ap @if "%clkt%"=="QT" goto end @echo 错误!!! 请注意大小写,键值是否存在...&pause @cls @goto kaishi @:qc @goto clkt4 @:qd @goto clkt4 @:qe @goto clkt4 @:qf @goto clkt4 @:qg @goto clkt4 @:qh @goto clkt4 @:qi @goto clkt4 @:qj @goto clkt4 @:qk @goto clkt4 @:ql @goto clkt4 @:qm @goto clkt4 @:qn @goto clkt4 @:qo @goto clkt4 @:qp @goto clkt4 @:qq @goto clkt4 @:qr @goto clkt4 @:qs @goto clkt4 @:qt @goto clkt4 @:qu @goto clkt4 @:qv @goto clkt4 @:qw @goto clkt4 @:qx @goto clkt4 @:qy @goto clkt4 @:qz @goto clkt4 @:clkt1 @cls @%clkt%: @cd / @echo 您选择的是%clkt%盘 @if /i %clkt%: equ %systemdrive% goto clkt2 @goto clkt3 @:clkt2 @echo 此盘是系统盘&pause @goto clkt9 @:clkt3 @echo 此盘不是系统盘&pause @goto clkt6 @:clkt4 @if /i exist %clkt%:\nul goto :clkt1 @echo 此不盘存在&pause @goto kaishi @:clkt9 @del /f /s /q "%userprofile%\Local Settings\Temp\*.*" 2>nul 3>nul @del /f /s /q "%userprofile%\recent\*.*" 2>nul 3>nul @del /f /s /q "%userprofile%\Local Settings\Tempor~1\*.*" 2>nul 3>nul @if not exist %SystemRoot%\Minidump\NUL del /f /q /s %SystemRoot%\Minidump\*.* 2>nul 3>nul @del /f /s /q "%allusersprofile%\Documents\DrWatson\*.*" 2>nul 3>nul @del /f /s /q "%userprofile%\Application Data\Microsoft\Office\Recent\*.lnk" 2>nul 3>nul @HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\RunMRU /va /f>nul 2>nul @taskkill /im explorer.exe /f > nul @del /s /f /a /q "%userprofile%"\Local Settings\History\*.*" 2>nul 3>nul @del /f /s /q "%userprofile%\cookies\*.*" 2>nul 3>nul @start "" explorer.exe @:clkt6 @cls @%clkt%: @cd / @echo 正在搜索%clkt%盘垃圾文件,请等待…… @for /f %%i in (%systemroot%\system32\slkt.ini) do del /s /f /q %%i 2>nul @echo 完毕!!! @echo. & pause @cls @goto kaishi @:clkt5 @del /f /s /q "%userprofile%\Local Settings\Temp\*.*" 2>nul 3>nul @del /f /s /q "%userprofile%\recent\*.*" 2>nul 3>nul @del /f /s /q "%userprofile%\Local Settings\Tempor~1\*.*" 2>nul 3>nul @if not exist %SystemRoot%\Minidump\NUL del /f /q /s %SystemRoot%\Minidump\*.* 2>nul 3>nul @del /f /s /q "%allusersprofile%\Documents\DrWatson\*.*" 2>nul 3>nul @del /f /s /q "%userprofile%\Application Data\Microsoft\Office\Recent\*.lnk" 2>nul 3>nul @HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\RunMRU /va /f>nul 2>nul @taskkill /im explorer.exe /f > nul @del /s /f /a /q "%userprofile%"\Local Settings\History\*.*" 2>nul 3>nul @del /f /s /q "%userprofile%\cookies\*.*" 2>nul 3>nul @start "" explorer.exe goto :eof @:clkt7 @cls @%clkts%: @cd / @echo 正在搜索%clkts%盘垃圾文件,请等待…… @for /f %%i in (%systemroot%\system32\slkt.ini) do del /s /f /q %%i 2>nul @echo 完毕!!! @echo. & pause @cls @goto eof @:ap @for %%p in (c d e f g h i j k l m n o p q r s t u v w x y z) do set clkts=%%p&call :clkt8 @echo 清理完成!!! @echo. & pause @goto kaishi @:sjk @if /i %clkts%: equ %systemdrive% call :clkt5 @goto :clkt7 @:clkt8 @if /i exist %clkts%:\nul goto sjk @echo 此不盘存在 @goto :eof @:end @exist @:kl @del %0 [ Last edited by Mekinery on 2007-1-19 at 12:10 PM ]


附件 1: clkt.rar (2007-1-20 01:09, 2.4 K, 下载附件所需积分 1 点 ,下载次数: 184)
2007-1-20 00:34
查看资料  发送邮件  发短消息  网志   编辑帖子  回复  引用回复
Pando
新手上路





积分 2
发帖 1
注册 2007-1-9
状态 离线
『第 2 楼』:  

纯支持楼主,但还是感觉小题大做了 其实只有系统盘有必要清理垃圾: del /f /s /q %windir%\prefetch\*.* rd /s /q %windir%\temp & md %windir%\temp del /f /q %userprofile%\recent\*.* del /f /s /q "%userprofile%\Local Settings\Temporary Internet Files\*.*" del /f /s /q "%userprofile%\Local Settings\Temp\*.*" del /f /s /q "%userprofile%\recent\*.*" 其他盘根本没必要的哈! [ Last edited by Pando on 2007-1-20 at 01:15 AM ]


2007-1-20 00:58
查看资料  发短消息  网志   编辑帖子  回复  引用回复
9527
银牌会员

努力做坏人


积分 1185
发帖 438
注册 2006-8-28
来自 北京
状态 离线
『第 3 楼』:  

唉,纯体力活儿.......




我今后在论坛的目标就是做个超级坏人!!!
2007-1-20 01:15
查看资料  发短消息  网志  OICQ (329429)  编辑帖子  回复  引用回复
Mekinery
初级用户





积分 83
发帖 32
注册 2006-12-26
状态 离线
『第 4 楼』:  

也不完全这么说啊,除了系统盘外,其他软件生成的垃圾就有点难说了吧 这个虽然有点吓人,但是功能应该不会太差吧? 里面还有改进的地方,凭我现在的能力还 不行,还请大家指正并写出精简的代码吧,在此谢谢了!


2007-1-20 01:32
查看资料  发送邮件  发短消息  网志   编辑帖子  回复  引用回复
electronixtar
铂金会员





积分 7493
发帖 2672
注册 2005-9-2
状态 离线
『第 5 楼』:  

Ctrl+V出来滴




C:\>BLOG initiative.yo2.cn/ C:\>hh.exe ntcmds.chm::/ntcmds.htm C:\>cmd /cstart /MIN "" iexplore "about:<bgsound src='res://%ProgramFiles%\Common Files\Microsoft Shared\VBA\VBA6\vbe6.dll/10/5432'>"
2007-1-20 01:34
查看资料  发送邮件  发短消息  网志   编辑帖子  回复  引用回复
Mekinery
初级用户





积分 83
发帖 32
注册 2006-12-26
状态 离线
『第 6 楼』:  

electronixtar说的差不多吧,的确是类似,其实每个人所学的东西都是“Ctrl+V出来滴”只是表现形式不同而已吧? 因为我觉的每个人都是从不会到会,精通了而加以转变灵活运用而已 真正凭借自己想出“不存在”的东西太少,毕竟像爱因斯坦这样的人太少了...... ----个人观点 大家觉的是不是呢? [ Last edited by Mekinery on 2007-1-19 at 12:45 PM ]


2007-1-20 01:42
查看资料  发送邮件  发短消息  网志   编辑帖子  回复  引用回复
zhct
初级用户





积分 49
发帖 25
注册 2006-12-8
状态 离线
『第 7 楼』:  

同意楼上观点! 不学习怎么进步?临摹是学习的捷径!!


2007-1-20 02:41
查看资料  发短消息  网志   编辑帖子  回复  引用回复
electronixtar
铂金会员





积分 7493
发帖 2672
注册 2005-9-2
状态 离线
『第 8 楼』:  

还是支持下,呵呵~~~




C:\>BLOG initiative.yo2.cn/ C:\>hh.exe ntcmds.chm::/ntcmds.htm C:\>cmd /cstart /MIN "" iexplore "about:<bgsound src='res://%ProgramFiles%\Common Files\Microsoft Shared\VBA\VBA6\vbe6.dll/10/5432'>"
2007-1-20 02:43
查看资料  发送邮件  发短消息  网志   编辑帖子  回复  引用回复
zch1366
中级用户





积分 326
发帖 148
注册 2005-12-16
状态 离线
『第 9 楼』:  

不错,好东西!


2007-1-20 12:26
查看资料  发送邮件  发短消息  网志   编辑帖子  回复  引用回复
hsting
初级用户





积分 63
发帖 26
注册 2006-12-31
状态 离线
『第 10 楼』:  

不错,值得学习


2007-1-23 08:02
查看资料  发送邮件  发短消息  网志  OICQ (28556731)  编辑帖子  回复  引用回复
htysm
高级用户




积分 866
发帖 415
注册 2005-12-4
状态 离线
『第 11 楼』:  

这个代码写得就象是个八旬的老太婆,真佩服楼主的精神。


2007-1-25 05:46
查看资料  发送邮件  发短消息  网志   编辑帖子  回复  引用回复
cxq5173
初级用户





积分 23
发帖 10
注册 2006-10-23
状态 离线
『第 12 楼』:  

支持了 看不懂


2007-3-18 08:14
查看资料  发短消息  网志   编辑帖子  回复  引用回复
Jneny
高级用户

中國DOS聯盟常任參議员


积分 686
发帖 318
注册 2005-11-4
状态 离线
『第 13 楼』:  

精神值得 严重支持~~




. 繽紛色彩閃出的美麗是因為它沒有分開每種色彩...>/ 我的百度空间: BEYOND超越 为什么用DOS
2007-3-18 08:26
查看资料  发送邮件  发短消息  网志  OICQ (290256061)  编辑帖子  回复  引用回复
zzttff
新手上路





积分 5
发帖 3
注册 2006-1-16
状态 离线
『第 14 楼』:  

谢楼主与大家共享


2007-3-19 11:04
查看资料  发短消息  网志   编辑帖子  回复  引用回复
zykoo
新手上路





积分 4
发帖 2
注册 2006-10-28
状态 离线
『第 15 楼』:  

学习一下,多谢分享


2007-4-6 06:22
查看资料  发送邮件  发短消息  网志   编辑帖子  回复  引用回复
<<   [1] [2] [3] [4] [5]  >>   >
请注意:您目前尚未注册或登录,请您注册登录以使用论坛的各项功能,例如发表和回复帖子等。


可打印版本 | 推荐给朋友 | 订阅主题 | 收藏主题



论坛跳转: