' sample.vbs ' 編集中のファイルを対象に選択文字列でGrep実行 sKey = ExpandParameter(Cstr("$C")) sFile = ExpandParameter(Cstr("$f")) sPath = ExpandParameter(Cstr("$F")) sDir = Left(CStr(sPath), Len(sPath) - Len(sFile) - 1) ' サブフォルダから検索しない ' 大文字小文字を区別する ' 正規表現無効 ' 文字コードセット自動 ' 結果出力:該当行 ' 出力形式:ノーマル Grep CStr(sKey), CStr(sFile), CStr(sDir), CLng(52)