Skip to content

Instantly share code, notes, and snippets.

@KeitetsuWorks
Last active September 20, 2017 12:11
Show Gist options
  • Save KeitetsuWorks/4cf4d25d03f7bbf32135dc03757c898b to your computer and use it in GitHub Desktop.
Save KeitetsuWorks/4cf4d25d03f7bbf32135dc03757c898b to your computer and use it in GitHub Desktop.
JR東海オリジナルカレンダー壁紙の一括ダウンローダ
# End-of-line conversion
* text=auto
*.bat text eol=crlf
@echo off
rem
rem @file get_jrcentral_wallpaper.bat
rem @brief JR東海オリジナルカレンダー壁紙の一括ダウンローダ
rem @author Keitetsu
rem @date 2017/04/30
rem @copyright Copyright (c) 2017 Keitetsu
rem @par License
rem This software is released under the MIT License.
rem
setlocal
set EXIT_CODE=0
set ROOT_DIR=%CD%
set DOWNLOAD_DIR=download
set DOWNLOAD_URL_PREFIX=http://company.jr-central.co.jp/company/others/calendar/_img
rem ダウンロードフォルダを作成
if not exist "%ROOT_DIR%\%DOWNLOAD_DIR%\" (
echo Info: ダウンロードフォルダを作成します
mkdir "%ROOT_DIR%\%DOWNLOAD_DIR%"
)
rem ダウンロードを実行
for %%i in (01 02 03 04 05 06 07 08 09 10 11 12) do (
for %%j in (1024x768 1280x1204 1600x1200) do (
echo Info: ind_list_%%i_%%j.jpgのダウンロードを開始します
bitsadmin /RawReturn /Transfer get_wallpaper %DOWNLOAD_URL_PREFIX%/ind_list_%%i_%%j.jpg "%ROOT_DIR%\%DOWNLOAD_DIR%\ind_list_%%i_%%j.jpg"
)
)
rem 終了処理
:EXIT_SUCCESS
exit /B %EXIT_CODE%
:EXIT_FAILURE
pause
exit /B %EXIT_CODE%
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment