Formattare testo textarea

[mooug]

Dovrei far funzionare lo script onselect quando seleziono una parte nella textarea e fa apparire i tag prima e dopo come in questo forum, ma da errore:

Script

<script language="JavaScript">
 function formatta(sml) {
	var obj=document.mioform1.messaggio;
	if (document.all) {
		obj.focus();
	  	var sel=document.selection;
	  	var rng=sel.createRange();
	  	rng.colapse;
	  	rng.text=sml;
	} 
	else if(obj.selectionEnd){
		var lng=obj.textLength;
		var from=obj.selectionStart;
		var to=obj.selectionEnd;
		obj.value=obj.value.substring(0,from)+sml+obj.value.substring(to,lng)
	} 
	else obj.value+=sml;
	obj.focus();
}
</script>

Nella home, codice che quando clicco il pulsante-immagine mette a video i tag B

<img src="faccine/bold.gif" name="Img1" border="0" onclick="document.mioform1.messaggio.value+=''"></a>

Nel textarea:

<textarea  name="messaggio" onSelect="formatta(sml)"...