Sauvegarde pièces jointes et renommer le fichier [Résolu]

[grimgrim]

Bjr,

Sur un code de sauvegarde d'une pièce jointe d'un message arrivant, quel code dois je ajouter pour renommer le fichier et supprimer le fichier existant du même nom dans le répertoire destinataire

Merci

[bbil]

Tu n'est pas clair sur le nom que tu vas utiliser pour ta pièce jointe et sur ce qui te dit quel fichier remplacer ...


voir : La manipulation des fichiers en VBA

la fonction Delete pour effacer un fichier ..

la fonction Move pour le renommer, sachant que toi tu devrais pas avoir besoin de le renommer suffit de sauver avec le bon nom grâce à ton Attachemnt.SaveAs..

[grimgrim]

Bjr

j'ai mis le code

Code :

1
2
3
4
For Each Attachment In oItem.Attachments
         Attachment.SaveAsFile "D:\" & Attachment.FileName
         oFSO.movefile "D:\billet reduc.pdf", "D:\bille.pdf
next

"billet reduc.pdf" étant le fichier de ma pièce jointe

j'ai envoyé un mail avec la pièce jointe le fichier s'est bien sauvegardé dans le répertoire, arrivé sur la nouvelle ligne "ofso..." une fenêtre d'erreur s'ouvre "erreur d'excécution '424"
objet requis"

avez vous une idée ?

[bbil]

il faut créer un objet Filesystem Object...


mais pourquoi renommer le fichier ? pour quoi ne pas l'enregistrer directement avec le bon nom ?

D'ou viennent ces noms de fichiers:

Code :

1
2
"D:\billet reduc.pdf"
"D:\bille.pdf"

toujours les mêmes ?

si tu tiens à renommer un fichier voir l'instruction name

Code :

Name "D:\billet reduc.pdf" As "D:\bille.pdf"   ' Déplace et renomme le fichier.

[grimgrim]

Merci, cela fonctionne

En réalité, le nom du fichier de la pièce jointe varie et je ne suis pasdécideur de ce nom et de sa variation

Par contre, pour moi, j'ai besoin qu'il soit fixe puisque je l'attache dans Access

De ce fait, j'ai besoin d'effacer l'ancien et renommer le nouveau

Donc, ok pour renommer et pour supprimer le fichier

J'ai essayé

Code :

delete "bille.pdf"

mais cela ne fonctionne pas

[bbil]

Envoyé par bbil

mais pourquoi renommer le fichier ? pour quoi ne pas l'enregistrer directement avec le bon nom ?

Code :

Attachment.SaveAsFile "D:\billet.pdf"

[grimgrim]

Ah oui
C'est une bonne idée

Mais comment supprimer l'existant comme je l'explique
merci d'avance

[bbil]

Envoyé par grimgrim

Ah oui
C'est une bonne idée
...

et tu l'as essayé cette idée ?

[grimgrim]

merci

cela fonctionne très bien

[bbil]

l'instruction pour effacer un fichier en VB:

Code :

Kill pathname