Добрый день.
Подскажите, пожалуйста, логику алгоритма подсчета количества файлов определенного типа в папке. Посчитать все файлы получается. А вот с указанным расширением ни как. Не могу понять принцип.
Подскажите, пожалуйста, логику алгоритма подсчета количества файлов определенного типа в папке. Посчитать все файлы получается. А вот с указанным расширением ни как. Не могу понять принцип.
Код |
---|
Dim X As Variant X = TextBox1.Text Set FSO = CreateObject("Scripting.FileSystemObject") Y = FSO.GetFolder(X).Files.Count MsgBox Y |