[VBS] Script PDFCreator

Question

Bonjour,

Je cherche à réaliser un script me permettant de supprimer le fichier source d'un pdf créer avec PDFCreator (action après enregistrement). 
Mais je n'arrive pas à récupérer le chemin de ce fichier source ! REDMON_DOCNAME_PATH me renvoi une chaine vide !

[Code]

Option Explicit
'déclaration file system object
Dim fso
Dim Ftxt
        Dim objArgs, WshShell
        Dim str_a_changer
        Dim i

        Set objArgs = WScript.Arguments

If objArgs.Count = 0 Then
 MsgBox "This script needs a parameter!", vbExclamation
 WScript.Quit
End If

Set WshShell = WScript.CreateObject("WScript.Shell")
  ' objArgs(0) = Chemin du fichier d'output , 'objArgs (1) chemin du fichier d'input Ce que je cherche !!!
WshShell.Popup "Le pdf à été crée"  & vbcrlf & vbcrlf & _
 "Filename:" & vbtab & objArgs(0) & vbcrlf, 0 &
 

If MsgBox("Voulez vous supprimer le fichier source"& objArgs(1) &" ?",vbQuestion + vbYesNo + vbSystemModal + 0,"Suppression du fichier source") = vbYes Then

'instanciation
Set FSO = CreateObject("Scripting.FileSystemObject")
'Suppression du fichier
Set Ftxt = fso.GetFile(objArgs(1)) 'Fichier origine
Ftxt.delete
Else Wscript.Quit
End if

[\CODE]

Si quelqu'un peut m'aider !!!

e040098k · Answer

Désolé pour la mise en forme je pense que cela viens d'opera

[VBS] Script PDFCreator

1 réponse

Votre réponse

Discussions similaires