Question

我正在使用VB.Net。我想通过Savefile对话框从我的数据表中导出一个excel。但我得到错误：

“当前线程必须设置为单线程单元（STA）模式在进行OLE调用之前。确保您的主要功能 STAThreadAttribute标记在上面。只有在a时才会引发此异常调试器附加到进程。“

我已经搜索了很多，但对于我的“Web应用程序”，它无法解决。

这是我的代码：

 Dim saveFileDialog1 As New SaveFileDialog()
    saveFileDialog1.Filter = "Excel File|*.xls"
    saveFileDialog1.FilterIndex = 2
    saveFileDialog1.RestoreDirectory = True

    If saveFileDialog1.ShowDialog = Windows.Forms.DialogResult.OK _
   Then
        ExportExcel(dt, "Appraisals" + value.ToString())
    End If

Answer 1

我无法找到您的代码错误，但您可以尝试我的= D

Dim workBookName As String = "Computers"

If Not workBookName = "" Then
   SaveFileDialog1.Filter = "Excel WorkBook|*.xlsx"
   SaveFileDialog1.ShowDialog()
   Location = SaveFileDialog1.FileName
   ExportExcel(dt, "Appraisals" + value.ToString())
Else
   MsgBox("Please enter Worksheet Name", MsgBoxStyle.Critical, "Export To Excel")
End If

使用Savefile对话框从我的数据表中导出excel

1 个答案: