winrarのコマンドラインでのドラッグアンドドロップについて質問

set WINRAR_PATH=C:\Program Files\WinRAR\WinRAR.exe

:run_encode
if "%~1" == "" goto end
"%WINRAR_PATH%" X -OR -TSM -AC -EP3 -AD %1 "%~dpn1"

shift
goto run_encode

:end

こんな感じにパッチを作って様々なフォルダに入ってるrarファイルをドラッグアンドドロップして
それぞれのrarのある場所に解凍し、解凍が終わったらrarを削除する・・・
そんな感じを目指して作ってますが、解凍先がありませんとエラーが出てしまいます。
何か間違っているのでしょうか・・・？

No.1 ベストアンサー 回答者： kon77 回答日時： 2017/02/03 16:58

「%~dpn1」の部分を、

「%~dp1」にしてみてはいかがでしょうか。