c:\Resim klasöründe Kitap1 ile başlayan dosya sayısı

[hsayar]

Merhaba
c:\Resim klasöründe Kitap1 ile başlayan dosya sayısı nasıl tespit edilir?

 

[Ferhat Pazarçevirdi]

Merhabalar

Aşağıdaki kodu kullanabilirsiniz.

With Application.FileSearch
    .NewSearch
    .LookIn = "C:\Resim"
    .Filename = "Kitap1*.*"
    .FileType = msoFileTypeAllFiles
    .Execute
     MsgBox .FoundFiles.Count & " adet dosya bulunmuştur"
End With

 

[hsayar]

teşekkürler hocam.