Discussion :

[chamox187]

Bonjour,

Question: Peux-t'on mettre en PDF le contenu HTML entre 2 balises d'une DIV et garder la mise de son implémentation??
Car quand je fais un innerText sur la div çà me renvois le texte entre toutes les balises du code mais ne conserve pas du tout la mise en forme (tableau par exemple ou listes).
Et biensur si je fais innerHTML çà me renvois tout avec les balises donc pas intéressant dans mon cas .

Voilà mon morceau de code behind:

Ma div (nommée madiv dans le code) est bien entendu en runat="server" et contient entre ses balises le contenu HTML dont je souhaite garder la mise en forme dans mon PDF.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
protected void GeneratePDF_Click(object sender, EventArgs e)
    {
        String path = @"C:\Windows\Temp\monpdf.pdf";
        Document documentPDF = new Document(PageSize.A4, 10f, 10f, 10f, 0f);
 
        try
       {
            PdfWriter.GetInstance(documentPDF, new FileStream(path, FileMode.Create));
            documentPDF.Open();
           documentPDF.Add(new Paragraph(madiv.innerText));
            documentPDF.CloseDocument();
        }
 
       catch (Exception ex)
        { throw ex; }
    }

Si quelqu'un a déjà eu affaire à cette problématique je suis "Grand" preneur!
merci à tous! @++

[DotNetMatt]

C'est loin d'être aussi simple...

Cas basique, ton HTML contient directement le CSS pour le formatter, alors utilise la classe HTMLWorker ou XMLWorker (XMLWorkerHelper).

Pour le cas où tu as un fichier CSS, il faut d'abord la charger dans un MemoryStream puis utiliser le XMLWorker et passer le MemoryStream du CSS au XMLWorker.

[popoels]

Bonjour à tous,

Voici un petit bout de code VB dans lequel est créé un pdf avec la classe XMLWorkerHelper de itextsharp 5.5.4.0 HTMLWorker étant déprécié dans cette version, cela permet de garder le style et la mise en page html de la source.

Code vb :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
 
Protected Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
     Dim mstrem As MemoryStream = New MemoryStream
     Dim strFileName As String = "newFile_" & Now.Ticks.ToString
     Dim document As iTextSharp.text.Document = New iTextSharp.text.Document(PageSize.A4.Rotate, 30, 30, 30, 30)
 
     Using pdfile As PdfWriter = PdfWriter.GetInstance(document, mstrem)
          document.Open()
          Dim xmlWorker = iTextSharp.tool.xml.XMLWorkerHelper.GetInstance
          Dim result As String = GetHtml()
          Dim strWriter As StringReader = New StringReader(result)
          xmlWorker.ParseXHtml(pdfile, document, strWriter)
          document.Close()
     End Using
 
     AddExportResponse(strFileName, mstrem)
End Sub
 
Public Sub AddExportResponse(fileName As String, contentStream As MemoryStream)
     Response.ClearContent()
     Response.ClearHeaders()
     Response.AddHeader("content-disposition", "attachment; filename=" + fileName & "." & "pdf")
     Response.Charset = ""
     Response.ContentType = "text/pdf"
     Response.BinaryWrite(contentStream.ToArray)
     contentStream.Close()
     Response.End()
End Sub