Borrar todos los archivos de un directorio

[izar]

He puesto esto:

Dim backUp As Directory
backUp.Delete(Application.StartupPath & "\BACKUP\*.*")

Y me dice :caracteres no válidos en ña ruta de acceso

malditos asceriscos... jeje