vb.net导出到磁盘

Question

我得到这个错误“文件C：\ Users \ Josephine \ AppData \ Local \ Temp \ Reportlist {BC17FA55-0414-4D23-B78C-311D036ADF6C} .rpt错误：请求不能提交后台处理“。什么似乎是问题？ 昏暗的文件作为新的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