Hola
Realmente no lo se, yo normalmente inserto datos utilizando la sentencia SQL INSERT INTO, pero supongo que funcionara poniendo
Código:
DE1.rsDisco.Fields("precio_disco") =Replace(txtprecio.Text, ",", ".")
Haz la prueba y comenta como fue el resultado.
--Saludos--