vb.net Экспорт на диск

Question

Im получение этой ошибки «Ошибка в файле C: \ Users \ Josephine \ AppData \ Local \ Temp \ Reportlist {BC17FA55-0414-4D23-B78C-311D036ADF6C} .rpt: запрос не может быть представленный для фоновой обработки ». В чем проблема? Dim документ как новый ReportDocument

   Dim ExportPathName As String 
       ExportPathName = String.Concat(New String() {"C:\Exported\", Me.cboList.Text, "\", Me.cboCust.Text}) 
       If Not My.Computer.FileSystem.DirectoryExists(ExportPathName) Then 
        My.Computer.FileSystem.CreateDirectory(ExportPathName) 
       End If 
       'Dim str2 As String = String.Concat(New String() {ExportPathName, "\", Controller.ExportName.ToString, ".pdf"}) 
       Dim str2 As String = String.Concat(New String() {"C:\test.pdf"}) 
       document.Load((Application.StartupPath & "\Reportlist.rpt"), CrystalDecisions.Shared.OpenReportMethod.OpenReportByTempCopy) 
       document.SetDataSource(DS) 
       If System.IO.File.Exists(str2) Then 
        System.IO.File.Delete(str2) 
       End If 
       Me.Cursor = Cursors.WaitCursor 
       ToolStripStatusLabel1.Text = "Exporting to PDF..Please Wait" 
       document.ExportToDisk(CrystalDecisions.Shared.ExportFormatType.PortableDocFormat, str2) 
       document.Dispose() 

Answer 1

решить с помощью резьбы с помощью вызова подменю

образец, как этот Threading in VB.NET