Bonjour à tous,
Depuis ce matin, je dois modifier un vieux script VBS.
Le programme check le l'extension d'un fichier, si c un pdf il y a des instruction.  
Dans ces instruction je renomme ce fichier, si le fichier se renomme j'execute des instruction, s'il le renommage ne fonctionne pas je souhaite passer au tour de boucle suivant et donc au fichier suivant. Or, quand le renommage du premier fichier ne fonctionne pas il déplace quand même le premier, ensuite à la boucle suivante il renomme le deuxième fichier mais ne le déplace pas. Quand il peut renommer le premier mais pas le deuxieme, le programme fonctionne comme prévu, c'est à dire que le premier se déplace mais pas le deuxième. Et quand il peut renommer les deux fichiers, les deux déplacements fonctionnent parfaitement. J'aimerai avoir de l'aide à ce niveau svp. Cordialement
 Le code est le suivant :  
 
For Each objFichier In objDossier.Files
   if UCase(fso.GetExtensionName(objFichier.name)) = "PDF" then
      On Error Resume Next
       objFso.MoveFile importFolder & objFichier.name, importFolder & objFichier.name & ".temp"
        If Err.Number = 0 then
       INSTRUCTION
        End If
        On Error GoTo 0
   End If
Next