怎样实现这个功能：怎样通过单机按钮 在文本框中的光标位置插入字符？？？？？？？

Question

<input name=a size=20 value=ABcd>
<input type=button value="当前光标的位置" onclick="getpos(a)">
<script type="text/javascript">
function getpos(obj)
{
    obj.focus();
    var r = document.selection.createRange();
    var i;
    var s = obj.value;
    r.collapse(false);
    r.setEndPoint("StartToStart", obj.createTextRange());
    i = r.text.length;
    obj.value = s.substr(0,i) + 'p' + s.substr(i,s.length);
};
</script>
插入"p"~~~