,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,

月光海洋 · 发表于 2013-3-24 10:55:15

收下了..感谢分享。。。。

svke · 发表于 2013-3-24 11:52:59

好东西下载先,谢谢楼主

2013FI · 发表于 2013-3-24 12:02:57

谢谢楼主看看去

benmaohll · 发表于 2013-3-24 16:45:24

真的方便了很多，谢谢老大

2011plunderer · 发表于 2013-3-25 08:13:27

好像不错的样子, 下载来玩玩看

fyq · 发表于 2013-3-25 12:36:15

是不是好用
看看看

sm7810226 · 发表于 2013-3-25 13:02:44

看看吧，能用不

20101017276839 · 发表于 2013-3-25 16:07:09

看看是什么东西，我还没用过CAB的压缩包呢？

2013bluelhq · 发表于 2013-3-25 20:56:44

楼主的帖子不错，受益啦!

shaog · 发表于 2013-4-4 12:08:36

谢谢楼主！！支持一下

2012doberman · 发表于 2013-4-4 13:20:35

好东西啊，支持一下。

lp010437 · 发表于 2013-4-4 13:53:49

看看是不是效果明显？

MarilynManSon · 发表于 2013-4-4 19:47:07

好东西啊，支持一下。

dzy · 发表于 2013-4-5 12:33:59

windows自带的挺不错

jie_china · 发表于 2013-4-5 13:17:46

好东西啊，支持一下。

mrvampire · 发表于 2013-4-5 13:24:47

感谢分享，希望好用。。

su6410 · 发表于 2013-4-5 16:17:53

谢谢提供下载

LOVPE · 发表于 2013-4-5 17:27:16

楼主辛苦，谢谢你带来好成果。

singel · 发表于 2013-4-6 23:29:27

又更新啦，多谢楼主分享

527104427 · 发表于 2013-4-9 14:15:49

更新更新``````````````````

lp010437 · 发表于 2013-4-9 14:29:30

527104427 发表于 2013-4-9 14:15
更新更新``````````````````

都更新什么地方了，也没个说明。

singel · 发表于 2013-4-9 21:34:24

有感叹号的文件（夹）出错！

23070205 · 发表于 2013-4-9 21:40:53

下载测试下看看新版如何

527104427 · 发表于 2013-4-9 23:49:25

singel 发表于 2013-4-9 21:34
有感叹号的文件（夹）出错！

这个我也试过，不知道怎么解决

Meizu · 发表于 2013-4-10 00:46:35

明天下载来测试下改进的如何

kingshui · 发表于 2013-4-18 00:13:37

本帖最后由 kingshui 于 2013-4-18 00:16 编辑

感谢楼主的代码,我在自己写的firefox启动器里的打包模块直接引用了你的代码,在此表示感谢,如有不喜引用请告知.附上部份源码
有兴趣的朋友可以共同探讨.

@rem CompanyName: KSSC
@rem FileDescription: Firefox Loader
@rem FileVersion: 0.0.0.29
@rem LegalCopyright: KingShui
@rem ProductName: Firefox Loader
@rem ProductVersion: 0.0.0.29
@rem 本程序由KingShui制作完成,其中打包模块引用了无忧启动论坛527104427的cab压缩模块,在此表示感谢.
@rem 如需修改发布请注明来源.
@echo off
:begin
cd /d %~dp0
setlocal enableextensions
setlocal enabledelayedexpansion
title Por54 Firefox Loader By KingShui
:init
set fpath=%~dp0
set ini=%~n0
Set fullname=%~1
Set dirpath=%~dp1
Set srcname=%~n1
if not exist !ini!.ini call :createini
for /f "delims=" %%i in ('findstr "=" "!ini!.ini"') do set %%i
set prefs=%PFDir%\prefs.js
set pstar=user_pref("
set pend=);
:package
if "%~1" NEQ "" call :packagemod
if exist Por54_Profiles.cab (
if not exist "!PFDir!" call :unpackmod
)
......此处省略......
:run
start "" "%FFPath%" -profile "%PFDir%" !params!
exit
:packagemod
Set Prestr=MAKECAB /v3 /D CompressionType=LZX /D CompressionMemory=21 /D MaxDiskSize=CDROM /D Cabinet=On /D Compress=On
if exist "%fullname%" goto is_dir
:is_file
Set Cmdstr=%Prestr% "%fullname%" "%dirpath%Por54_Profiles.CAB"
%Cmdstr%
Set Cmdstr=
shift
Set tmpstr=%1
if not %tmpstr%=="" goto packagemod
goto end
:is_dir
Set Cmdstr=%Prestr% /D FolderSizeThreshold=5000000 /D DiskDirectoryTemplate="%dirpath%." /D CabinetNameTemplate="Por54_Profiles.CAB"
Set Tempfile=mkcabtmp.tmp
If Exist "%Tempfile%" Del "%Tempfile%" >NUL
SETLOCAL ENABLEDELAYEDEXPANSION
For /f "delims=" %%i In ('dir "%fullname%" /s /b /a-d') Do (
Set subname=%%i
Set "subname=!subname:%fullname%\=!"
Echo "%%i" "!srcname!\!subname!">>%Tempfile%
)
ENDLOCAL
%Cmdstr% /F %Tempfile%
Del /F /S /Q "%Tempfile%" SETUP.INF SETUP.RPT >NUL
Set Tempfile=
Set Cmdstr=
shift
Set tmpstr=%1
if not %tmpstr%=="" goto packagemod
:end
Set tmpstr=
Set srcname=
Set dirpath=
Set fullname=
Set Prestr=
goto :eof

复制代码

kingshui · 发表于 2013-4-18 00:26:32

527104427 发表于 2013-4-9 23:49
这个我也试过，不知道怎么解决

我没仔细看过,应该要用转义符才行.

527104427 · 发表于 2013-4-18 00:34:49

kingshui 发表于 2013-4-18 00:13
感谢楼主的代码,我在自己写的firefox启动器里的打包模块直接引用了你的代码,在此表示感谢,如有不喜引用请告 ...

这代码不是我写的，逆天使是原创

银狼驰骋 · 发表于 2013-6-23 13:55:01

2013.04.09-CAB最大压缩命令中，在压缩结束后为什么没有提示：压缩完成，按任意键退出？我将此句：if "!file_num!" neq "2" (pause>nul&goto :eof) 删除后就有了按任意键退出这个提示，此句：if "!file_num!" neq "2" (pause>nul&goto :eof) 是什么意思起什么作用？

527104427 · 发表于 2013-6-23 14:15:19

银狼驰骋发表于 2013-6-23 13:55
2013.04.09-CAB最大压缩命令中，在压缩结束后为什么没有提示：压缩完成，按任意键退出？我将此句：if ...

抱歉，这是个BUG，以前调试的时候忘删了。这一句会导致发送到批量操作的时候出错。一楼已修正，请重新下载

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

[发布] ,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,

回复 #1 527104427 的帖子

点评