Серый форум — AHK: Не срабатывает ErrorLevel в цикле

Re: AHK: Не срабатывает ErrorLevel в цикле

null@example.com (Qp) — Fri, 07 Jul 2023 17:52:21 +0000

Разложит их все по папкам, создаст одну пустую, и закроется. Я ж говорю, корявенько. Но это стократ лучше ручного раскладывания пары тысяч файлов.

Re: AHK: Не срабатывает ErrorLevel в цикле

null@example.com (teadrinker) — Fri, 07 Jul 2023 15:04:24 +0000

Qp пишет:

if (aindex_2 < 10)
		ExitApp

А если число файлов в папке будет кратно 10?

Re: AHK: Не срабатывает ErrorLevel в цикле

null@example.com (Qp) — Fri, 07 Jul 2023 11:07:15 +0000

teadrinker пишет:

так как Loop, D:\wallpapers\*.* будет перебирать только существующие файлы, и остановится, когда они кончатся

Вот! С пониманием механизма пришло и решение:

1::
counter := 0

Loop
{
	counter++
	FileCreateDir, D:\test\%counter%
	Sleep, 500

	aindex_2 := 0
	Loop, D:\test\*.*
	{
		if (A_Index < 11)
			FileMove, %A_LoopFileLongPath%, D:\test\%counter%
			
		aindex_2 := A_Index
	}
	if (aindex_2 < 10)
		ExitApp
}
2::
return

Корявенькое, но работает.

Re: AHK: Не срабатывает ErrorLevel в цикле

null@example.com (teadrinker) — Fri, 07 Jul 2023 09:59:12 +0000

Тут ситуации отсутствия файла даже не возникнет, так как Loop, D:\wallpapers\*.* будет перебирать только существующие файлы, и остановится, когда они кончатся.

Re: AHK: Не срабатывает ErrorLevel в цикле

null@example.com (YMP) — Fri, 07 Jul 2023 08:44:30 +0000

Qp пишет:

В результате отсутствия файла, я полагал.

http://www.script-coding.com/AutoHotkey/FileMove.html

Однако, если источник - одиночный файл (не шаблон) и если он не существует, ErrorLevel устанавливается в 0. Чтобы отследить такую ситуацию, используйте IfExist или FileExist() для проверки существования файла-источника перед его перемещением.

Re: AHK: Не срабатывает ErrorLevel в цикле

null@example.com (Qp) — Fri, 07 Jul 2023 06:20:04 +0000

В результате отсутствия файла, я полагал.

Re: AHK: Не срабатывает ErrorLevel в цикле

null@example.com (teadrinker) — Fri, 07 Jul 2023 01:15:43 +0000

А в результате чего должен ErrorLevel появиться?

AHK: Не срабатывает ErrorLevel в цикле

null@example.com (Qp) — Thu, 06 Jul 2023 23:47:41 +0000

Здравствуйте!
Захотел раскидать файлы по подпапкам. С помощью Гугла и этого форума написал скрипт. Он отработал на отлично, но не остановился, когда должен был. Хотелось бы понять, на будущее.

;раскидывает файлы по подпапкам:
/*
в цикле - Loop
создаёт новую папку - FileCreateDir
задержка, чтобы успевало создавать папку - Sleep
выделяет - Loop http://forum.script-coding.com/viewtopic.php?id=13425
и перемещает 10 файлов с расширением в новую папку - FileMove
A_LoopFileLongPath - путь к файлу, ВКЛЮЧАЯ САМ ФАЙЛ
кончились файлы - ErrorLevel != 0
завершение скрипта - ExitApp */

1::
counter := 0

Loop
{
	counter++
	FileCreateDir, D:\wallpapers\%counter%
	Sleep, 500

	Loop, D:\wallpapers\*.*
		if A_Index < 11
			FileMove, %A_LoopFileLongPath%, D:\wallpapers\%counter%
		if (ErrorLevel != 0)	;НЕ РАБОТАЕТ! Шпарит, создаёт папки, когда файлы уже кончились!
			ExitApp
}

2::
return