Exporting a
DataTable
to Excel is trivial with EPPlus (
GitHub[
^],
NuGet[
^]):
Private Sub ExportTableToExcel()
Response.Clear()
Response.ContentType = "application/vnd.openxmlformats-officedocument.spreadsheetml.sheet"
Response.AddHeader("Content-Disposition", "attachment; filename=test.xlsx")
Dim dt As DataTable = GetTruckMovementDATA()
Using package As New ExcelPackage()
Dim ws As ExcelWorksheet = package.Workbook.Worksheets.Add("Report")
ws.Cells("A1").LoadFromDataTable(dt, True)
Dim ms As New System.IO.MemoryStream()
package.SaveAs(ms)
ms.WriteTo(Response.OutputStream)
End Using
End Sub