无忧启动论坛

标题: 用windoews自带压缩工具压缩文件夹 [打印本页]
作者: batche    时间: 2023-6-28 21:39
标题: 用windoews自带压缩工具压缩文件夹
本帖最后由 batche 于 2023-6-29 04:09 编辑

windows有自带的makecab压缩命令，但压缩文件夹要有list列表文件，我写了个脚本指定文件夹可以自动生成列表文件并压缩：
  1. @echo off
  2. set "d=123"
  3. setlocal enabledelayedexpansion
  4. cd /d "%~dp0"
  5. >>"%~dp0L.list" echo .set DestinationDir=%d%
  6. for /f "delims=" %%i in ('dir /b /a-d "%d%" 2^>nul') do >>"%~dp0L.list" echo "%d%\%%~nxi"
  7. for /f "delims=" %%d in ('dir /b /s /ad "%d%" 2^>nul') do (
  8.     set "str=%%d"
  9.     set "str=!str:%~dp0=!"
  10.     >>"%~dp0L.list" echo .set DestinationDir=!str!
  11.     for /f "delims=" %%f in ('dir /b /a-d "%%d" 2^>nul') do >>"%~dp0L.list" echo "!str!\%%~nxf"
  12.         )
  13. makecab /f L.list /d CabinetNameTemplate="..\%d%.cab"
  14. rd /s /q disk1
  15. del /a /f /q setup.inf;setup.rpt;L.list
  16. endlocal
  17. pause
复制代码


除了用makecab，windows的explorer shell还自带zipped，也就是右键发送到中的zipped，explorer shell可以压缩和解压zip压缩包，单个文件夹还好，多个文件夹就要自动化操作了，命令行的方式批量压缩文件夹：

  1. '&(for /f "delims=" %%i in ('dir /b /ad') do cscript //nologo //e:vbscript "%~f0" "%%~fi.zip" "%%~fi")&pause&exit
  2. Set objShell = CreateObject("Shell.Application")
  3. Set objFSO = CreateObject("Scripting.FileSystemObject")
  4. objFSO.CreateTextFile(WScript.Arguments(0)).Write "PK" & Chr(5) & Chr(6) & String(18, vbNullChar)
  5. objFSO.GetFile(WScript.Arguments(0)).Attributes = objFSO.GetFile(WScript.Arguments(0)).Attributes + 32
  6. objShell.Namespace(WScript.Arguments(0)).CopyHere objShell.Namespace(WScript.Arguments(1))
  7. '异步操作，需要等待
  8. WScript.Sleep 1000
复制代码
补充一下来源：blog.csdn.net/D_R_L_T/article/details/100584748

  1. powershell -c "Add-Type -A System.IO.Compression.FileSystem;dir -literal '%~dp0'|?{$_ -is [System.IO.DirectoryInfo]}|%%{[System.IO.Compression.ZipFile]::CreateFromDirectory($_.FullName, $_.FullName + '.zip')}"
  2. pause&exit
复制代码


作者: 窄口牛    时间: 2023-6-28 21:57
厉害了word哥，新的zip不是支持7z了吗，是appx还是exe？
作者: yyz2191958    时间: 2023-6-28 22:00
感谢分享
作者: fengkissping    时间: 2023-6-28 23:07
感谢楼主 分享
作者: yfx0310    时间: 2023-6-28 23:27
来向大神学习，学习使我快乐
作者: fzp070    时间: 2023-6-29 00:04
谢谢楼主原创分享
作者: seeimpact153    时间: 2023-6-29 00:48
谢谢楼主
作者: chishingchan    时间: 2023-6-29 01:20
收集来的就要说明白！还说什么“我写了个。。。”
作者: ldshun    时间: 2023-6-29 02:38
谢楼主 分享
作者: batche    时间: 2023-6-29 03:51
chishingchan 发表于 2023-6-29 01:20
收集来的就要说明白！还说什么“我写了个。。。”

何以见得？
作者: batche    时间: 2023-6-29 04:11
窄口牛 发表于 2023-6-28 21:57
厉害了word哥，新的zip不是支持7z了吗，是appx还是exe？

是explorer的shell command
作者: 5962903    时间: 2023-6-29 06:05

感谢分享
作者: keithkong    时间: 2023-6-29 08:21
太复杂了还是装个软件快捷
作者: 15139276789    时间: 2023-6-29 08:40
谢谢分享                 
作者: 9527sss    时间: 2023-6-29 09:29
#在这里快速回感谢分享复#
作者: szwp    时间: 2023-6-29 10:13
新系统有自带的tar命令
作者: youlin    时间: 2023-6-29 10:22
太麻烦，直接360压缩
作者: 1801403    时间: 2023-6-29 11:39
谢谢分享
作者: chishingchan    时间: 2023-6-29 11:47
batche 发表于 2023-6-29 03:51
何以见得？


作者: 旁观者清    时间: 2023-6-29 11:58
谢谢分享。
作者: batche    时间: 2023-6-29 12:01
chishingchan 发表于 2023-6-29 11:47

你能看出这两者有哪些区别吗？
作者: 创新科技2015    时间: 2023-6-29 13:06

谢谢楼主原创分享
作者: yc2428    时间: 2023-6-29 15:40
感谢分享
作者: mzp9125    时间: 2023-6-29 16:02
学习了，感谢分享
作者: fegr    时间: 2023-6-29 16:34
谢谢分享
作者: JayeDieyan    时间: 2023-6-29 17:14
谢谢分享
作者: mzp9125    时间: 2023-7-13 15:27
学习，感谢分享
作者: wzpwr    时间: 2023-7-17 09:30
感谢楼主 分享
作者: Fastwingo    时间: 2023-8-21 23:02
感谢分享
作者: OCA    时间: 2023-8-28 14:20
脚本运行压缩吗？666
作者: 2010yuhongxi    时间: 2023-9-4 16:19
谢谢分享
作者: LHChang    时间: 2023-9-5 10:39

谢谢分享。
作者: reuk    时间: 2023-9-7 23:08
学习了啊
作者: 无犹启动    时间: 2023-9-12 11:01
新的zip不是支持7z了吗，是appx还是exe？
作者: szwp    时间: 2023-9-12 11:36
windoews改一下比较好
作者: yyz2191958    时间: 2023-9-16 19:19
不需要也支持
作者: 327096174    时间: 2023-9-24 15:25
感谢分享
作者: 327096174    时间: 2023-9-24 15:25
感谢分享1



欢迎光临 无忧启动论坛 (http://wuyou.net/) Powered by Discuz! X3.3