Ошибка "User-defined type not defined"

@Soft17 · Регистрация: 15.01.2017

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

Ошибка "User-defined type not defined"

Как исправить?

Visual Basic

Public Sub Main()
    Dim fso As New Scripting.FileSystemObject
    
    FindFileInFolder fso.GetFolder("C:\Program Files\Far"), "*adm*.*"
End Sub
 
Private Sub FindFileInFolder(ff As Folder, sFile As String)
    Dim fo As Scripting.Folder, f As Scripting.File
 
    For Each f In ff.Files
        If f.Name Like sFile Then Debug.Print f.path
    Next f
    For Each fo In ff.SubFolders
        FindFileInFolder fo, sFile
    Next fo
End Sub

@FFPowerMan · 22.08.2019, 18:49

Что-то не припомню такого типа "Folder".

@FFPowerMan 2105 / 1192 / 496 Регистрация: 11.10.2018 Сообщений: 6,000
	22.08.2019, 18:49	2
	Сообщение было отмечено Soft17 как решение Решение Что-то не припомню такого типа "Folder". 1

Опции темы

Ошибка "User-defined type not defined"

Решение