Discussion :

[Micki]

Bonjour,
J'ai développé un petit programe qui scanne une ou plusieurs pages et qui crée 2 fichiers ( 1 fichier text et un fichier multi tif ).
J'utilise un objet image pour visualiser les pages. Que j'appel "image.tif"
Je renome ensuite cette image pour que son nom contienne la date et l'heure.

C'est avec la fonction

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Name Oldname As Newname

que j'ai un probleme.
Je ne sais pour quelle raison, son fonctionnement est hasardeux. un coups elle fonctionne , un coups elle fonctionne pas et me retourne une

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
Erreur d'exécution '5':
Argument ou apple de procédure incorrect

La syntax est pourtant bonne, j'ai verifié des dixaines de fois !

Quelqun aurait une idée d'ou cela vient ou alors une autre façon de renomer ce fichier ?
Merci.

[cafeine]

essaie avec ça ...

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
Function RenameFile(ByVal OldFic As String, ByVal NewFic As String)
 
Dim fso As New FileSystemObject
 
fso.MoveFile OldFic, NewFic
 
Set fso = Nothing
 
End Function

[Micki]

Super

un grand merci à toi

J'ai du modifier un petit truc mais ca fonctionne

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
 
Function RenameFile(ByVal OldFic As String, ByVal NewFic As String) 
 
[b]Set fso = CreateObjet("Scripting. FileSystemObject ")[/b]
 
fso.MoveFile OldFic, NewFic 
 
Set fso = Nothing 
 
End Function

[souma12]

bonjour
je vouderais renommer un fichier.tif en fichier.xml .
comment faire ??
renameTo ne marche pas dans le cas oû il faut renommer que la derniere partie (.tif en .xml ) en gardant le même contenu du fichier !!


merci de m aider.