Серый форум — AHK: Сколько названий подпапок заканчиваются конкретными буквами

Re: AHK: Сколько названий подпапок заканчиваются конкретными буквами

2020-08-04T20:08:04Z

teadrinker, спасибо теперь все работает.

Re: AHK: Сколько названий подпапок заканчиваются конкретными буквами

2020-08-04T19:03:53Z

plank1433 пишет:

Подсчитать нужно то - что находится внутри этих папок на 1-ом уровне вложенности

Тогда только так, наверно:

pd := tx := 0
Loop, Files, %A_ScriptDir%\*, D
{
   Loop, Files, %A_LoopFilePath%\*, D
   {
      lastThree := SubStr(A_LoopFileName, -2)
      if (lastThree = ".pd")
         pd++
      if (lastThree = ".tx")
         tx++
   }
}
MsgBox, pd: %pd%`ntx: %tx%

Re: AHK: Сколько названий подпапок заканчиваются конкретными буквами

2020-08-04T18:35:33Z

SuBrex, а как его поменять ?

Re: AHK: Сколько названий подпапок заканчиваются конкретными буквами

2020-08-04T18:28:14Z

plank1433
Так поменяйте путь.

Re: AHK: Сколько названий подпапок заканчиваются конкретными буквами

2020-08-04T17:12:00Z

teadrinker, спасибо
Но в этом случае - скрипт выводит - только количество папок, которые лежат рядом со скриптом.

Я может неправильно сформулировал вопрос.
Я спрашивал про подпапки этих папок, а не про сами папки.

Подсчитать нужно то - что находится внутри этих папок на 1-ом уровне вложенности (дальше не надо).

Re: AHK: Сколько названий подпапок заканчиваются конкретными буквами

2020-08-03T17:01:42Z

Про скорость не знаю, можно сравнить, если есть желание. Но в старом синтаксисе есть баг, который возникает, если паттерн это просто число. Тогда будет работать, как обычный Loop.

Re: AHK: Сколько названий подпапок заканчиваются конкретными буквами

2020-08-03T16:58:32Z

Интересно, изменился только синтаксис или скорость обработки повысили?

Re: AHK: Сколько названий подпапок заканчиваются конкретными буквами

2020-08-03T14:16:03Z

Alectric, ну если вы из 2008 пишете, тогда да, а так есть Loop, Files.

pd := tx := 0
Loop, Files, %A_ScriptDir%\*, D
{
   lastThree := SubStr(A_LoopFileName, -2)
   if (lastThree = ".pd")
      pd++
   if (lastThree = ".tx")
      tx++
}
MsgBox, pd: %pd%`ntx: %tx%

Re: AHK: Сколько названий подпапок заканчиваются конкретными буквами

2020-08-03T13:07:16Z

Loop,% a_scriptdir,2

AHK: Сколько названий подпапок заканчиваются конкретными буквами

2020-08-03T11:07:52Z

Доброго времени суток, форумчане.
У меня появился такой вопрос.
Помогите его решить.

Как при помощи ahk - проверить подпапки (1-го уровня вложенности) той папки где лежит скрипт - на предмет того сколько в них папок - заканчиваются буквами ".pd" а сколько буквами ".tx" ?
(И вывести результат msgbox)