///イラレ／InDesignで開いてるドキュメントをエクスプローラーで開く(win)
var path1=app.activeDocument.fullName.fsName;
with(File(Folder.desktop+"/explorer-de-hiraku.vbs")){
open("w");
write("CreateObject(\"WScript.Shell\").Run(\"explorer /select, "+path1+"\")");
close();
execute();
$.sleep(100);
remove();
};// #dtp