一个140k的7Z独立命令行程序

hht168 · 发表于 2013-6-9 08:38:04

本帖最后由 hht168 于 2013-6-22 11:14 编辑

很多PE内核都内置了7Z命令行工具，总共几个文件约1M多，不但和外置的7z程序有点重复，而且似乎有点大了！现在有更好的选择了！用一个7Z.exe文件加入PE内核即可！附件文件解开后
140K（原文件300多K，压缩后140K），实为7Z程序独立命令行版（即7zr.exe）,版本9.20。感兴趣的试试看。

7z.zip (138.9 KB, 下载次数: 129)

超级坏蛋 · 发表于 2013-6-21 20:19:30

7zl.exe 仅支持 lzma 算法的 7z 压缩文件
7zr.exe 仅支持所有算法以及加密的 7z 格式
7za.exe 支持 7-Zip 的所有格式。

超级坏蛋 · 发表于 2013-6-21 19:58:37

7zr:
http://nchc.dl.sourceforge.net/project/sevenzip/7-Zip/9.20/7z920_extra.7z

7za:
http://nchc.dl.sourceforge.net/project/sevenzip/7-Zip/9.20/7za920.zip

超级坏蛋 · 发表于 2013-6-21 19:56:16

这个应该不是7za.exe而是7zr.exe

hht168 · 发表于 2013-6-15 15:28:43

压缩后变小了！可重新下载。

pseudo · 发表于 2013-6-12 23:01:10

嗯，一直内置7za.exe。

527104427 · 发表于 2013-6-9 13:41:02

我用PECMD整了一个7Z解压工具，挺有意思的，支持RAR。源码：

#!PECMD
FIND $%1=**pecmd,
{
MSTR &&cmd=<2->%*
%&cmd%
EXIT FILE
}
FIND $%1=--cmd,
{
MSTR &&cmd=<2->%*
%&cmd%
EXIT FILE
}
FIND $"%1"="",!
{
FIND $"%1"="/s",EXIT BLOCK
LOAD %*
EXIT FILE
}
TEAM ENVI OK=0|ENVI &NAME0=|ENVI &NAMEa=
MDIR %TEMP%
{
LOCK ##LK_MKTEMP
SET &t=%TEMP%\~tmp%RANDOM%.tmp
LOOP #%OK%=0, TEAM ENVI &NAME0=%&t%| IFEX %&NAME0%,! ENVI OK=1| SET t=%TEMP%\~tmp%RANDOM%.tmp
}
FNAM -ext &NAMEa=%&NAME0%
WIN1 %*
_SUB WIN1,W450H380,7-Zip 解压程序
ENVI &&NAME1=%~1
FIND $""="%&NAME1%", ENVI &NAME1=%CurDir%\AUTO.7Z
ITEM &BUTSTART,L360T315W60H25,开始解压, TEAM CALL OnStart|,
LABE -right ,L25T260W60H25,压缩文件：,,
ITEM &BUTFILE,L380T255W40H20,…,TEAM CALl SearchFile|,
EDIT &NAME1,L86T257W280H18,%&NAME1%,,0x100
ENVI &&NAME2=%~2
FIND $""="%&NAME2%", ENVI &NAME2=%CurDir%\
LABE -right ,L25T290W60H25,解压目录：,,
ITEM &BUTDIR,L380T285W40H20,…,TEAM CALl SearchDir|,
EDIT &NAME2,L86T287W280H18,%&NAME2%,,0x100
ITEM &BUTSTOP,L25T315W60H25,强制中止,KILL *force %&NAMEa%
ENVI @&BUTSTOP.Enable=0
EDIT-| E,L25T20W410H230,\n7-Zip (A) 9.20 Copyright (c) 1999-2010 Igor Pavlov 2010-11-18\n\n制作：Jex Chan\n\nQQ：527104427,,0x44
TIME &T1,100, CALL OnTimer1
SET &bfile=0
SET &bdir=0
_END
_SUB OnTimer1
FIND %&NAMEa%,EXIT _SUB
SET bfile=0
SET bdir=0
FDIR --fullfile &&F=%&NAME1%
FDIR --fullfile &&G=%&NAME2%
IFEX %&F%, SET bfile=1 //文件或目录
IFEX %&F%\, SET bfile=0 //目录
IFEX %&G%, SET bdir=0 //文件或目录
IFEX %&G%\, SET bdir=1 //目录
FIND $""="%&NAME1", SET bfile=0
FIND $""="%&NAME2", SET bdir=0
FIND $""="%&F", SET bfile=0
FIND $""="%&G", SET bdir=0
ENVI @&BUTSTART.Enable=%&bfile%
FIND $1=%&bfile%, ENVI @&BUTSTART.Enable=%&bdir%
_END
_SUB SearchFile
ENVI &FILE1=%&NAME1%
BROW &&FILE1,%&NAME1%,请选择压缩文件
FIND $""="%&FILE1%",!ENVI @&NAME1=%&FILE1%
CALL OnTimer1
_END
_SUB SearchDir
ENVI &DIR0=%&NAME2%
BROW &&DIR0,*%&NAME2%,请选择一个目录
FIND $""="%&DIR0%",!ENVI @&NAME2=%&DIR0%
CALL OnTimer1
_END
_SUB OnStart
//TEAM EXEC* --pid:&pide 7Z_exe @E=!cmd /c dir /s/b C:\TOOLS\*.* //DEBUG
//EXIT
//IFEX "%&NAME1%" ,!TEAM MESS 找不到 "%&NAME1%" @错误| EXIT _SUB
//IFEX "%&NAME2%" ,!TEAM MESS 找不到 "%&NAME2%" @错误| EXIT _SUB
ENVI @&BUTSTART.Enable=0
ENVI @&BUTFILE.Enable=0
ENVI @&BUTDIR.Enable=0
ENVI @&BUTSTOP.Enable=1
PUTF* %&NAME0%,,#1
PUTF* %TEMP%\7z.dll,,#2
SITE %&NAME0%,+H
SITE %TEMP%\7z.dll,+H
IFEX %&NAME0%,!TEAM MESS 请以管理员身份运行！@错误#OK*3000|EXIT FILE
SET &pide=0
SET &pidc=0
TEAM EXEC* --pid:&pide 7Z_exe @E=!"%&NAME0%" x "%&NAME1%" -y -aos -o"%&NAME2%"
FILE --force "%&NAME0%"
FILE --force "%TEMP%\7z.dll"
IFEX "%&NAME0%",!!EXEC --exe:"%MyName%" --pid:&pidc PECMD **pecmd WAIT *0 100 -del "%&NAME0%"
MESS 完成解压！@提示
KILL @
_END

复制代码

527104427 · 发表于 2013-6-9 13:36:46

hxj 发表于 2013-6-9 13:24
我PE中用的也是版本9.20，怎么只有151K

估计你这个还需要7Z.DLL

hxj · 发表于 2013-6-9 13:24:44

本帖最后由 hxj 于 2013-6-9 13:26 编辑

我PE中用的也是版本9.20，怎么只有151K

7Z.rar (67.81 KB, 下载次数: 33)

hht168 · 发表于 2013-6-9 11:21:56

527104427 发表于 2013-6-9 10:53
这个支持解压rar吗？以前有个7z.exe不支持哦

不支持！再说PE二级内核文件一般打包成.7Z格式，没必要用RAR格式！

527104427 · 发表于 2013-6-9 10:53:51

这个支持解压rar吗？以前有个7z.exe不支持哦

		自动登录	找回密码
密码			注册

[分享] 一个140k的7Z独立命令行程序

点评

点评

点评