VB.net读取Outlook签名

Outlook2007日文版的例子，默认的签名。工具栏的文字是日语，替换成相应的中文应该就可以了（需要debug查找）。

富文本格式的签名只能在不与正文作字符串连接时才能正确表示，否则就会变成纯文本。

 

 

 

                Dim olApp As New Outlook.Application()
                Dim olItem As Outlook.MailItem

                olItem = olApp.CreateItem(Outlook.OlItemType.olMailItem)
                olItem.BodyFormat = Outlook.OlBodyFormat.olFormatRichText

                                olItem.To = strTo                                           'To
                olItem.CC = CC
                olItem.Subject = txtTitle.Text                              '件名


                                
                '署名を読み込む
                Dim inspect1 As Outlook.Inspector
                inspect1 = olItem.GetInspector
                inspect1.CommandBars.ActiveMenuBar.Controls("挿入(&I)").Control.controls("署名​​(&S)").Control.Controls("WordMark_Signature").execute()


                               olItem.Display()