2013-08-20 45 views
0

我使用下面的代碼來生成PDF並將其保存到服務器位置。如果存在,我該如何更換文件?那麼如果目錄包含一個pdf,如果相同的「myUniqueFileName」使用相同的文件名替換它?謝謝如果存在,是否可以使用itextsharp替換生成的PDF?

Dim Doc1 As New Document 
    Dim path As String = "\\server\pdfs\" 
    If (Not System.IO.Directory.Exists(path)) Then 

     System.IO.Directory.CreateDirectory(path) 
    End If 
    Dim myUniqueFileName = String.Format("{0}.pdf", random) 
    Dim pdfWrite As PdfWriter = PdfWriter.GetInstance(Doc1, New FileStream(path & myUniqueFileName, FileMode.Create)) 

    Doc1.Open() 
    Dim test As String 
    test = Session("PDF") 
    Dim PDFHeader As String 
    PDFHeader = Session("Header") 
    Dim imagepath As String = Server.MapPath(".") & "/images/Header.png" 
    Dim image As iTextSharp.text.Image = iTextSharp.text.Image.GetInstance(imagepath) 
    image.ScalePercent(70.0F) 
    Dim line1 As New iTextSharp.text.pdf.draw.LineSeparator(0.0F, 100.0F, BaseColor.BLACK, Element.ALIGN_LEFT, 1) 

    Doc1.Add(image) 
    Doc1.Add(New Paragraph(PDFHeader)) 
    Doc1.Add(New Chunk(line1)) 
    Doc1.Add(New Paragraph(test)) 
    Doc1.Close() 

回答

0

牛米,我能夠使用相同的邏輯,它會使用FileMode.Create

重新創建該文件
相關問題