Bueno lo solucione, aunque no se si es una chapuza lo que he echo y hay alguna otra forma mas idonea de hacerlo.
Lo que he echo es recoger el valor de rsprecio("precio") en otra variable distinta antes de usar el Replace(rsprecio("precio"),",",".").
Si se os ocurre algo mejor, gracias