Error export dll -2147190548 (800478ec)

I use VB6 and Crystal report XI when export for email generate this error -2147190548 dll export expired o not exist.

Set Report = Application.OpenReport("c:\example.rpt")

With Report

.ExportOptions.DestinationType = crEDTEMailMAPI

.ExportOptions.MailToList = "xxxxxxxxxx"

.ExportOptions.MailSubject = "Here's the Xtreme Orders Report"

.ExportOptions.MailMessage = "Attached is a PDF file showing the latest Xtreme Orders Report."

.ExportOptions.FormatType = crEFTPortableDocFormat

.ExportOptions.PDFExportAllPages = True

.Export (False)

End With 'Report

Tank