- 363 名前：名無しさん＠お腹いっぱい。 mailto:sage [2007/04/27(金) 00:30:42 ID:dcNq4o5m0]
- hyperqm.exeをVBSで置き換えたいんだけど出来ない。
hyperqm.vbs-----
Option Explicit
Dim WshShell, ARGT, attr_str, search_phrase, objExec, result
Set WshShell = CreateObject("WScript.Shell")
Set ARGT = Wsh.Arguments
attr_str = ""
search_phrase = ARGT(1)
Set objExec = WshShell.Run("estcmd search -nl -ic " & ARGT(2) & " -vu -aux -1 -max -1 " & attr_str & " """ & ARGT(0) & """ """ & search_phrase & """")
---
で、QMAIL3のオプション−検索で
cscript hyperqm.vbs "$index" "$condition" $encoding
としてテスト。DOS窓が開いて検索結果はでている。
んで、この結果をQMAIL3にそのまま返すために、hyperqm.vbsの
WshShell.RunをWshShell.Execに変えたんだが、QMAIL3は無反応。
だれか助けて、、、
|
 |
