Renommer un fichier à la volé

Commenter

Contenu du snippet

La fonction reçoit comme argument le chemin virtuel du fichier à renommer.
Exemple. Mon Dossier web est "www" mon fichier est dans images "www/images/"
donc :
RenommeFichier "images/toto.jpg", "images/toto2.jpg"
Attention : Si le fichier n'existe pas ça plante. Il faut vérifier son existence avant !!
bonne prog ! @+

Source / Exemple : 


Function RenommeFichier(AncienNom,NouveauNom)	
	Dim Myobj
	Set Myobj = Server.CreateObject("Scripting.FileSystemObject")
	Set ChopFichier = Myobj.GetFile(Server.MapPath(AncienNom))
	ChopFichier.Move(Server.MapPath(NouveauNom))
	Set Myobj = nothing
	Set ChopFichier = nothing
End Function

Conclusion :


Ce script est en réponse à salim. "renommé des fichiers à la volé"

A voir également

S'inscrire maintenant

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.

Du même auteur (VicoLaChips2)