Renommer un fichier en vbs [Résolu]

cs_islamway 24 Messages postés samedi 6 mai 2006Date d'inscription 23 décembre 2010 Dernière intervention - 10 déc. 2010 à 10:11 - Dernière réponse : moons17 2 Messages postés vendredi 17 février 2012Date d'inscription 20 octobre 2015 Dernière intervention
- 17 févr. 2012 à 14:45
Salut,

Je souhaite avoir la commande pour renommer un fichier en vbs.
en effet, j'ai trouvé celle qui permet de renommer un dossier mais pour un fichier ça marche pas.

Merci.
Afficher la suite 

6 réponses

Répondre au sujet
Renfield 17307 Messages postés mercredi 2 janvier 2002Date d'inscription 18 janvier 2017 Dernière intervention - 10 déc. 2010 à 10:40
+3
Utile
Faire un Move...

http://msdn.microsoft.com/en-us/library/kxtftw67(v=VS.85).aspx

Renfield - Admin CodeS-SourceS - MVP Visual Basic & Spécialiste des RegExp
Cette réponse vous a-t-elle aidé ?  
Commenter la réponse de Renfield
lediablo 215 Messages postés mercredi 26 avril 2006Date d'inscription 2 août 2012 Dernière intervention - 10 déc. 2010 à 10:43
+3
Utile
bonjour

voici un exemple


Quand on pose une question on est con 5 minutes,Quand on ne la pose pas on le reste toute sa vie (mon site)
Cette réponse vous a-t-elle aidé ?  
Commenter la réponse de lediablo
Renfield 17307 Messages postés mercredi 2 janvier 2002Date d'inscription 18 janvier 2017 Dernière intervention - 10 déc. 2010 à 10:48
+1
Utile
dommage de faire intervenir WMI la dedans, deja que FSO est lent, je trouve...

pas compris l'utilisation de Move, et ben...

l'exemple est pourtant clair :

With CreateObject("Scripting.FileSystemObject")
   .MoveFile "c:\tmp\Ancien Nom.txt", "c:\tmp\Nouveau nom.txt"
End With


Y'a pas plus simple, franchement....


Renfield - Admin CodeS-SourceS - MVP Visual Basic & Spécialiste des RegExp
Commenter la réponse de Renfield
moons17 2 Messages postés vendredi 17 février 2012Date d'inscription 20 octobre 2015 Dernière intervention - 17 févr. 2012 à 14:45
+1
Utile
l'astuce est bonne , une solution simple est de modifier l'attribe name de l'objet Getfile

Set oFile = objFSO.GetFile(FullFile)
RetDate=UniversalDate() '* fonction de chrondatage
wscript.echo oFile.name
NewName ="_"&RetDate(0) &"_" & oFile.name
wscript.echo NewName
ofile.name=NewName
Commenter la réponse de moons17
cs_islamway 24 Messages postés samedi 6 mai 2006Date d'inscription 23 décembre 2010 Dernière intervention - 10 déc. 2010 à 10:44
0
Utile
Merci pour votre réponse.
Mais franchement j'ai pas compris l'utilisation du Move.
toutefois, j'ai trouvé le code suivant:

strComputer = "."
Set objWMIService = GetObject _
("winmgmts:" & "!\" & strComputer & "\root\cimv2")
Set colFiles = objWMIService.ExecQuery _
("Select * from Cim_Datafile where Name = " _
& "'c:\\scripts\\toggle_service.vbs'")
For Each objFile in colFiles
errResult = objFile.Rename("c:\scripts\toggle_service.old")
Wscript.Echo errResult
Next
Commenter la réponse de cs_islamway
cs_islamway 24 Messages postés samedi 6 mai 2006Date d'inscription 23 décembre 2010 Dernière intervention - 10 déc. 2010 à 10:48
0
Utile
Merci infiniment:D
Commenter la réponse de cs_islamway

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.