http://www.codesky.net/article/doc/201004/20100417043179.htm

下面这个是cnblogs的实现代码

复制代码 代码如下:

<script type="text/javascript"> 
function runCode(obj) { 
var winname = window.open('', "_blank", ''); 
winname.document.open('text/html', 'replace'); 
winname.document.write(obj.value); 
winname.document.close(); 
} 
</script> 
<textarea style="width: 80%" id="content" rows="10"> 
<script type="text/javascript"> 
alert("Got it!"); 
</script> 
</textarea><br/ /> 
<input type="button" value="run" onclick="runCode(document.getElementById('content'))"/> 

<script type="text/javascript">  function runCode(id) {      var myWin = window.open('', '_blank', '');      var t = document.getElementById(obj).value;      myWin.document.open('text/html', 'replace');      myWin.opener = null;      myWin.document.write(t);      myWin.document.close();  }  </script>  

源码爱好者

<script type="text/javascript"> 

function $(objname){return document.getElementById(objname);}
function runCode(objname) {
        var winname = window.open('', "_blank", '');
    var obj = $(objname);
        winname.document.open('text/html', 'replace');
    winname.opener = null // 防止代码对论谈页面修改
        winname.document.write(obj.value);
        winname.document.close();
}
function saveCode(objname){
        var winname = window.open('', '_blank', 'top=10000');
        winname.document.open('text/html', 'replace');
    var obj = $(objname);
        winname.document.write(obj.value);
        winname.document.execCommand('saveas','','code.htm');
        winname.close();
}

function oCopy(objname){
       var obj = $(objname);
       obj.select();
       js=obj.createTextRange();
       js.execCommand("Copy");
       alert("源码爱好者提示：代码已经被成功复制！");
}
</script>

<input type="button" name="Submit" value="运行代码" onclick="runCode('content')"/>
<input type="button" name="Submit3" value="全选代码" onclick="$('content').select();" />
<input type="button" name="Submit4" value="复制代码" onclick="oCopy('content')" />
<input type="button" name="Submit2" value="保存代码" onclick="saveCode('content')" />

阿里西西网页特效代码

<script type="text/javascript">   function Preview(obj)   {     var TestWin=open('');     TestWin.document.write(obj.value);   }   function copyCode(obj) {       var rng = document.body.createTextRange();       rng.moveToElementText(obj);       rng.scrollIntoView();       rng.select();       rng.execCommand("Copy");       rng.collapse(false);   }   function saveCode(obj) {       var winname = window.open('', '_blank', 'top=10000');       winname.document.open('text/html', 'replace');       winname.document.writeln(obj.value);       winname.document.execCommand('saveas','','homepage.yesky.com.htm');       winname.close();   }   </SCRIPT>  <div>  <TEXTAREA id=code2 style="WIDTH: 570px; HEIGHT: 244px" rows=15 cols=47>欢迎访问阿里西西网页特效频道<hr size="1" noshade="noshade" style="border:1px #cccccc dotted"/></TEXTAREA><BR><BUTTON onclick=Preview(code2)>运行代码</BUTTON><BUTTON onclick=copyCode(code2)>复制代码</BUTTON><BUTTON onclick=saveCode(code2)>另存代码</BUTTON>  </div>  

下面这个是 csdn下实现代码。

复制代码 代码如下:

<script type="text/javascript"><!--   function viewPage(html) {   var page = window.open('', '', '');   page.opener = null;   page.document.write(html);   page.document.close();   }   // --></script>   <a href="javascript:viewPage(document.getElementsByTagName('textarea')[0].value)">运行代码</a></p>   <p><textarea cols="83" rows="15" name="code" class="xhtml">   <script>   alert('脚本之家');   </script>   </textarea>