自动运行代码

[Ctrl+A 全部选择 提示：你可先修改部分代码，再按运行]

<div align="center"><P align=center><TEXTAREA rows='12' cols='78' class='fm' id='code'><br>
--完整的HTML代码放这--
</TEXTAREA></P></div>
<INPUT onclick="runEx('code')" type="button" value="运行代码" style="cursor:hand"onFocus="this.blur()"> 
<input type="button" name="Submit" value="复制到剪贴板" onClick="cycode(code)" style="cursor:hand;95px" onFocus="this.blur()"> 
<input type="button" value="另存代码" onclick="svcode(code)" style="cursor:hand" onFocus="this.blur()">
<br>[Ctrl+A 全部选择 提示：你可先修改部分代码，再按运行]</div>
<script>
function runEx(cod) {
cod=document.all(cod)
var code=cod.value;
if (code!=""){
var newwin=window.open('','',''); //打开一个窗口并赋给变量newwin。
newwin.opener = null // 防止代码对页面修改
newwin.document.write(code); //向这个打开的窗口中写入代码code，这样就实现了运行代码功能。
newwin.document.close();
}
}
//复制文本域代码
function cycode(obj) {
var rng = document.body.createTextRange();
rng.moveToElementText(obj);
rng.scrollIntoView();
rng.select();
rng.execCommand("Copy");
window.status="高亮度包含的代码已被复制到剪贴板！Contents highlighted and copied to clipboard!"
setTimeout("window.status=''",1800)
rng.collapse(false);
}
//另存代码
function svcode(obj) {
var winname = window.open('', '_blank', 'top=10000');
winname.document.open('text/html', 'replace');
winname.document.writeln(obj.value);
winname.document.execCommand('saveas','','code.htm');
winname.close();
}
</script>