Merhaba visual basic kodları ile pdf imzalamak istiyorum.
Pdf in sol alt köşesine isim soyisim ve "bu belge e imzalıdır" yazacak. İmza yapıldıktan sonra pdf üzerinde değişikliğe izin vermemesi gerekiyor.
Bu işlemi nasıl yapabilirim?
visual basic ile e-imza nasıl yapılır?
2
●92
- 28-02-2024, 15:59:09
- 04-06-2024, 01:43:55böyle birşeymi arıyorsun ?
Not: Kütüphaneyi eklemeyi unutma : "Install-Package iTextSharp"
Imports System.IO Imports iTextSharp.text Imports iTextSharp.text.pdf Module Module1 Sub Main() Dim sourcePdfPath As String = "path\to\input.pdf" Dim signedPdfPath As String = "path\to\output_signed.pdf" Dim signatureText As String = "İsim Soyisim\nBu belge e-imzalıdır" Dim password As String = "your_password" ' PDF okuyucusunu açın Dim reader As New PdfReader(sourcePdfPath) Dim size As Rectangle = reader.GetPageSizeWithRotation(1) ' PDF yazıcısını ve belgenin yazılacağı bellek akışını oluşturun Dim fs As New FileStream(signedPdfPath, FileMode.Create, FileAccess.Write) Dim stamper As New PdfStamper(reader, fs) ' İmza metnini ekleyin Dim over As PdfContentByte = stamper.GetOverContent(1) Dim bf As BaseFont = BaseFont.CreateFont(BaseFont.HELVETICA, BaseFont.CP1252, BaseFont.NOT_EMBEDDED) over.BeginText() over.SetFontAndSize(bf, 12) over.ShowTextAligned(PdfContentByte.ALIGN_LEFT, signatureText, 10, 10, 0) over.EndText() ' PDF'yi imzalayın ve değişikliklere karşı koruyun stamper.SetEncryption(Nothing, Encoding.UTF8.GetBytes(password), PdfWriter.ALLOW_PRINTING, PdfWriter.ENCRYPTION_AES_128) stamper.Close() reader.Close() fs.Close() End Sub End ModuleBu kod parçası, sourcePdfPath ile belirtilen PDF dosyasını açar, sol alt köşeye belirttiğiniz metni ekler ve ardından şifreleme yaparak belgeyi değişikliklere karşı korur. signatureText değişkeninde isminizi ve imza metninizi ayarlayabilirsiniz. password değişkeninde ise PDF dosyasını korumak için kullanılacak şifreyi belirleyebilirsiniz.
Bu adımları izleyerek Visual Basic ile PDF dosyalarına imza ekleyebilir ve bunları koruma altına alabilirsiniz.