PR
キーワードサーチ
サイド自由欄
コメント新着
カテゴリ
==========
@echo off
set ZIPBIN=D:\PortableApps\7-ZipPortable\App\7-Zip64\7z.exe
set MKDIR=mkdir
set RMDIR=rmdir
set FILE=%~fn1
set FILENAME=%~n1
set FILEEXT=%~x1
REM set YEAR=%DATE:~0,4%
set KOBO_DATA_PATH=E:\eBook\Kobo
set TMP_DRV=Z:
set TMP_DIR=%TMP_DRV%\TMP\EB_%RANDOM%
REM set WORK_DIR=jpg_work
set WORK_DIR=%FILENAME%
%MKDIR% %TMP_DIR%
%MKDIR% "%TMP_DIR%\%WORK_DIR%"
copy "%FILENAME%%FILEEXT%" %TMP_DIR%
cd /d %TMP_DIR%
REM
REM Extract ZIP
REM
%ZIPBIN% x "%FILENAME%%FILEEXT%"
FOR /D %%i IN (*_files) do (
echo copy %%i\cover.jpeg "%TMP_DIR%\%WORK_DIR%"
copy %%i\cover.jpeg "%TMP_DIR%\%WORK_DIR%\0000.jpg"
if exist %%i\OEBPS (
if exist %%i\OEBPS\image (
echo copy %%i\OEBPS\image\* "%TMP_DIR%\%WORK_DIR%"
copy %%i\OEBPS\image\* "%TMP_DIR%\%WORK_DIR%"
)
if exist %%i\OEBPS\images (
echo copy %%i\OEBPS\images\* "%TMP_DIR%\%WORK_DIR%"
copy %%i\OEBPS\images\* "%TMP_DIR%\%WORK_DIR%"
)
)
if exist %%i\item (
if exist %%i\item\image (
echo copy %%i\item\image\* "%TMP_DIR%\%WORK_DIR%"
copy %%i\item\image\* "%TMP_DIR%\%WORK_DIR%"
)
if exist %%i\item\images (
echo copy %%i\item\images\* "%TMP_DIR%\%WORK_DIR%"
copy %%i\item\images\* "%TMP_DIR%\%WORK_DIR%"
)
)
)
ren %WORK_DIR% "%FILENAME%"
del /q "%FILENAME%%FILEEXT%"
REM
REM Archive Image Files
REM
%ZIPBIN% a -tzip "%FILENAME%%FILEEXT%" "%FILENAME%\*"
REM
REM copy to ARCHIVE Path
REM
if "%FILENAME:~0,8%"=="週刊少年マガジン" (
echo if "%FILENAME:~0,8%"=="週刊少年マガジン" (
set YEAR=%FILENAME:~9,4%
set MAGAZINE_ARCHIVE_PATH=%KOBO_DATA_PATH%\_週刊少年マガジン\%YEAR%
set ARCHIVE_PATH=%MAGAZINE_ARCHIVE_PATH%
)
else (
if "%FILENAME:~0,5%"=="Mr.PC" (
echo if "%FILENAME:~0,5%"=="Mr.PC" (
set MRPC_ARCHIVE_PATH=%KOBO_DATA_PATH%\_Mr.PC ミスターピーシー
set ARCHIVE_PATH=%MRPC_ARCHIVE_PATH%
)
)
if "%ARCHIVE_PATH%"=="" (
set ARCHIVE_PATH=%KOBO_DATA_PATH%
)
echo ARCHIVE_PATH="%ARCHIVE_PATH%"
if not exist %ARCHIVE_PATH% %MKDIR% "%ARCHIVE_PATH%"
REM
copy "%FILENAME%%FILEEXT%" "%ARCHIVE_PATH%"
REM
REM clean up
REM
cd ..\
%RMDIR% /S/Q %TMP_DIR%
:END
==========
Poderosa 複数サーバー自動ログインマクロ… 2021.06.03 コメント(12)
awk を使ったデータフィルター処理 2020.10.03 コメント(14)
ファイル検索バッチ修正 2017.07.09 コメント(1)