aktueller Pfad:

       Local $sCurrentPath        = @ScriptDir

 

1. Methode:

while StringInStr($sCurrentPath,"\",0,1)

       $sCurrentPath = StringTrimLeft($sCurrentPath,StringInStr($sCurrentPath,"\",0,1))

WEnd

MsgBox(0,"DEBUG -1-","@ScriptDir: " & @ScriptDir & @CRLF & "current Dir: " & $sCurrentPath, 10)

 

 

2. Methode:

#include <Array.au3>

$aDirectory = StringSplit(@ScriptDir,"\")

; _ArrayDisplay($aDirectory, "aktuelles Verzeichnis")

$sDir = $aDirectory[$aDirectory[0]]

MsgBox(0,"DEBUG -2-","@ScriptDir: " & @ScriptDir & @CRLF & "current Dir: " & $sDir, 10)