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

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

{
"TitleNotes" -> "With Heather.",
"ImageComments" ->{->"",->"",->"",->"",->"",->"A public phone by Mike Salisbury, at the <a href=https://oenogallery.com/>Oeno Gallery</a>.",->"Turbulence by Terence McGlade, at the <a href=https://oenogallery.com/>Oeno Gallery</a>."}
}