灯火互联
管理员
管理员
  • 注册日期2011-07-27
  • 发帖数41778
  • QQ
  • 火币41290枚
  • 粉丝1086
  • 关注100
  • 终身成就奖
  • 最爱沙发
  • 忠实会员
  • 灌水天才奖
  • 贴图大师奖
  • 原创先锋奖
  • 特殊贡献奖
  • 宣传大使奖
  • 优秀斑竹奖
  • 社区明星
阅读:1671回复:0

CHM 文档解包批处理代码

楼主#
更多 发布于:2013-06-02 16:41
这两天遇到需要修改CHM文档,上网搜了一大堆的CHM解包和修改软件,发现很多软件还得注册,我晕想了想,似乎Windows中有个自带的命令HH可以用得上,就顺手写了这个批处理

 
HH的脾气是目标文件夹路径不支持带空格或引号,所以变复杂了点,否则一行命令足矣
其他的代码没啥难度,重在实用

批处理代码如下:
复制代码 代码如下:

::主命令格式如下
::hh -decompile 目标文件夹 CHM源文件名
::目标文件夹及文件名均不能加引号,目标文件夹不能含空格
@echo off & setlocal enabledelayedexpansion
title CHM 文档解包批处理 By SunTB
if exist "%~dpnx1" (
set file=%~dpnx1
set file_pth=%~dp1
set file_pth=!file_pth:~0,-1!
set file_name=%~nx1
) else (
echo.&echo 请输入 CHM 文件完整路径:
echo.&set /p file=
set file=!file:"=!
call :pthquery
)
if /i not "!file:~-4!"==".chm" (echo.&echo 该文件类型名不是 .CHM ,按任意键退出&pause>nul&exit)
set save_pth=!file_name: =!
cd /d "!file_pth!"
hh -decompile !save_pth:~0,-4!_CHM !file_name!
start "" "!file_pth!\!save_pth:~0,-4!_CHM"
exit
::提取手工输入路径中的文件夹路径及文件名
:pthquery
set /a pthx+=1
if "!file:~-%pthx%,1!"=="\" (
set file_pth=!file:~0,-%pthx%!
set file_name=!file:~-%pthx%!
set file_name=!file_name:~1!
goto :eof
)
goto :pthquery

喜欢0 评分0
游客

返回顶部