Problema con funcion llamada desde un bucle

[yz!]

Tengo una funcion a la que llamo desde el interior de un bucle y le envio una cadena del tipo:

Código HTML:

[I]Menús dinámicos, Selección de escenas, Comentarios en audio[/I]

La idea es que la función cambie el códiigo de la ñ, á, Á, é, É....
por las propias letras

Mi función:

Código HTML:

<%
function limpiar(str)
	str=Replace(str,"Ñ",Chr(209))
	str=Replace(str,"ñ",Chr(241))
	
	str=Replace(str,"Á",Chr(193))
	str=Replace(str,"á",Chr(225))
	str=Replace(str,"É",Chr(201))
	str=Replace(str,"é",Chr(233))
	str=Replace(str,"Í",Chr(205))
	str=Replace(str,"í",Chr(237))
	str=Replace(str,"Ó",Chr(211))
	str=Replace(str,"ó",Chr(243))
	str=Replace(str,"Ú",Chr(218))
	str=Replace(str,"ú",Chr(250))
	
	str=Replace(str,"&quot;",Chr(34))
	
	str=Replace(str,"“",Chr(40))
	str=Replace(str,"”",Chr(41))
	
	limpiar=str
end function
%> 

Pero a pesar de colocar mi funcion en lo alto de la página no funciona; sin embargo el código fuera de la fúncion va perfectamente.
¿Sabe alguién que le pasa?

Muchas gracias por vuestra ayuda

[yz!]

Por favor necesito ayuda!!!!!!!!!!!!!!!

[u_goldman]

no entiendo...si tu llamas a la función así, te devolverá lo mismo en el explorador:

Código:

Response.Write limpiar("áÉíÓú"Ñ")

Porque estás haciendo esto finalmente:

Código:

Response.Write chr(225) & chr(201) & chr(237) & chr(211) & chr(250) & chr(34) & chr(209)

A menos que lo que quieras sea desplegar el código?

Entonces la función debería devolver un string:

Código:

str=Replace(str,"Á","Chr(193)")

Es esto lo que quieres, si no disculpa, pero no entiendo

Salu2,