Je voudrais marquer une pause de quelques secondes afin que je puisse automatiquemet imprimer des fichiers et les supprimées, mon soucis est que si je ne marque pas de pause mes fichiers sont supprimés alors qu'il ne sont pas encore envoyé à l'impression, voici mon code :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17 Lancement de mes impressions. .... .... .... 'Pause le temps que les fichiers partent en impression sleep = 17000 set fs = Server.CreateObject("Scripting.FileSystemObject") Set ResumeDemFile=fs.GetFolder(CHEMIN_PDF &"\BonTravaux") For Each fileDelete in ResumeDemFile.Files set f=fs.GetFile(CHEMIN_PDF &"\BonTravaux\"& fileDelete.Name) f.Delete Next set f=nothing set fs=nothing
Partager