Una pregunta: ¿qué función tiene la línea que hay después de "On error"? Yo he quitado las tres líneas que hay dentro del control de errores y se ve de maravilla, es decir, el código quita estas tres líneas:
Código:
On error resume next
Response.Write Replace(Space(Nivel), " ", "----")
If Error.Number <> 0 Then Response.Write "<b>Acá esta ......
A ver qué tal.