Поиск файла на определённом диске с созданием лога и завершением выполнения команды после его нахождения

@DarkJoker1992 · Регистрация: 19.02.2013

Студворк — интернет-сервис помощи студентам

Подскажите как найти файл на всём диске, я использовал такой код dir /b /s C:\name.txt >> log.txt
но он находит файл и идёт дальше искать =( а мне нужно что бы если нашол создал лог и закончил работу.
И ещё вопрос, каким кодом быстрее всего найти файл на компе? cmd или vbs?

@sov44 · 23.09.2014, 12:42

Bash
1
2
if /i exist "c:\name.txt" (>log.txt echo yes name.txt) else (echo not exist name.txt)
pause

@DarkJoker1992 · 23.09.2014, 13:25 **[ТС]**

не совсем то что мне нужно но близко,
нужно что бы искал на всём диске C. а когда находит останавливался и вписывал путь где находится файл в log.txt

Dragokas · 23.09.2014, 13:51

Сообщение от DarkJoker1992

cmd или vbs?

Близко.
Только на cmd нужно вручную писать рекурсивную функцию вместо использования ключа /s,
чтобы добиться той же скорости.

@DarkJoker1992 · 23.09.2014, 22:31 **[ТС]**

-_- ничё не понял. . . не могли бы вы мне скинуть рабочий код, Пожалуйста

Добавлено через 8 часов 28 минут
помогите с кодом пожалуйста

@R71MT · 23.09.2014, 22:40

Сообщение от DarkJoker1992

а мне нужно что бы если нашол создал лог и закончил работу.

...чё за бред! Раз ты дал поиск, то он должен отработать

Dragokas · 24.09.2014, 17:07

DarkJoker1992, у Вас учебная или практическая задача?

CMD:

Кликните здесь для просмотра всего текста

Bash
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
@echo off
Setlocal EnableExtensions
 
set StartFolder=C:
set mask=lib4758cca.*
 
call :rDir "%StartFolder%" "%mask%"
echo "%ret%"
pause
Goto :eof
 
:rDir
  ::echo "%~1"
  For /F "delims=" %%a in ('dir /b /a-d-l "%~1\%~2" 2^>NUL') do set "ret=%~1\%%a"& Exit /B 1
  For /F "delims=" %%a in ('dir /b /ad-l "%~1\*" 2^>NUL') do call :rDir "%~1\%%a" "%~2" || Exit /B 1
Exit /B

Если не предполагается использовать маску:
(иначе нужно еще регулярку добавлять)

VBSCRIPT:

Кликните здесь для просмотра всего текста

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
Option Explicit
Dim StartFolder, Target, oFSO, Root, Detected
 
StartFolder = "C:"
Target = "lib4758cca.so"
 
Set oFSO = CreateObject("Scripting.FileSystemObject")
Set Root = oFSO.GetFolder(StartFolder)
Detected = scanFolder (Root, Target)
WScript.Echo (Detected)
 
Function scanFolder(oFolder, Target)
    On Error Resume Next ' обход ошибок "Access Denied"
    Dim ret, oFile, oSubFolder
 
    If oFolder.Attributes And 1024 Then Exit Function 'проходим мимо симлинков
    
    For Each oFile In oFolder.Files
        If StrComp(oFile.Name, Target, 1) = 0 then scanFolder = oFile.Path: Exit Function
    Next
    For Each oSubFolder In oFolder.Subfolders
        scanFolder = scanFolder (oSubFolder, Target) 'рекурсия !!!
        if scanFolder <> vbNullString then Exit Function
    Next
End Function

Для очень больших массивов информации подойдет только LogParser.
Вот пример: https://www.cyberforum.ru/post4581376.html
В принципе можно сделать тоже инкрементно, подавая в SQL-запрос отдельно каждую из папок корня диска.
Еще луче почитать справку, возможно там уже есть опция останова при первом найденном совпадении.

Новые блоги и статьи Все статьи Все блоги /
Перемещение выделенных строк ТЧ из одного документа в другой Maks 30.03.2026 Реализация из решения ниже выполнена на примере нетипового документа "ВыдачаОборудованияНаСпецтехнику" с единственной табличной частью "ОборудованиеИКомплектующие" разработанного в конфигурации КА2. . . .	Functional First Web Framework Suave DevAlt 30.03.2026 Sauve. IO Апнулись до NET10. Из зависимостей один пакет, работает одинаково хорошо как в режиме проекта так и в интерактивном режиме. из сложностей - чисто функциональный подход. Решил. . .	Автоматическое создание документа при проведении другого документа Maks 29.03.2026 Реализация из решения ниже выполнена на нетиповых документах, разработанных в конфигурации КА2. Есть нетиповой документ "ЗаявкаНаРемонтСпецтехники" и нетиповой документ "ПланированиеСпецтехники". В. . .	Настройка движения справочника по регистру сведений Maks 29.03.2026 Решение ниже реализовано на примере нетипового справочника "ТарифыМобильнойСвязи" разработанного в конфигурации КА2, с целью учета корпоративной мобильной связи в коммерческом предприятии. . . .
Автозаполнение реквизита при выборе элемента справочника Maks 27.03.2026 Программный код из решения ниже на примере нетипового документа "ЗаявкаНаРемонтСпецтехники" разработанного в конфигурации КА2. При выборе "Спецтехники" (Тип Справочник. Спецтехника), заполняется. . .	Сумматор с применением элементов трёх состояний. Hrethgir 26.03.2026 Тут. https:/ / fips. ru/ EGD/ ab3c85c8-836d-4866-871b-c2f0c5d77fbc Первый документ красиво выглядит, но без схемы. Это конечно не даёт никаких плюсов автору, но тем не менее. . . всё может быть. . .	Автозаполнение реквизитов при создании документа Maks 26.03.2026 Программный код из решения ниже размещается в модуле объекта документа, в процедуре "ПриСозданииНаСервере". Алгоритм проверки заполнения реализован для исключения перезаписи значения реквизита,. . .	Команды формы и диалоговое окно Maks 26.03.2026 1. Команда формы "ЗаполнитьЗапчасти". Программный код из решения ниже на примере нетипового документа "ЗаявкаНаРемонтСпецтехники" разработанного в конфигурации КА2. В качестве источника данных. . .

@DarkJoker1992 148 / 4 / 0 Регистрация: 19.02.2013 Сообщений: 369

	Поиск файла на определённом диске с созданием лога и завершением выполнения команды после его нахождения 23.09.2014, 11:34. Показов 997. Ответов 6 Метки нет (Все метки) Подскажите как найти файл на всём диске, я использовал такой код dir /b /s C:\name.txt >> log.txt но он находит файл и идёт дальше искать =( а мне нужно что бы если нашол создал лог и закончил работу. И ещё вопрос, каким кодом быстрее всего найти файл на компе? cmd или vbs? 0

@DarkJoker1992 148 / 4 / 0 Регистрация: 19.02.2013 Сообщений: 369
	23.09.2014, 13:25 [ТС]
	не совсем то что мне нужно но близко, нужно что бы искал на всём диске C. а когда находит останавливался и вписывал путь где находится файл в log.txt 0

@DarkJoker1992 148 / 4 / 0 Регистрация: 19.02.2013 Сообщений: 369
	23.09.2014, 22:31 [ТС]
	-_- ничё не понял. . . не могли бы вы мне скинуть рабочий код, Пожалуйста Добавлено через 8 часов 28 минут помогите с кодом пожалуйста 0