Ce petit exemple montre comment modifier les paramètres de l'imprimante PDF de l'utilisateur. L'exemple est basé sur une demande d'assistance d'un gestionnaire de réseau qui souhaitait avoir spécifié un paramètre spécifique pour l'imprimante PDF lorsque l'utilisateur s'est connecté.

Le code suivant modifie le texte du filigrane par défaut pour l'utilisateur qui exécute le script.

    Rem -- This example will show you how to change a setting in the settings.ini file for the logged in user.
    Option Explicit
    Dim printername
    Dim util, settings
    Rem -- Create the COM helper object.
    Set util = CreateObject("pdf7.PdfUtil")
    Rem -- Create the COM settings object to control the printer.
    Set settings = CreateObject("pdf7.PdfSettings")
    Rem -- Change the value of printer name if you want to use another PDF printer
    printername = util.DefaultPrinterName
    settings.PrinterName = printername
    settings.SetValue "WatermarkText", "New Watermark Text"
    Rem -- Write settings to the settings.ini.
    settings.WriteSettings False
    WScript.Echo "Settings saved!"
    

Top