1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23
   |  
Imports System
Imports iTextSharp.text.pdf
Imports iTextSharp.text
Imports iTextSharp
Imports System.IO
 
 
Public Class accueil
    Inherits System.Web.UI.Page
 
    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
 
    End Sub
 
    Protected Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Dim pdfdoc As New Document()
        Dim pdfwrite As PdfWriter = PdfWriter.GetInstance(pdfdoc, New FileStream("simple.pdf", FileMode.Create))
        pdfdoc.Open()
        pdfdoc.Add(New Paragraph("Essai"))
        pdfdoc.Close()
    End Sub
End Class |