Выделить имя последней папки из полного пути
2009-11-30 07:09 Александр
Выделить имя последней папки из полного пути
Dim Names1 'массив имен обрабатываемых папок ВВОД ИСХОДНЫХ ДАННЫХ
Names1 = Array ("D:\Test","C:\Test2") 'перечислить имена архивируемых папок
Dim Names2(40) 'массив на 40 позиций хранящий имена конечных папок получателя архивных данных
Arhiv1="D:\Arh\" ' -указать место расположение архивов. Наличие и отсутствие слешей в \Arhiv1\ и \Names1 необходимо соблюсти в соответствии с образцом!
Dim WSHshell [...]