在VB.Net中将图像文件转换为PDF

Question

我需要将图像文件转换为pdf并将该pdf保存到Web服务器。 我将iTextSharp与VB.Net一起使用，但我尝试过的任何操作都不会将使用iTextSharp创建的pdf写入磁盘。 这是我用来创建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名称。