![Board logo](images/default/logo.gif)
标题: [文件操作] 大侠帮小弟写一个删除指定文件批处理 [打印本页]
作者: e612008 时间: 2008-4-10 16:54 标题: 大侠帮小弟写一个删除指定文件批处理
进入CAD文件夹,分别查到acad.fas,acad.lsp和acadapp.lsp,acad.mnl,acad.chw,lcm.fas后删除到C:\Documents and Settings\(你的用户名)\Application Data\Autodesk\AutoCAD 2004\R16.0\chs\Support\下(AutoCAD的版本不同2004和16有可能不同)搜索acad.fas,acad.lsp和acadapp.lsp,acad.mnl,acad.chw,lcm.fas后删除.
全盘搜索acad.fas,acad.lsp后删除.
这个是解决AUTOCAD2004 提示病毒的解决方法,但操作起来比较繁琐,哪位大侠可以帮小弟按照这个方法写成批处理文件,小弟先谢谢了~~~
作者: fml520 时间: 2008-4-10 17:39
- @echo off
- title 按后缀名保留删除文件 BY 拿来 QQ56059445;05/3/5
-
- color 4f
- cls
- @echo ┏┓ ┏┓ ┏┓┏┓
- @echo ┃┃ ┃┃┏━┳┳┳━┓┃┗┛┣━┳┳┓
- @echo ┃┃ ┃┗┫┃┃┃┃┻┫┗┓┏┫┃┃┃┃
- @echo ┗┛ ┗━┻━┻━┻━┛ ┗┛┗━┻━┛
- @echo.┏━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━┓
- @echo.┃ 请选择 ┃
- @echo.┃ ┃
- @echo.┃ ┃
- @echo.┃ 1.按后缀名保留文件 2.按后缀名删除文件 ┃
- @echo.┃ ┃
- @echo.┃ 拿来制作: QQ56059445;05/3/5 ┃
- @echo.┃ ┃
- @echo.┗━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━┛
- @echo.
- set /p p=请选择:
- if /i %p% == 1 goto del1
- if /i %p% == 2 goto del2
- :del1
- @echo off
- title 按后缀名保留删除文件 BY 拿来 QQ56059445;05/3/5
- color a
- cls
- @echo 本批处理最好不能和要删除的文件夹放在一起,否则,也会一起消失!
- @echo ...............................................................
- @echo 请输入要保留的文件名后缀(如;.jpg .txt .exe等)
- @echo ...............................................
- set /p wjm=请输入后缀名(如;.jpg .txt .exe等按回车):
- cls
- @echo 请输入文件夹的完整路径 或 把文件夹放到这里
- @echo ..........................................
- @echo (如;C:\ABC D:\ABC\123 E:\)
- @echo ...........................
- set /p ml=请输入完整路径 或 把文件夹放到这里按回车:
- @echo %date%%time%>删除了的文件.txt
- dir %ml% /a-d/b/s>>dir1.txt
- for /f "delims=" %%i in ('dir %ml% /a-d/b/s') do if %%~xi neq %wjm% del "%%i" /a/s/f
- dir %ml% /a-d/b/s>>dir2.txt
- find /v "%wjm%" dir1.txt >>删除了的文件.txt
- del dir?.txt /a/f/s
- CLS
- @echo 按后缀名保留文件 BY 拿来 QQ56059445;05/3/5
- @echo ............................................
- @echo 完成!完成!完成!完成!请查看 删除了的文件.txt
- @echo ............................................
- start 删除了的文件.txt
- exit
- cls
- :del2
- @echo off
- title 按后缀名删除文件 BY 拿来 QQ56059445;05/3/5
- color a
- cls
- @echo 本批处理最好不能和要删除的文件夹放在一起,否则,也会一起消失!
- @echo ...............................................................
- @echo 请输入要删除的文件名后缀(如;.jpg .txt .exe等)
- @echo ...............................................
- set /p wjm=请输入后缀名(如;.jpg .txt .exe等按回车):
- cls
- @echo 请输入文件夹的完整路径 或 把文件夹放到这里
- @echo ..........................................
- @echo (如;C:\ABC D:\ABC\123 E:\)
- @echo ...........................
- set /p ml=请输入完整路径 或 把文件夹放到这里按回车:
- @echo %date%%time%>删除了的文件.txt
- dir %ml% /a-d/b/s>>dir1.txt
- for /f "delims=" %%i in ('dir %ml% /a-d/b/s') do if %%~xi == %wjm% del "%%i" /a/s/f
- dir %ml% /a-d/b/s>>dir2.txt
- find /n "%wjm%" dir1.txt >>删除了的文件.txt
- del dir?.txt /a/f/s
- CLS
- @echo 按后缀名删除文件 BY 拿来 QQ56059445;05/3/5
- @echo ............................................
- @echo 完成!完成!完成!完成!请查看 删除了的文件.txt
- @echo ............................................
- start 删除了的文件.txt
- exit
复制代码
作者: fml520 时间: 2008-4-10 17:42
set p=:
set /p p=请输入要找的文件:
set "p=%p:"=%"
:: 上面这句为判断%source%中是否存在引号,有则剔除。
if "%p%"==":" goto cd
setlocal enabledelayedexpansion
for /f "delims=\" %%i in ('fsutil fsinfo drives^|find /v ""') do (
set var=%%i
set drive=!var:~-2!
fsutil fsinfo drivetype !drive!|find "固定">nul && (
for /f "tokens=*" %%j in ('dir /a-d /b /s !drive!\%p% 2^>nul') do (echo "%%j">>要找的文件.txt
if not "%%j"=="" del "%%j" /a/s/q&&exit)
)
)
mode con cols=55 lines=8
cls
echo ╭───────────────────╮
echo │╭─────────────────╮│
echo ││ 没找到你要找的文件,按回车结束 . ││
echo │╰─────────────────╯│
echo ╰───────────────────╯
pause>nul
作者: 随风 时间: 2008-4-10 18:17
(AutoCAD的版本不同2004和16有可能不同)
是什么意识?
欢迎光临 批处理之家 (http://bbs.bathome.net/) |
Powered by Discuz! 7.2 |