Ветеран
Сообщения: 812 Благодарности: 353
Профиль | Отправить PM | Цитировать
#include <File.au3> $TestPath = @ScriptDir $iCount = 0 MsgBox(64, 0, $TestPath) While 1 $iCount -= 1 $TestPath = _PathFull($TestPath & '\..') MsgBox(64, $iCount, $TestPath) If StringLen($TestPath) < 3 Then ExitLoop WEnd
Отправлено: 11:42, 30-09-2011 | #2