Dim ms As New MemoryStream
Dim doc As New iTextSharp.text.Document()
Dim writer As PdfWriter = Nothing
writer = PdfWriter.GetInstance(doc, ms)
'build your pdf
'get doc into byte array
Dim fbytes As Byte() = ms.GetBuffer
'save bytestream to file
Using fs As New FileStream(reportPath, FileMode.Create)
fs.Write(fbytes, 0, fbytes.Length)
End Using
'attach reportpath to email after here
Please Mark as Answer if You Find Useful!
But don't expect me to do your job!
Marked as answer by Ming Xu - MSFT on May 07, 2012 11:29 AM
UstesG
Contributor
2172 Points
466 Posts
Re: Sending generated pdf file from a gridview as an email attachment
May 01, 2012 03:29 AM|LINK
Dim ms As New MemoryStream Dim doc As New iTextSharp.text.Document() Dim writer As PdfWriter = Nothing writer = PdfWriter.GetInstance(doc, ms) 'build your pdf 'get doc into byte array Dim fbytes As Byte() = ms.GetBuffer 'save bytestream to file Using fs As New FileStream(reportPath, FileMode.Create) fs.Write(fbytes, 0, fbytes.Length) End Using 'attach reportpath to email after hereBut don't expect me to do your job!