Modification du répertoire actuel d'un objet FileSystem

Question

Lors de l'utilisation d'un objet FileSystemObject, vous pouvez référencer le répertoire dans lequel le script a été exécuté en utilisant le chemin ".". Est-il possible de changer ce que le FileSystemObject pense être le répertoire courant afin que vous puissiez utiliser le "." syntaxe du chemin pour les autres répertoires?

Exemple:

Set fso = CreateObject("Scripting.FileSystemObject") 
Set f1 = fso.GetFolder(".") ' Returns the current directory 
Set f2 = fso.GetFolder(".\backup") ' Returns the "backup" directory under the current directory 

Comme exemple simplifié, est-il une méthode pour faire appel à FSO afin que le fso.GetFolder (« ») appel renvoie le répertoire de sauvegarde à la place?

Answer 1

Vous pouvez modifier le dossier de travail en cours pour votre script en utilisant la propriété WshShell.CurrentDirectory:

Dim oShell : Set oShell = CreateObject("WScript.Shell") 
oShell.CurrentDirectory = ".\backup" 

Et voici un Hey, Scripteur Guy! l'article sur le sujet: How Can I Change the Working Folder of a Script?

Answer 2

Pas en général.

Mais pourquoi ne pas trouver le dossier en cours et de le stocker:

Set fso = CreateObject("Scripting.FileSystemObject") 
currentPath = fso.GetAbsolutePathName(".")