Length[DeleteFile/@FileNames["index.html","C:\\drorbn\\AcademicPensieve\\Album",2]]

folder="C:\\drorbn\\AcademicPensieve\\Album\\2023.05.22-25_Providence";
SetDirectory[folder];
(Interpretation[ImageResize[Import@#,400],#]->"")&/@FileNames["*.jpg"|"*.jpeg"|"*.png"|"*.mp4"]

{
"TitleNotes" -> "",
"ImageComments" ->{->"",->"",->"",->"",->"",->"",->"",->"",->"",->"Cantor and me!"}
}