Windowsネットワークドライブのパスをフルパスに変換する


Windowsネットワークドライブはすごく便利です。だが、文書かメールにそのファイルのパスをそのまま挿入すると、他人はそのファイルのパスが認識できませんよね。
このため、下記ツールを作ってデスクトップとかにおいて、ファイルをツールのアイコンにドラッグ&ドロップしてから、使用箇所に貼り付けたらすみます。

toFullFN.bat
@echo off
if "%~1"=="" echo 使用方法: ファイルを「%~nx0」アイコンにドラッグ&ドロップしてから、使用箇所に貼り付けてください。 & pause & goto :EOF
set netFileName=

:WORK
set net_path=%~d1
rem ######## get net path
for /f "skip=1 tokens=1*" %%i in ('net use %~d1') do (
    if "%%i"=="リモート名" set net_path=%%j
    goto COPY_PATH
)
:COPY_PATH
set netFileName=%netFileName%%net_path%%~pnx1

rem ######## goto NEXT
shift
if "%~1"=="" goto OUTPUT
set netFileName=%netFileName%/
goto WORK

:OUTPUT
echo %netFileName%|CLIP

※複数ファイルをドラッグ&ドロップする場合、各ファイルパスを「/」で連結して出します。