按钮完成复制和剪切功能

/****************************************************************************** Crossday wangqi! Board - Common Modules for wangqi! Copyright 2001-2007 wangqi Inc. (http://www.wangqi.com) *******************************************************************************/

<SCRIPT language=JavaScript>
function copy(ob){
var obj=findObj(ob); if (obj) { 
obj.select();js=obj.createTextRange();js.execCommand("Copy");}
}
function cut(ob){
var obj=findObj(ob); if (obj) { 
obj.select();js=obj.createTextRange();js.execCommand("Cut");}
}
function findObj(n, d) { //v4.0
  var p,i,x;  if(!d) d=document; if((p=n.indexOf("?"))>0&&parent.frames.length) {
    d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);}
  if(!(x=d[n])&&d.all) x=d.all[n]; for (i=0;!x&&i<d.forms.length;i++) x=d.forms[i][n];
  for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=findObj(n,d.layers[i].document);
  if(!x && document.getElementById) x=document.getElementById(n); return x;
}
//-->
</SCRIPT>
<input type="button" name="Button" value="复制到剪贴板" onClick=copy('txtOutput')>
<input type="button" name="Button" value="剪贴到剪贴板" onClick=cut('txtOutput')>
    <br><form name="fom1" method="post" action="">
    <textarea name="txtOutput" rows="5" cols="50"> dfkghkldfghklsdjfhgklsdfhgklhsdfklghsdfklhj

提示：您可以先修改部分代码再运行

1、在IE、FF中测试，只在IE出现文字溢出现象。

说明：注释造成文字溢出是IE的BUG。