Volniy

|
Posted: Sat Nov 05, 2011 00:19 Post subject: |
|
|
Можно создать колонку в пользовательском наборе через Script Content Plugin. Навскидку:
Code: | '(c)Volniy, 2011
'Get last 4 digits 4 future sorting
'file12004.txt -> 2004
'file22011.txt -> 2011
'etc.
Dim fso, tmp
Set fso = CreateObject("Scripting.FileSystemObject")
tmp = LCase(fso.GetbaseName(filename))
content = Right(tmp,4) |
|
|