Выявление пробелов в последовательности файлов

[cojoc]

Помогите пожалуйста со скриптом, который показывал бы, каких имён не достаёт в закономерной последовательности в именах файлов.
Пример:
0.jpg
1.jpg
2.jpg
4.jpg
6.jpg

Результат работы скрипта (желательно сохранённый в текстовом файле):
3.jpg
5.jpg

Понимаю, что закономерность может быть сложной, мне достаточно только самой простой с числами. У меня есть много отдельных страниц книги по одной (>600), хотелось бы узнать все ли страницы есть.

[Flasher]

Файлы выбираются или нет?

[cojoc]

Из выделенных файлов.
Возможно это слишком объёмный труд для скрипта.

[Flasher]

cojoc
Я предлагаю установку курсора на последнем файле.
А зачем тут файл с именами? Не лучше просто номера собрать через запятую или пробел?

[cojoc]

В файл потому что их может быть много - всех не запомнить и чтобы потом можно было вернуться к списку недостающих.

[Flasher]

Так пойдёт?

Код: Выделить всё

'===================================================
' Найти отсутствующие файлы по нумерации №.ext
' при установке курсора на файле с последним номером

' Условие: путь запуска - пустой
' Параметр: %N
'===================================================
CD = CreateObject("WScript.Shell").CurrentDirectory
List = "List.txt" : F = WScript.Arguments(0)
With CreateObject("Scripting.FileSystemObject")
  Ext = .GetExtensionName(F)
  For i = 0 to .GetBaseName(F)
    Name = i & "." & Ext
    If Not .FileExists(Name) Then S = S & vbNewLine & Name
  Next : .CreateTextFile(List,1,True).Write Mid(S, 3)
End With : CreateObject("Shell.Application").Open(CD & "\" & List)

[Вахмурка]

http://powerpro.wincmd.ru/Scripts/CheckCounter.htm

[cojoc]

Flasher
Супер! Спасибо большое Flasher, работает шустро
Вахмурка Спасибо за альтернативу.

[sa]

Попытка уместить в кнопку:

Код: Выделить всё

TOTALCMD#BAR#DATA
%comspec% /c del Список.txt & for /L %# in (1,1,
100 ) do if not exist %%#.jpg echo %%#.jpg>> Список.txt
WCMICONS.DLL,79
Список пропущенных среди 100 страниц

1
-1

Если число страниц требуется менять часто, можно вместо числа страниц поставить знак вопроса и вводить его каждый раз при вызове кнопки (нажать HOME, число и ENTER).
Для проверки, начиная с нулевой страницы, надо in (1 на in (0 заменить.