08/03/14 22:38:49 KJFpa/3+0
>>784
遅レスだけど
”選択したアプリcmdに追加する”スクリプトを登録しておくと便利。
適当なcmdファイルに以下を登録(2x.txtは好きなファイルでOK)
[.***;
2x.txtに登録|"%W\test.vbs" "cmd\2x.txt" "%P"
]
fenrir作業フォルダに以下のtest.vbsを置く。
strCmd = WScript.Arguments.Item(0)
strPath = WScript.Arguments.Item(1)
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objFile = objFSO.OpenTextFile(strCmd, 1)
strText = objFile.ReadAll
objFile.Close
Set objRegExp = New RegExp
objRegExp.Pattern = "tool.*\%P"
strRep= "tool" & " | " & strPath & " %P"
strNewText = objRegExp.Replace(strText,strRep)
Set objFile = objFSO.OpenTextFile(strCmd, 2)
objFile.WriteLine strNewText
objFile.Close