'property.vbs '編集中のファイルのプロパティ(Explorerのダイアログ)表示 Dim objShell sFileName = ExpandParameter("$F") Set objShell = CreateObject("Shell.Application") objShell.NameSpace(sFileName)_ .ParentFolder.ParseName(objShell.NameSpace(sFileName).Title)_ .InvokeVerb "プロパティ(&R)" Set objShell = Nothing