[решено] Отсечение части переменной

proxy · Конфигурация компьютера

Код:

$test = 'C:\prog\test\help\'
$test = StringRegExpReplace($test, '(.+\\).+', '\1')

;~ Примеры:
$sPath = 'C:\prog\test\help\'
MsgBox(64, 'Результат', 'Было: ' & @TAB & $sPath & @CRLF & @CRLF & 'Стало: ' & @TAB & StringRegExpReplace($sPath, '(.+\\).+', '\1'))

$sPath = 'C:\prog\test'
MsgBox(64, 'Результат', 'Было: ' & @TAB & $sPath & @CRLF & @CRLF & 'Стало: ' & @TAB & StringRegExpReplace($sPath, '(.+\\).+', '\1'))

$sPath = 'C:\prog\'
MsgBox(64, 'Результат', 'Было: ' & @TAB & $sPath & @CRLF & @CRLF & 'Стало: ' & @TAB & StringRegExpReplace($sPath, '(.+\\).+', '\1'))