J'essaie le fichier shell de Windows qui sera inséré dans le dossier où il va analyser le contenu des dossiers.Windows Shell - comment détecter l'emplacement actuel où le fichier script est placé?
Maintenant, je voudrais savoir comment puis-je détecter quel est le chemin actuel? c'est-à-dire l'emplacement où le fichier vbs est placé à l'aide de FileSystemObject?
Set objFSO = CreateObject ("Scripting.FileSystemObject")
Set objFS = CreateObject("Scripting.FileSystemObject")
WScript.Echo objFS.GetParentFolderName(WScript.ScriptFullName)
Vous pouvez obtenir ce à partir WScript.ScriptFullName. Supprimez simplement le nom de fichier de la fin (le bit après la dernière barre oblique inverse). J'utilise normalement JScript pour les scripts, mais IIBS VBScript a une fonction InStrRev qui vous aidera à trouver la dernière barre oblique inverse. Ou: Créez un objet File pour le chemin WScript.ScriptFullName, puis utilisez sa propriété ParentFolder. Quelque chose comme (non testé):
Dim objFSO
Dim objFile
Dim objFolder
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objFile = objFSO.GetFile(WScript.ScriptFullName)
Set objFolder = objFile.ParentFolder
Pour obtenir le chemin complet que sans l'extension que j'utilise Replace(WScript.ScriptFullName, WScript.ScriptName, "") pour résultat juste un filepath