将数据导出到Excel vb.net

Question

我想在2013年的visual studio express for web中将数据表导出到excel。在生成excel文件时，应用程序抛出以下错误（参见附图）

- 导出代码

Private Function ConvertDtToTDF(ByVal dt As DataTable, ByVal filename As String) As String

            Dim dr As DataRow, ary() As Object, i As Integer

        Dim iCol As Integer

        HttpContext.Current.Response.Clear()
        HttpContext.Current.Response.AddHeader("content-disposition", "attachment;filename=" & filename & ".xls")
        HttpContext.Current.Response.Charset = ""
        HttpContext.Current.Response.ContentType = "application/vnd.xls"

        'Output Column Headers
        For iCol = 0 To dt.Columns.Count - 1
            Response.Write(dt.Columns(iCol).ToString & vbTab)
        Next

        Response.Write(vbCrLf)
        'Output Data
        For Each dr In dt.Rows
            ary = dr.ItemArray
            For i = 0 To UBound(ary)
                Response.Write(ary(i).ToString & vbTab)
            Next
            Response.Write(vbCrLf)
        Next
        HttpContext.Current.Response.End()

    End Function