Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre questionsn = Wscript.ScriptName ' Script Name fn = Wscript.ScriptFullName ' Fully Qualified Script Name fp = Replace(fn, "" & sn, "")
monpath = Left(WScript.ScriptFullName,(Len(WScript.ScriptFullName) - (Len(WScript.ScriptName) + 1)))