Probleme selection texte

Bonjour,

Ma fonction ne fonctionne pas alors que c'est un quasi copier coller d'une fonction CCM ( insertTag() )

Je vous montre le code :

function insertTag(tag) {
var _af=document.getElementById('commentaires');
if(navigator.appName == "Microsoft Internet Explorer") {
var str=document.selection.createRange().text;

alert(str);

_af.focus();
var sel=document.selection.createRange();
sel.text="["+tag+"]"+str+"/"+tag+"";
return;
}
else {
oldPos=_af.scrollTop;
oldHght=_af.scrollHeight;
pos=_af.selectionEnd+Tag.length+_ad.length;
_af.value=_af.value.substr(0,_af.selectionStart)+"["+tag+"]"+_af.value.substr(_af.selectionStart,_af.selectionEnd-_af.selectionStart)+"/"+tag+""+_af.value.substr(_af.selectionEnd);
_af.selectionStart=pos;
_af.selectionEnd=pos;
newHght=_af.scrollHeight-oldHght;
_af.scrollTop=oldPos+newHght;
}
_af.focus();
}


<table border="0" cellpadding="0" cellspacing="0" class="barre_boutons" height="20px">
<tr>
<td align="center" width="20px"><div class="bouton_out" width="100%"
onMouseOver="this.className='bouton_over'"
onMouseOut="this.className='bouton_out'"
onClick="insertTag('g')" title="Gras">G</div></td>
<td align="center" width="20px"><div class="bouton_out" width="100%"
onMouseOver="this.className='bouton_over'"
onMouseOut="this.className='bouton_out'"
onClick="insertTag('i')" title="Italic"><i>I</i></div></td>
<td align="center" width="20px"><div class="bouton_out" width="100%"
onMouseOver="this.className='bouton_over'"
onMouseOut="this.className='bouton_out'"
onClick="insertTag('u')" title="Souligné"><u>U</u></div></td>
</tr>
</table>

Les tags sont bien ajoutés mais n'entourent pas ma selection
Le alert que j'ai placé est vide quand il s'affiche... Je ne comprend rien ...

A l'aide ....

Merci