Преобразование файла изображения в PDFin VB.Net

Question

Мне нужно преобразовать файл изображения в pdf и сохранить его на веб-сервере. Я использую iTextSharp с VB.Net, и ничто из того, что я пробовал, не напишет pdf, созданный с iTextSharp на диск. Вот код, который я использую для создания PDF-объекта.

Dim fileBytes As Byte() = fuCV.FileBytes 

    Dim doc As New iTextSharp.text.Document(iTextSharp.text.PageSize.LETTER, 10, 10, 42, 35) 
    Dim img As iTextSharp.text.Image = iTextSharp.text.Image.GetInstance(fileBytes) 
    img.ScaleToFit(280.0F, 260.0F) 
    img.SpacingBefore = 30.0F 
    img.SpacingAfter = 1.0F 
    img.Alignment = Element.ALIGN_CENTER 
    Dim paragraph = New Paragraph() 
    doc.Open() 
    doc.Add(paragraph) 
    doc.Add(img) 

Мне нужно сохранить объект doc на диск. Как это может быть сделано?

Answer 1

Попробуйте это:

using (FileStream ms = new FileStream(Server.MapPath("pdfs" + "/pdf1.pdf"), FileMode.Create)) 
{ 
    Document document = new Document(PageSize.A4, 25, 25, 30, 30); 
    PdfWriter writer = PdfWriter.GetInstance(document, ms); 
    document.Open(); 
    iTextSharp.text.Image image = iTextSharp.text.Image.GetInstance(Server.MapPath("imagenes") + "/Acceso.jpg"); 
    document.Add(image); 
    document.Close(); 
    writer.Close(); 
} 

Я забыл сказать, что вам нужно было создать две папки, одну с именем PDFS и другое с именем IMAGENES.