2008/12/20

ありがちなRe: Re: Re:なサブジェクトを何とかする方法。 「Re: Re:」や「RE:Re: Re:」などのサブジェクトを「Re: 」にします。 組み込み方は前のエントリを参照

Dim reSubjectRe As New RegExp
reSubjectRe.Global = True
reSubjectRe.IgnoreCase = True
reSubjectRe.Pattern = "(?:re\d*\:\s*)+"
oMailItem.Subject = reSubjectRe.Replace(oMailItem.Subject, "Re: ")

あと知らなかったんですがOfficeには簡単にオレオレコード署名を作る方法があるんですね。これを使えばデフォルトのセキュリティ設定でThisOutlookSessionが動きます。導入の仕方はこちらを参考に。makecert.exeとか使わなくてもいいんだーへぇー

12/23追記。Re2:とかにも対応

元記事:http://blogs.wankuma.com/mutaguchi/archive/2008/12/20/164557.aspx


Copyright © 2005-2018 Daisuke Mutaguchi All rights reserved
mailto: mutaguchi at roy.hi-ho.ne.jp
プライバシーポリシー

Books

Twitter