Temas

Hola a todos!!!
Quisiera pedirle ayuda con esto:
Necesito renombrar archivos con el nombre de la carpeta que los contiene, por ejemplo:

Ruta
c:\Tema1\foto1.jpg
c:\Tema2\foto2.jpg
c:\Tema3\foto3.jpg

Resultado:
c:\Tema1\Tema1_foto1.jpg
c:\Tema2\Tema2_foto2.jpg
c:\Tema3\Tema3_foto3.jpg

Desde ya, muchas gracias!