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

古い記事へ | 新しい記事へ


プライバシーポリシー

Twitter

Books