Fucntion to open link in new window

function ecrit_detail(txt)
    txt=replace(txt,"<a href", "<a target='_blank' href")
    ecrit_detail = txt
end function