代码运行框制作方法-JS特效-爱易网页

代码运行框制作方法

日期：2014-05-18　浏览次数：20101 次

以下是程序代码

<SCRIPT>
function run_zzjs(obj)
{//欢迎来到站长特效网，我们的网址是www.zzjs.net，很好记，zz站长，js就是js特效，本站收集大量高质量js代码，还有许多广告代码下载。
  var TestWin=open('');
  TestWin.document.write(obj.value);
}
function runcode_copy(element)
{
 var codeobj = document.getElementById(element);
 var meintext = codeobj.value;
 try {
if (window.clipboardData)
  {
  // the IE-manier
  window.clipboardData.setData("Text", meintext);
  // waarschijnlijk niet de beste manier om Moz/NS te detecteren;
  // het is mij echter onbekend vanaf welke versie dit precies werkt:
  }
  else if (window.netscape)
  {
  // dit is belangrijk maar staat nergens duidelijk vermeld:
  // you have to sign the code to enable this, or see notes below
  netscape.security.PrivilegeManager.enablePrivilege('UniversalXPConnect');
  // maak een interface naar het clipboard
  var clip = Components.classes['@mozilla.org/widget/clipboard;1']
    .createInstance(Components.interfaces.nsIClipboard);
  if (!clip) return;
  // maak een transferable
  var trans = Components.classes['@mozilla.org/widget/transferable;1']
   .createInstance(Components.interfaces.nsITransferable);
  if (!trans) return;
  // specificeer wat voor soort data we op willen halen; text in dit geval
  trans.addDataFlavor('text/unicode');
  // om de data uit de transferable te halen hebben we 2 nieuwe objecten
  // nodig om het in op te slaan
  var str = new Object();
  var len = new Object();
  var str = Components.classes["@mozilla.org/supports-string;1"]
     .createInstance(Components.interfaces.nsISupportsString);
  var copytext=meintext;
  str.data=copytext;
  trans.setTransferData("text/unicode",str,copytext.length*2);
  var clipid=Components.interfaces.nsIClipboard;
  if (!clip) return false;
 //欢迎来到站长特效网，我们的网址是www.zzjs.net，很好记，zz站长，js就是js特效，本站收集大量高质量js代码，还有许多广告代码下载。
  clip.setData(trans,null,clipid.kGlobalClipboard);
//欢迎来到站长特效网，我们的网址是www.zzjs.net，很好记，zz站长，js就是js特效，本站收集大量高质量js代码，还有许多广告代码下载。
  }
 } catch (e) {alert('站长特效提示您因为安全策略的原因，此项功能已被您的浏览器禁止。关闭此窗口，然后按下“Ctrl+C”组合键完成复制。');  codeobj.focus();
 }
 codeobj.select();
   return false;
}
function myurl(){
var url;
var mytitle;
url=document.location;
mytitle = document.title;//标题
if(mytitle == null){
    var t_titles = document.getElementByTagName("title")
    if(t_titles && t_titles.length >0)
    {
       mytitle = t_titles[0];
    }else{
       kdocTitle = "";
    }
}
websiteinfo=mytitle+'  '+url;
document.getElementById("_www_zzjs_net").value = websiteinfo;
}
function copy_clip(copy){
if (window.clipboardData){
window.clipboardData.setData("Text", copy);}
else if (window.netscape){
//sky于2009年12月31号修改。
 try{
  netscape.security.PrivilegeManager.enablePrivilege('UniversalXPConnect');
  }
  catch (e) {
        alert("您已经取消操作！\n或者此操作被浏览器拒绝！解决方法如下：\n在浏览器地址栏输入“about:config”后回车\n将signed.applets.codebase_principal_support的值设置为'true',双击改变。");
                  }
var clip = Components.classes['@mozilla.org/widget/clipboard;1'].createInstance(Components.interfaces.nsIClipboard);
if (!clip) return;
var trans = Components.classes['@mozilla.org/widget/transferable;1'].createInstance(Components.interfaces.nsITransferable);
if (!trans) return;
trans.addDataFlavor('text/unicode');
var str = new Object();
var len = new Object();
var str = Components.classes["@mozilla.org/supports-string;1"].createInstance(Components.interfaces.nsISupportsString);
var copytext=copy;
str.data=copytext;
trans.setTransferData("text/unicode",str,copytext.length*2);
var clipid=Components.interfaces.nsIClipboard;
if (!clip) return false;
clip.setData(trans,null,clipid.kGlobalClipboard)</div></div>

<div class="clearfix"></div>
                    </div>
                    <nav aria-label="...">
                        <ul class="pager">
                            <li class="previous"><a href="4667">上一篇：狡猾的按钮特效</a></li>

<li class="next"><a href="2542">下一篇：在页面中点击鼠标实现插入字段效果</a></li>
                        </ul>
                    </nav>

<div class="alert alert-warning" role="alert">
                        <strong>免责声明：</strong> 本文仅代表作者个人观点，与爱易网无关。其原创性以及文中陈述文字和内容未经本站证实，对本文以及其中全部或者部分内容、文字的真实性、完整性、及时性本站不作任何保证或承诺，请读者仅作参考，并请自行核实相关内容。
                    </div>

<div class="col-md-6 col-xs-12">
                      <li class="articleAbout"><a href='/ItNews/34393' title='支付宝钱包支持医保移动缴费 广州成首个试点' target="_blank">
                        支付宝钱包支持医保移动缴费 广州成首个试点</a></li></div>
                   
                
                  <div class="col-md-6 col-xs-12">
                      <li class="articleAbout"><a href='/ItNews/34300' title='中移动将推出多项4G资费新政' target="_blank">
                        中移动将推出多项4G资费新政</a></li></div>
                   
                
                  <div class="col-md-6 col-xs-12">
                      <li class="articleAbout"><a href='/ItNews/34349' title='“合聚变”来了 UC优视确认并入阿里巴巴' target="_blank">
                        “合聚变”来了 UC优视确认并入阿里巴巴</a></li></div>
                   
                
                  <div class="col-md-6 col-xs-12">
                      <li class="articleAbout"><a href='/ItNews/34303' title='做大电影，阿里控股公司在港成立影业集团' target="_blank">
                        做大电影，阿里控股公司在港成立影业集团</a></li></div>
                   
                
                  <div class="col-md-6 col-xs-12">
                      <li class="articleAbout"><a href='/ItNews/34436' title='华为、小米和联想在中国手机市场上演“三国杀”' target="_blank">
                        华为、小米和联想在中国手机市场上演“三国杀”</a></li></div>
                   
                
                  <div class="col-md-6 col-xs-12">
                      <li class="articleAbout"><a href='/ItNews/16157' title='盘点改变社会的15种科技：谷歌眼镜将使我们成为半机械人' target="_blank">
                        盘点改变社会的15种科技：谷歌眼镜将使我们成为半机械人</a></li></div>
                   
                
                  <div class="col-md-6 col-xs-12">
                      <li class="articleAbout"><a href='/ItNews/34189' title='全球最具“颠覆性”特质的公司排行榜TOP25' target="_blank">
                        全球最具“颠覆性”特质的公司排行榜TOP25</a></li></div>
                   
                
                  <div class="col-md-6 col-xs-12">
                      <li class="articleAbout"><a href='/ItNews/34218' title='中国首台比特币ATM登陆上海 可购买不可兑换现钞' target="_blank">
                        中国首台比特币ATM登陆上海 可购买不可兑换现钞</a></li></div>
                   
                
                  <div class="col-md-6 col-xs-12">
                      <li class="articleAbout"><a href='/ItNews/34194' title='微软确认 Surface 计划更多尺寸和LTE 版本' target="_blank">
                        微软确认 Surface 计划更多尺寸和LTE 版本</a></li></div>
                   
                
        </ol>
    </div>
</div>

</div>

</div>
            </div>
            <div class="clearfix"></div>

<footer class=" footer navbar-bottom">
<em>友情链接：</em>
    
      <a href="http://www.aiyiweb.com/" target="_blank">爱易网 </a>            
    
      <a href="http://www.aiyiweb.com/" target="_blank">云虚拟主机技术 </a>            
    
      <a href="http://www.aiyiweb.com/" target="_blank">云服务器技术 </a>            
    
      <a href="http://www.aiyiweb.com/" target="_blank">程序设计技术 </a>            
    
      <a href="http://www.aiyiweb.com/" target="_blank">开发网站 </a>            
    
      <a href="http://www.aiyiweb.com/" target="_blank">APP开发教程 </a>            
    
<br />
<script type="text/javascript">(function(){document.write(unescape('%3Cdiv id="bdcs"%3E%3C/div%3E'));var bdcs = document.createElement('script');bdcs.type = 'text/javascript';bdcs.async = true;bdcs.src = 'http://znsv.baidu.com/customer_search/api/js?sid=15239353030108964139' + '&plate_url=' + encodeURIComponent(window.location.href) + '&t=' + Math.ceil(new Date()/3600000);var s = document.getElementsByTagName('script')[0];s.parentNode.insertBefore(bdcs, s);})();</script>

Copyright © 2013-2025 爱易网页 当前在线：666人　
        网站在22时39分9秒内访问总人数：218613人
    当前 10.52%
　<a href="https://beian.miit.gov.cn" target="_blank">粤ICP备18100884号-2 </a>
<script charset="UTF-8" id="LA_COLLECT" src="//sdk.51.la/js-sdk-pro.min.js"></script>
<script>LA.init({ id: "JszEmKrtpbU59dY5", ck: "JszEmKrtpbU59dY5" })</script>

</footer>

</div>
   
</body>
</html>