mortscriptで書いてみました。
一応動いたので公開してみます(Ad[es]のみ確認)。
使用は自己責任で♪
・機能概要
mail.mscr…常駐し、メール受信完了するとメーラ起動するか問い合わせるダイアログを表示し、「はい」を選ぶとメーラを起動する。
killmail.mscr…mail.mscrの常駐を解除。
・カラクリ
メール受信時に表示されるポップアップウィンドウ「Eメール(ウィルコム)」をトリガとし、
"\Application Data\SeeTooMail\Accounts\070xxxxxxxx\Storage\DATA\Status.txt"が更新されるのを確認します。
更新されたときが新着メール到着時と解釈しています。
・制限事項
常駐後、メールが2147483147秒間に1通もこないと動きがおかしくなる(かも)
10000通目のメールを受け取ったとき、常駐解除してしまう。
・スクリプト中身
※070xxxxxxxxは各自の電話番号に置き換えてください。

mail.mscr
fname = "\Application Data\SeeTooMail\Accounts\070xxxxxxxx\Storage\DATA\Status.txt"
Message("新着メール監視を開始します")
Repeat(10000)
WaitFor("Eメール(ウィルコム)", 2147483147)
before = FileModifyTime(fname)
new = 0
While(new < before)
new = FileModifyTime(fname)
Sleep(1000)
EndWhile
ans = Question("メーラ起動しますか?", "新着メール")
If(ans = 1)
Run("\Windows\STMail.exe")
EndIf
EndRepeat

killmail.mscr
Message("新着メール監視を終了します")
KillScript("mail.mscr")
- 2007/08/04(土) 01:49:20|
- Tips
-
| トラックバック:0
-
| コメント:2
はじめまして
早速アドエスに導入しました。が、
Eメール受信中のポップアップで起動確認ダイアログが開いてしまいます。
そのまま受信完了まで待てば使用できるのですが、受信完了後に開いた方が
使用感がよいと思います。
これは、
WaitFor("Eメール(ウィルコム)", 2147483147)
を書き換えれば変更できますか?
もしくは、監視している所が同じで変更できないのでしょうか?
全く理解してないので、よろしくお願いします。
- URL |
- 2007/08/11(土) 18:19:56 |
- シシミツタ #-
- [ 編集]
>シシミツタさん
はじめまして。こちらでも再現できました。
現在修正中ですので少々お待ちください。(WaitForの書き換えだけでは正しく動作しません)
ご報告ありがとうございました。
- URL |
- 2007/08/14(火) 13:55:33 |
- tok #-
- [ 編集]