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

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

{
"TitleNotes" -> "",
"ImageComments" ->{->"",->"",->"",->"",->"",->"",->"",->"",->"",->"",->"",->"",->"",->"",->"",->"",->"",->"",->"",->"",->"",->"Zsuzsi.",->"A cow wash?",->"",->"",->"",->"",->"",->"La raclette au fromage",->"",->""}
}