运行代码，复制代码，保存代码

html代码:

 

<script src="ViewCode.js" type="text/javascript"></script>

<textarea id="runcode0" style="width: 600px; height: 260px;"><a href="#" onfocus="this.blur()">去掉点击链接时出现的虚线</a></textarea>

<br>

<input value="运行代码" id="0" onclick="runCode(this.id)" type="button">

&nbsp;

<input value="复制代码" id="0" onclick="doCopy(this.id)" type="button">

&nbsp;

<input value="保存代码" id="0" onclick="saveCode('runcode0','网页效果')" type="button">

 

ViewCode.js:

 

//获取对象

function $(id)

{

   if(document.getElementById)

   {

      return document.getElementById(id); 

   }

   else if(document.all)

   {

      return document.all[id];

   }

   else if(document.layers)

   {

      return document.layers[id];

   }

   else

   {

      return null;  

   }

}

//运行框操作

function createID(DivID)

{

   var objs=$(DivID).getElementsByTagName('textarea');

   var inps=$(DivID).getElementsByTagName('input');

   var buts=$(DivID).getElementsByTagName('button');

   var labs=$(DivID).getElementsByTagName('label');

   for(var i=0;i<objs.length;i++)

   {

      objs[i].id="runcode"+i;

      inps[i].id=i;

      buts[i].id=i;

      labs[i].id=i;

   }

}

function runCode(obj)

{

   var code=$("runcode"+obj).value;

   var newwin=window.open('','','');

   newwin.opener=null;

   newwin.document.write(code);

   newwin.document.close();

}

//复制代码

function doCopy(obj)

{

  if(document.all)

  {

     textRange=$("runcode"+obj).createTextRange();

     textRange.execCommand("Copy");

     alert("代码已经复制到剪切板");

  }

  else

  {

     alert("此功能只能在IE上有效/n/n请在文本域中用Ctrl+A选择再复制")

  }

}

//另存代码

function saveCode(obj,title)

{

   var winname=window.open('','','width=0,height=0,top=200,left=200px');

   winname.document.open('text/html','replace');

   winname.document.write($(obj).value);

   winname.document.execCommand('saveas','',title+'.html');

   winname.close();

}