Convert Gridview Data to PDF File

Question

Dear Frnds I have a Gridview on the Form and want to convert the Details in Gridview to a PDF File. pls help me out in this post thanks & regards Aamir

Satyapriya Nayak · Answer

Hi Aamir Normal 0 First add the itextsharp.dll file into the application as click solution explorer- Right click on your application file-Add reference-On browse tab search the itextsharp.dll file from your computer-Click ok-Finish. Then you will notice that a Bin folder will be created where you will find itextsharp.dll file present inside that folder. Program Default.aspx code @ Page Language =VB AutoEventWireup =false CodeFile =Default.aspx.vb Inherits =_Default %> DOCTYPE html PUBLIC -//W3C//DTD XHTML 1.0 Transitional//EN http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd> html xmlns =http://www.w3.org/1999/xhtml> head runat =server> title > Untitled Page title > head > body > form id =form1 runat =server> div > div > asp : GridView ID =GridView1 runat =server BackColor =#FFFF99 Font-Bold =True ForeColor =Red> HeaderStyle BackColor =#66FFFF Font-Bold =True ForeColor =#CC3300 /> AlternatingRowStyle BackColor =#FFCC99 /> asp : GridView > asp : Button ID =Button1 runat =server Text =Export to Pdf /> form > body > html > Default.aspx.vb code Imports System.Data Imports System.Data.SqlClient Imports iTextSharp.text.pdf Imports iTextSharp.text.html Imports iTextSharp.text.html.simpleparser Imports System.IO Imports iTextSharp.text Partial Class _Default Inherits System.Web.UI.Page Dim strConnString As String = System.Configuration.ConfigurationManager.ConnectionStrings.Item( ConnectionString ).ToString() Dim con As New SqlConnection(strConnString) Dim str As String Dim com As SqlCommand Dim sqlda As SqlDataAdapter Dim ds As DataSet Protected Sub Page_Load( ByVal sender As Object  ByVal e As System.EventArgs) Handles Me .Load con.Open() str = select * from student com = New SqlCommand(Str con) Dim reader As SqlDataReader reader = com.ExecuteReader() GridView1.DataSource = reader GridView1.DataBind() con.Close() End Sub Protected Sub Button1_Click( ByVal sender As Object  ByVal e As System.EventArgs) Handles Button1.Click Response.Clear() Response.Buffer = True Response.ContentType = application/pdf Response.AddHeader( content-disposition  attachment;filename=student.pdf ) Response.Cache.SetCacheability(HttpCacheability.NoCache) Dim StringWriter1 As New StringWriter() Dim HtmlTextWriter1 As New HtmlTextWriter(StringWriter1) GridView1.RenderControl(HtmlTextWriter1) Dim StringReader1 As New StringReader(StringWriter1.ToString()) Dim newDocument As New Document(PageSize.A4 7.0F 7.0F 7.0F 7.0F) Dim HTMLWorker1 As New HTMLWorker(newDocument) PdfWriter.GetInstance(newDocument Response.OutputStream) newDocument.Open() HTMLWorker1.Parse(StringReader1) newDocument.Close() Response.Write(newDocument) Response.End() End Sub Public Overrides Sub VerifyRenderingInServerForm( ByVal control As Control) End Sub End Class Thanks