如果主體包含字符串，請刪除簽名

Question

如果某個字符串在主體中，最終目標是提取我的簽名。到目前爲止，我可以用以下方式檢查身體。

Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean) 

    If TypeName(Item) <> "MailItem" Then Exit Sub 

     If Item.Body like "*something*" Then 
     MsgBox "it's working" 
     End If 

End Sub 

所有的好，從我的頭頂，我想我可以用

Item.Signature.Remove 

才發現簽名不是屬性。我的信號也包含一個圖像（比較標誌）。我搜索了，我似乎看到簽名本身是本體的一部分。我是否需要用一些TRIM功能替換身體並刪除圖像？不知道去哪裏或者是否有更簡單的方法。

Answer 1

對於那些可能會覺得這有幫助的人。該簽名是Body財產的一部分。我知道我的簽名以我的名字開頭，所以我所做的就是使用Instr函數獲取該起始位置並從那裏開始。

Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean) 

If TypeName(Item) <> "MailItem" Then Exit Sub 
    If Item.Body Like "*MyCatchPhrase*" Then 
     midcount = InStr(Item.Body, "MyFull Name") 
     FinNum = midcount - 1 
     Item.Body = Left(Item.Body, FinNum) 
    End If 

End Sub