HI Expert,

I am almost blocked in my project for now. Issue I am facing is when I am posting a reply through outlook VBA, all is OK except images in the mail, it just shows missing image.

Below is my code. Without image being included in reply, I can not proceed

Please advice me on this, how to proceed

Sub send_reply(ByVal Item As Outlook.MailItem)
   Dim olReply As MailItem
   Item.Actions("Reply").ReplyStyle = olIncludeOriginalText
   If Item.Class = olMail Then
       Set olReply = Item.Reply
    Else
       Exit Sub
    End If
    
   olReply.BodyFormat = olFormatHTML
    
   olReply.subject = Item.subject
   olReply.To = Item.Sender
   
    With olReply
         .HTMLBody = "This is a test auto reply." & vbCrLf & Item.HTMLBody
         
         .Send
    End With
   
   
   
End Sub