Скрипт Для Работы С Файлами

  • Автор темы GveinBlade
  • Дата начала
G

GveinBlade

#1
Коллеги, я на форуме натыкался на скрипт который поднимает файлы из папки(Windows), в массив для дальнейшего их удаления, кроме того скрипт поднимает имя каждого файла. Кто натыкался Скиньте ссылку, пожалуйста. Заранее Спасибо за помощь.
 

morpheus

скриптописец
07.08.2006
3 915
1
#2
GveinBlade
DIR$ + F1 там есть примеры
Код:
' List the contents of the c:\ directory, one entry per line.
Dim pathName As String, fileName As String
pathName$ = "c:\*.*"
fileName$ = Dir$(pathName$, 0)
Do While fileName$ <> ""
Print fileName$
fileName$ = Dir$()
Loop
 
G

GveinBlade

#5
Спасибо! Есть еще какие-нибудь топики или примеры на эту тему?
 
G

GveinBlade

#8
GveinBlade
а что вам собственно ещё необходимо?
Необходимо в каталоге(каталог известен) брать файлы из имени файла брать время создания и обрабатывать по порядку от более старых к более новым, после обработки удалить все файлы.
 

nvyush

Lotus team
22.04.2009
2 317
0
#9
из имени файла брать время создания
Это уже разбор строк, изучайте функции работы со строками (Instr, Mid и т.д.)
после обработки удалить все файлы
Можно по завершению обработки каждого файла
Код:
Kill fileName
Можно весь каталог (если создавать временный)
Код:
RmDir path
Можно все файлы из каталога
Shell("del путь\*.*") '(для винды, подробнее см. справку по del)