كود :
Dim CrExportOptions As ExportOptions
Dim CrDiskFileDestinationOptions As New _
DiskFileDestinationOptions()
Dim CrFormatTypeOptions As New PdfRtfWordFormatOptions()
CrDiskFileDestinationOptions.DiskFileName = _
" + NumCodereport + ".pdf +"
CrExportOptions = rpolines.ExportOptions
With CrExportOptions
.ExportDestinationType = ExportDestinationType.DiskFile
.ExportFormatType = ExportFormatType.PortableDocFormat
.DestinationOptions = CrDiskFileDestinationOptions
.FormatOptions = CrFormatTypeOptions
End With
rpolines.Export()كود :
My.Computer.FileSystem.SpecialDirectories.Desktopكيف يمكنني أرسال المسـار
أنا عندي ملف pdf ومنتهي التسمية باقي فقط أعمل له أكسبورت في سطح المكتب
لما أَيف للكود هذا التسميه يعطيني خطأ
الفكره هي تقرير أملئة بالبيانات وبعد كذا أعمل له أكسبورت تصدير لسطح المكتب بتسمه معينه فقط
