function rEnter(v) 
    rEnter = replace(replace(v, chr(10), ""), chr(13), "\n")
end function

function rString(v, f, r) 
    rString = replace(v, f, r)
end function