Страница 1 из 1
Как вывести в колонке часть пути, а не весь путь?
Добавлено: Чт дек 05, 2013 12:45
Ciber SLasH
Приветствую всех!
Подскажите пожалуйста, как вывести в колонку часть пути?
Задача: есть пути C:\Test\1\a; D:\Test\1\b
каким плагином/скриптом вырезать из пути по RegExp-у \w:\\Test\\1\\ и результат поместить в колонку?
Добавлено: Чт дек 05, 2013 13:45
MVV
Если нужно просто заменить букву диска на другую, можно и без плагинов: w[=tc.Путь:2-].
Добавлено: Чт дек 05, 2013 13:48
Ciber SLasH
Нет, нужно именно вырезать часть пути. Или вывести, к примеру, последние 20 символов из пути.
Добавлено: Чт дек 05, 2013 14:45
sa
Ciber SLasH писал(а):вывести, к примеру, последние 20 символов из пути
Может, так? [=tc.Путь:-21-]
Добавлено: Чт дек 05, 2013 14:46
Flasher
Ciber SLasH
Плагин так и называется Regexp (там же примеры в ini).
Добавлено: Чт дек 05, 2013 19:37
Ciber SLasH
sa
Благодарю! Тоже вариант.
Flasher
Плагин RegExp не получает полный путь файла, а только имя:
Добавлено: Чт дек 05, 2013 22:37
sa
Если нужно выделить 2-3 последние папки пути, то можно воспользоваться плагином filex:
[=filex.В подпапке папки]\[=filex.В подпапке]\[=filex.В папке]
Добавлено: Пт дек 06, 2013 09:01
Ciber SLasH
sa
FileX тоже пригодился.
В общем задачу решил: FileX + script
секция
[CustomFields] wincmd.ini:
Код: Выделить всё
Headers1=Путь (последние 3 каталога)\nПуть (без первых 3 каталогов)
Contents1=[=filex.GtGrandPaDir"\"][=filex.GrandPaDir"\"][=filex.ParentDir"\"]\n[=script.Result]
Options1=-1|1
Код: Выделить всё
[Script]
Section=getPartialPath
[getPartialPath]
Script=.\Scripts\getPartialPath.js
LongName=1
Код: Выделить всё
var depth = 3; // глубина вложенности каталогов в пути, которую нужно отбросить
var reg = new RegExp("^\\w:\\\\([^\\\\]+\\\\){"+depth+"}(.*)$");
var m = reg.exec(getPath(filename));
Content = "...\\"+m[m.length-1]+"\\";
////////////////////////////////////////////////////////////////////////////////
//==[ Funcs ]===================================================================
////////////////////////////////////////////////////////////////////////////////
//--[ Возвращает путь из полного имени файла ]----------------------------------
function getPath(fullName) {
return fullName.slice(0, fullName.lastIndexOf('\\'));
}
Пришлось переделывать, не везде JS-скрипт отрабатывал.
Переделал на VBS (т.к. объект WScript в JS не доступен - ругань на WScript.CreateObject):
Код: Выделить всё
Dim FSO, Path, depth, re, m, sm, ret
'Глубина вложенности каталогов в пути, которую нужно отбросить
depth = 3
Set FSO = CreateObject("Scripting.FileSystemObject")
Set re = New RegExp
re.Pattern = "^\w:\\([^\\]+\\){" & depth & "}(.*)$"
Path = Left(filename, InStrRev(filename, "\"))
Set m = re.Execute(Path)
ret = filename
If m.Count > 0 Then
Set sm = m(0)
If sm.SubMatches.Count > 0 Then
ret = "...\" & sm.SubMatches(sm.SubMatches.Count-1)
End If
End If
content = ret
Set FSO = Nothing
Set re = Nothing
Set m = Nothing
Set sm = Nothing
Добавлено: Пт дек 06, 2013 13:28
Flasher
Ciber SLasH писал(а):объект WScript в JS не доступен
Для этого есть
new ActiveXObject.
Добавлено: Сб дек 07, 2013 16:10
Serge Yolkin
Точно, причём сам WScript недоступен в script плагине и для VBS.