Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Windows [игнор отключен] [закрыт для гостей] / (WHS) Как искать файлы / 2 сообщений из 2, страница 1 из 1
09.02.2007, 20:11:17
    #34320511
mr_max
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
(WHS) Как искать файлы
Как искать файлы с помощью средств whs???
THE TRUTH IS OUT THERE
...
Рейтинг: 0 / 0
10.02.2007, 18:37:41
    #34321304
--null--
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
(WHS) Как искать файлы
Как и в остальных средах программирования.

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
set fso=WScript.CreateObject("Scripting.FileSystemObject")
 
sub find_files(root_folder,filename)
    for each file in root_folder.files
	    if file.name = filename then
	     WScript.echo file.path 
    	    end if
    next
  set oSubFolders=root_folder.SubFolders
  for each i in oSubFolders
    set tmp_folder=fso.GetFolder(i)
    find_files tmp_folder, filename
  next
end sub

set fso=WScript.CreateObject("Scripting.FileSystemObject")
set rootFolder=fso.GetFolder("D:\ttt")

find_files rootFolder,"123.txt"
...
Рейтинг: 0 / 0
Форумы / Windows [игнор отключен] [закрыт для гостей] / (WHS) Как искать файлы / 2 сообщений из 2, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]