怎样从子窗口返回一个值到父窗口编辑框的光标处？

[newahd]

我用window.showModalDialog打开一个子窗口，这个子窗口需要计算一些结果然后将值返回填到父窗口编辑框的的光标处，代码应该怎样写呢？

父窗口文件：
a.asp
-------------------------------------------
<input type="button" name="reg1" value="上传图片" onclick="javascript:window.showModalDialog('pic.asp', '', 'dialogWidth:19em; dialogHeight:13em; status:0;help:0')">
<form method="POST" action="--WEBBOT-SELF--" name="form1">
<!--webbot bot="SaveResults" U-File="D:\www\test\19\_private\form_results.txt"
S-Format="TEXT/CSV" S-Label-Fields="TRUE" -->
<p><textarea rows="9" name="S1" cols="44" id="text"></textarea><input type="submit" value="提交" name="B1">
</form>
-------------------------------------------

假设要传“111”回父窗口的编辑框光标所在处，子窗口用什么代码写呢？

[newahd]

没人？？求高手横空出世

[myvicy]

<script   language=Javascript>
var insertend=true;
document.onclick=function(){if(event.srcElement.id!="insert"&&event.srcElement.id!="mytest")insertend=true;}
function   InsertText(charvalue){
	obj=document.getElementById("mytest")	
	if(event.srcElement.id=="insert"&&insertend==true)
		r=obj.createTextRange();
	else{
		obj.focus();
		r=document.selection.createRange();
	}
	r.text = r.text+charvalue;
}   
</script>
<input id="insert"   type="button"   value="按钮"   onclick="InsertText('33')"><br>   
<textarea   id="mytest"   rows="4"   cols="50" onFocus="insertend=false">   
光标位置插入字符光标位置插入字符光标位置插入字符光标位置插入字符光标位置插入字符
</textarea>  

这是个演示，改成你需要的代码，在pic.asp里调用本页的函数就可以了。