報價單下載 V3

把重複的指令用呼叫的
@echo off
set DQ="%date:~0,4%_%date:~5,2%%date:~8,2%"
md %DQ%

ECHO 原價屋
set TIT="原價屋"
set URL=http://www.coolpc.com.tw/yes.pdf
set NAM=yes.pdf
set NTK=pdf
call 00.bat

ECHO 京典
set TIT="京典"
set URL=http://www.kingtech.com.tw/download/光華報價單.zip
set NAM=光華報價單.zip
set NTK=zip
call 00.bat

ECHO 速易
set TIT="速易"
set URL=http://b2b.suyi.com.tw/suyi.rar
set NAM=suyi.rar
set NTK=rar
call 00.bat

ECHO 成傑
set TIT="成傑"
set URL=http://www.cjpc.com.tw/cjpcdm.rar
set NAM=cjpcdm.rar
call 00.bat

cls
ECHO 下載完成..請按任一鍵繼續
pause

00.bat的指令

wget %URL%
if %NTK% == rar (
unrar x -y %NAM%
goto xls
)
if %NTK% == zip (
unzip -x-q %NAM%
goto xls
)

if %NTK% == pdf (
ren *.pdf %DQ%_%TIT%.pdf
move %DQ%_%TIT%.pdf %DQ%
)

:xls
ren *.xls %DQ%_%TIT%.xls
move %DQ%_%TIT%.xls %DQ%
del /q %NAM%

--
到目前應該是沒問題了
解壓縮需要 UNRAR 及 UNZIP 兩個 EXE檔

0 回應: