Necesitas realmente automatizar esto?
Has intentado poniendo vista en detalle en la carpeta y agregando fecha de creación y moficación para luego ordenarlos? 

Saludos

Mira, esto te lo pongo fácil en vbs, ahora en batch.... 

set objfso = createobject("scripting.filesystemobject")
set imagefolder = objfso.getfolder("C:\Documents and Settings\novlucker\Mis documentos\Mis imágenes")
'en la linea de arriba, debes de cambiar la ruta por la ruta de tu carpeta
 
set imagenes = imagefolder.files
 
for each imagen in imagenes
 
if datediff("d", imagen.datelastmodified, now()) >7 then
	objfso.deletefile imagen.path
end if
 
next

Es un vbs, es decir, igual que un bat, pero con esa otra extensión, y aunque no lo manejes, creo que lo entenderás.

Saludos

[Modifico:] En caso de que quieras probarlo sin borrar nada, sustituye...

objfso.deletefile imagen.path

por

msgbox imagen.path

Y dado que te metes en un bucle que recorrerá cada imagen, y mostrará un mensaje en cada una de ellas, para terminar el script, mata el proceso wscript.exe