replace

[eeeee]

Hola.
tengo una web en la que los usuarios pueden subir archivos, y he notado que muchos los suben con el nombre de esta forma:ElRioDorado
O sea sin espacios y la primera letra de cada palabra en mayuscula.

Mi pregunta es: ¿como haría un replace para que reeemplace la letra mayúscula con _ mas la letra mayuscula? para que quede asi: El_Rio_Dorado

Sería mas o menos esto:
fileName = replace(fileName,"Ubound","_Ubound")

Gracias