[原创]任意文件生成图片 - DOS批处理 & 脚本技术（批处理室） - 中国DOS联盟论坛

中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --

联盟域名：www.cn-dos.net 论坛域名：www.cn-dos.net/forum
DOS，代表着自由开放与发展，我们努力起来，学习FreeDOS和Linux的自由开放与GNU精神，共同创造和发展美好的自由与GNU GPL世界吧！

@echo off
title 文件图片生成器
if "%1"=="" (echo 把任意文件拖到该文件上即可
echo 若直接运行则把当前目录下文件都藏进图片)

echo 正在生成，请稍后。。。
rd /s/q %temp%\tmp
md %temp%\tmp
cd /d "%~dp1"
tabiripp "%1" %temp%\tmp >nul 2>nul
for /f "tokens=2* skip=4" %%i in ('reg query "hklm\software\microsoft\windows\currentversion\app paths\winrar.exe" /v "path"')do set rar="%%j\rar.exe"

if /i not "%~x1"=="rar" goto :rar
set name="%1"

:rar
%rar% a -m5 %temp%\tmp\%~n1.rar "%1" >nul 2>nul
set name=%temp%\tmp\%~n1.rar

goto :copy
:copy
copy /b "%temp%\tmp\*.png"+%name% "%~dp1"%~n1.png >nul 2>nul
cls
%rar% t "%~dp1"%~n1.png|findstr "全部OK" >nul&& echo 成功生成包含^"%~nx1^"的图片||echo 生成图片失败!
echo.
pause