Eliminar Historial Web

[Gigatron]

Hola estoy intentando realizar una pequeña aplicación que elimina el historial de páginas Web. A priori, yo he realizado esto.

Private Sub eliminar_Click()
DirPath = "C:\Documents and Settings\CM\Configuración local\Historial"
On Error GoTo error
RmDir DirPath
Exit Sub
error: MsgBox Err.Description, vbExclamation, "Error"
End Sub

Con cualquier carpeta el código funciona, pero concretamente con "Historial" no funciona, supongo que no es una carpeta normal, o bien tiene algún tipo de restricción.

La cuestión es: ¿Alguien conoce alguna alternativa o solución?

De antemano, gracias.