H
hhandersson
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
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