[..] Protéger PDF par mot de passe à l'aide de Autoit
Posté : lun. 24 août 2020 20:31
Bonjour,
Est il possible sous Autoit de protéger le fichier PDF du code ci-dessous par mot de passe ?
N.B: En compilant le dit code, vous obtenez automatiquement un fichier format PDF sur votre bureau.
Merci pour votre réponse.
Cordialement.
Est il possible sous Autoit de protéger le fichier PDF du code ci-dessous par mot de passe ?
N.B: En compilant le dit code, vous obtenez automatiquement un fichier format PDF sur votre bureau.
Merci pour votre réponse.
Cordialement.
Code : Tout sélectionner
#include "MPDF_UDF_FR.au3";<<<<<<<<<<<<<<<<<<<<< DON'T FORGET TO CHANGE THE PATH TO THE UDF
;set the properties for the pdf
_SetTitle("Demo PDF in AutoIt")
_SetSubject("Demo PDF in AutoIt, without any ActiveX or DLL...")
_SetKeywords("pdf, demo, AutoIt")
_OpenAfter(True);open after generation
_SetUnit($PDF_UNIT_CM)
_SetPaperSize("A4")
_SetZoomMode($PDF_ZOOM_FULLPAGE)
_SetOrientation($PDF_ORIENTATION_PORTRAIT)
_SetLayoutMode($PDF_LAYOUT_CONTINOUS)
;initialize the pdf
_InitPDF(@ScriptDir & "Example justified paragraph.pdf")
;=== load resources used in pdf ===
;fonts:
_LoadFontTT("_Calibri", $PDF_FONT_CALIBRI)
;=== create objects that are used in multiple pages ===
;create a header on all pages, except the first:
_BeginPage()
_Draw_Rectangle(1.8, 22.5, 16.8, 4, $PDF_STYLE_STROKED, 0.2, 0xcafea0, 0.02)
$sText = "Anna Montes ridiculus, in pénâtibus, in âliquâm énim sâgittis pélléntésqué? Mâttis duis ét ut nunc sâgittis énim "
$sText &= "tortor urnâ, éros? Scélérisqué? Dâpibus scélérisqué vél rhoncus porttitor! Porttitor ridiculus. In âdipiscing âugué "
$sText &= "vél pélléntésqué tortor portâ hâc tristiqué turpis plâcérât scélérisqué éléméntum hâc pulvinar mid dôlôr pélléntésqué "
$sText &= "lundium mattis néc. Néc séd. ét adipiscing néc nisi éléméntum natôqué! Turpis pénatibus ést dictumst magnis intégér "
$sText &= "scêlêrisquê, sôciis, risus scêlêrisquê ultricês auctôr pôrta, ênim? Ac môntês pêllêntêsquê cum ênim auguê pênatibus "
$sText &= "pulvinar? Vêl mid, cum habitassê êtiam urna? In? êt, natôquê! Intêgêr ôdiô êgêstas! Rhôncus a vut natoquê pëllëntësquë "
$sText &= "diam lundium auguë in mus. Auctor, dictumst lacus turpis phasëllus ëtiam, proin mauris. Natoquë ultriciës turpis nisi "
$sText &= "platëa parturiënt? Nunc nascëtur ëst, adipiscing ënim turpis Mihai."
_Paragraph($sText, 2, 26, 16.5, "_Calibri", 10, 0)
_EndPage()
;then, finally, write the buffer to disk
_ClosePDFFile()