ファイルのパス(複数可)一覧を簡単に取得

これを

'<script language="VBScript">
set fso=createobject("scripting.filesystemobject")
set she=createobject("wscript.shell")

fname=fso.GetSpecialFolder(2) & "\" & fso.GetTempName() & ".txt"

for each line in WScript.Arguments
	msg=msg & line & vbcrlf
next

set outfile=fso.createtextfile(fname)
outfile.write msg

she.run fname

拡張子"vbs"で保存し、デスクトップに常に置いておく。
パスが欲しいときは、そのファイル（フォルダを含んでも可）をまとめてvbsファイルにドロップする。っと一覧がテキストファイルになって自動的に開く。