[VB6] Conoscere numero di file in una directory

[oregon]

Usa il FileSystemObject ...

    Dim fso As Object
    Dim folder As Object
    
    Set fso = CreateObject("Scripting.Filesystemobject")
    Set folder = fso.GetFolder("D:\Temp")
    
    Print folder.Files.Count
    
    Set folder = Nothing
    Set fso = Nothing