使用保存文件对话框从数据表中导出Excel

Question

我正在使用VB.Net。 我想使用“保存文件”对话框从数据表中导出Excel。 但我得到错误为：

“在进行OLE调用之前，必须将当前线程设置为单线程单元（STA）模式。确保在Main函数上标记了STAThreadAttribute。仅当将调试器附加到进程时，才会引发此异常。”

我已经在Google上搜索了很多，但是对于我的“ 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