View Single Post
  #1  
Old April 12th 06, 01:40 PM posted to microsoft.public.outlook.program_addins
[email protected]
external usenet poster
 
Posts: 1
Default Sending mail with attachment from my vb6 addin

Hi,

i've programmed an addin in VB6 which is sending mail from our CRM
system automatically.

The addin works fine, that means that it's doing what I want it to do.

When the addin is installed on a system with outlook 2000 (SMTP/POP3)
the attachment arrives at the recipient correct but when outlook 2003
(SMTP/POP3) is installed, the attachment is sent as winmail.dat and of
course some systems are not able to open it.

When the addin is installed on a system with outlook 2003 in
combination with Exchange 2000/2003 the attachment is correct again.

Here is an example of my code:
---------------------------------------------------------------------------------------------------------
Set olMsg = m_olApp.CreateItem(olMailItem)
olMsg.Subject = ls_Subject

olMsg.To = ls_Name + "" + ls_Address + ""
olMsg.Body = m_sMailBody + vbNewLine + vbNewLine

If Left(m_olApp.Version, 2) = "11" Then
olMsg.BodyFormat = 1 'PlainText
End If

olMsg.Save
olMsg.Attachments.Add ls_FileName, olByValue, Len(olMsg.Body) - 1

olMsg.Send
---------------------------------------------------------------------------------------------------------

Thanks a lot for your help and answers.

Henrik

Ads