Here is my code to Exports crystal reports in PDF format but there is a problem i want to import and save file by specifying a location.

By default it Exports the file in to C drive

i.e i want to open dialog box and save file how to achieve this please help me.

Try
            Dim CrExportOptions As ExportOptions
            Dim CrDiskFileDestinationOptions As New  _
            DiskFileDestinationOptions()
            Dim CrFormatTypeOptions As New PdfRtfWordFormatOptions()
            CrDiskFileDestinationOptions.DiskFileName = _
                                        "c:\crystalExport.pdf"
            CrExportOptions = rpt.ExportOptions
            With CrExportOptions
                .ExportDestinationType = ExportDestinationType.DiskFile
                .ExportFormatType = ExportFormatType.PortableDocFormat
                .DestinationOptions = CrDiskFileDestinationOptions
                .FormatOptions = CrFormatTypeOptions
            End With
            rpt.Export()
            MessageBox.Show("PDF Report has been Generated Succussfully", "SUCCESS", MessageBoxButtons.OK, MessageBoxIcon.Information, MessageBoxDefaultButton.Button1)
        Catch ex As Exception
            MsgBox(ex.ToString)
        End Try
    End Sub

Edited by Naveed_786 - 09 Nov 2011 at 11:35pm