用批处理批量压缩文件

用批处理批量压缩文件
用批处理批量压缩文件

文章转自： 忆林子

2007年10月31日 星期三 下午 09:00
这个代码的功能是把和这个批处理放在同一目录下的所有目录压缩。
大家把它复制下来，另存为bat
如果有不明白的话，可以在这里留言。

@echo off
title 忆林子--批量压缩rar文件
color 0a
rem *********************************************************
rem 在注册表中读取winrar的安装目录
rem 如果已经存在临时文件，把它删除
if EXIST tmp.忆林子 del tmp.忆林子
rem 查询注册表中的winrar的路径值,并把它发送到临时文件中
reg query "HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\App Paths\WinRAR.exe" /v path>>tmp.忆林子
rem 用For命令从临时文件中读取winrar的路径值,并把它保存到变量 WinRAR　中
for /f "tokens=1,2,* skip=4 delims= " %%j in ('more tmp.忆林子') do set WinRAR=%%l
rem 如果已经存在临时文件，把它删除
if EXIST tmp.忆林子 del tmp.忆林子
rem ********************************************************* rem 用dir命令列出当前目录下的所有目录
rem 并把它发送到for循环中,然后在for循环中调用压缩的子过程
for /f "delims=" %%i in ('dir /ad /b') do call :ss %%i
cls
echo ▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓
echo.
echo 操作成功结束，请按任意键退出该批处理...
echo.
echo ▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓▓
PAUSE>nul
exit
:ss
set var=%*
rem 即　rar a -r 压缩后的文件名.rar 目录名
"%WinRAR%\rar" a -r %var%.rar %var%
EndLocal


Powered by 无名小鬼 https://www.doczj.com/doc/7c1628578.html,