將FormView,GridView匯出到excel

 

Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim name As String = "attachment;filename="
name += Request.QueryString("name") + ".xls"
Response.Clear()
Response.AddHeader("content-disposition", name)
Response.Charset = "UTF-8"
Response.ContentType = "application/vnd.xls"
Dim stringWrite As System.IO.StringWriter = New System.IO.StringWriter
Dim htmlWrite As System.Web.UI.HtmlTextWriter = New HtmlTextWriter(stringWrite)
FormView1.RenderControl(htmlWrite) '<--非GridView1請更改為要輸出名稱
Response.Write(stringWrite.ToString)
Response.End()
End Sub

arrow
arrow
    全站熱搜

    毛魚 發表在 痞客邦 留言(0) 人氣()