• 締切済み

ヤフーメールを監視して、uwscを実行

全くの初心者ですが、ヤフーメールを監視して、本文に特定の文字が含まれていたら、UWSCを実行するといったのは可能でしょうか? メール本文に、/買い/と/ポンド円/が含まれていたら、A実行 /売り/と/ポンド円/が含まれていたら、Bを実行 /買い/と/ドル円/が含まれていたら、Cを実行 /売り/と/ドル円/が含まれていたら、Dを実行 ABSP21でファイルは取り込めたのですが、読むことが出来ません。 メールのSubjectには売り、買いとの情報はなく、本文を参照しなければなりません。 FGrepを使って以下の様にしてみましたが、AからDまで全て実行してしまいます。 UWSCで定期的にメールの監視をするつもりです。 bobj = CreateOLEObj("basp21") mail_server = "pop.mail.yahoo.co.jp" mail_id = "ID" mail_ps = "PASSWORD" dirname = "<c:\mail\basp21" sign1 = "買い" sign2 = "売り" output = bobj.RcvMail(mail_server, mail_id, mail_ps, "SAVEALL", dirname) for i = Length(output)-1 to 0 step -1 retv = bobj.ReadMail(output[i], "from:subject:", dirname) pair1 = bobj.FGrep(output[i],"/ポンド円/k",5) pair2 = bobj.FGrep(output[i],"/ドル円/k",5) sign1 = bobj.FGrep(output[i],"/買い/k",10) sign2 = bobj.FGrep(output[i],"/売り/k",10) if stgy1>0 and sign1>0 then MSGBOX("ポンド円 買") if stgy1>0 and sign2>0 then MSGBOX(ポンド円 売") if stgy2>0 and sign1>0 then MSGBOX("ドル円 買")  if stgy2>0 and sign2>0 then MSGBOX("ドル円 売")   //上4行は検証様で実際にはUWSCのパスをいれます。 wk = bobj.RcvMail(mail_server, mail_id, mail_ps, "DELE"+(i+1), dirname) break next ウェブを見ながら、ここまで来ましたが自力では解決出来そうにありません。 手助けをおねがいします。

みんなの回答

  • miknezu
  • ベストアンサー率0% (0/0)
回答No.1

こんにちは。 メールに対する監視は可能です。Webmailだけでなく、メーラー経由でのメールを監視することができる。 米国開発の監視ソフトを紹介してあげます。日本語対応可能です。 http://jp.imonitorsoft.com/employee-monitoring-software.html http://www.imonitorphonespy.com/jp/ http://www.anywheremonitor.com/jp/ 興味があれば、一度操作してください。

関連するQ&A