Public Overloads Overrides Sub VerifyRenderingInServerForm(ByVal control As Control)
' base.VerifyRenderingInServerForm(control);
End Sub
Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs)
DG_show.AllowPaging = False
Response.Clear()
Response.Buffer = True
Response.Charset = "GB2312"
Response.AppendHeader("Content-Disposition", "attachment;filename=" & System.Web.HttpUtility.UrlEncode("2008年度吉尔药业可供产品目录.xls", System.Text.Encoding.UTF8))
Response.ContentEncoding = System.Text.Encoding.GetEncoding("GB2312")
'设置输出流为简体中文
Response.ContentType = "application/ms-excel"
'设置输出文件类型为excel文件。
Me.EnableViewState = False
Dim myCItrad As New System.Globalization.CultureInfo("ZH-CN", True)
Dim oStringWriter As New System.IO.StringWriter(myCItrad)
Dim oHtmlTextWriter As New System.Web.UI.HtmlTextWriter(oStringWriter)
DG_show.RenderControl(oHtmlTextWriter)
Response.Write(oStringWriter.ToString())
Response.End()
End Sub
以上的代码可以正确导出名称为汉字的excel表格,以前导出的文件名为乱码是因为编码方式不对,其实稍做一下修改就可以了.必将还是汉字的文件名更容易让人知道下载的是什么东东,另外请设置EnableEventValidation = "false"