Single Post - Показывать имя файла расчлененным по колонкам

Total Commander
Форум поддержки пользователей Total Commander
Сайты: Все о Total Commander | Totalcmd.net | Ghisler.com | RU.TCKB

Rules

Search

FAQ

Memberlist

Usergroups

Profile

Single Post

Topic: Показывать имя файла расчлененным по колонкам

Author

Message

Lev

Posted: Thu May 06, 2010 16:20 Post subject:

Code:

'booksplit.vbs
'Script for Script Content Plugin
'(c)Lev Freidin, 2005
'http://www.totalcmd.net/plugring/script_wdx.html
'http://wincmd.ru/plugring/script_wdx.html

'Нарезка имён файлов типа [книги][сказки]Огниво[Андерсен].rar на части

Set re=New RegExp
re.Pattern="\[(.*)\]\[(.*)\](.*)\[(.*)\]"

If re.Test(filename) Then
Set t=re.Execute(filename)
content = t(0).Submatches(0)
content1 = t(0).Submatches(1)
content2 = t(0).Submatches(2)
content3 = t(0).Submatches(3)
End If
Set re=Nothing