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

代码运行框制作方法

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

以下是程序代码

<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/34159' title='为啥苹果定要出廉价iPhone？都是安卓逼的 ' target="_blank">
                        为啥苹果定要出廉价iPhone？都是安卓逼的 </a></li></div>
                   
                
                  <div class="col-md-6 col-xs-12">
                      <li class="articleAbout"><a href='/ItNews/34389' title='从雷军的“互联网七字诀”告诉你一个非妖魔化的小米' target="_blank">
                        从雷军的“互联网七字诀”告诉你一个非妖魔化的小米</a></li></div>
                   
                
                  <div class="col-md-6 col-xs-12">
                      <li class="articleAbout"><a href='/ItNews/34089' title='苹果iWatch或使用量产液态金属 将取代玻璃' target="_blank">
                        苹果iWatch或使用量产液态金属 将取代玻璃</a></li></div>
                   
                
                  <div class="col-md-6 col-xs-12">
                      <li class="articleAbout"><a href='/ItNews/16156' title='网曝富士康“二连跳” 疑因推静音模式' target="_blank">
                        网曝富士康“二连跳” 疑因推静音模式</a></li></div>
                   
                
                  <div class="col-md-6 col-xs-12">
                      <li class="articleAbout"><a href='/ItNews/10842' title='诺基亚仍是第二大手机商：功用机有利可图' target="_blank">
                        诺基亚仍是第二大手机商：功用机有利可图</a></li></div>
                   
                
                  <div class="col-md-6 col-xs-12">
                      <li class="articleAbout"><a href='/ItNews/34272' title='三大运营商合建铁塔公司真相:未涉及电信业重组' target="_blank">
                        三大运营商合建铁塔公司真相:未涉及电信业重组</a></li></div>
                   
                
                  <div class="col-md-6 col-xs-12">
                      <li class="articleAbout"><a href='/ItNews/34432' title='iPhone 6 Plus要召回是谣言' target="_blank">
                        iPhone 6 Plus要召回是谣言</a></li></div>
                   
                
                  <div class="col-md-6 col-xs-12">
                      <li class="articleAbout"><a href='/ItNews/34151' title='京东封杀财付通：终极目标是电商生态圈' target="_blank">
                        京东封杀财付通：终极目标是电商生态圈</a></li></div>
                   
                
                  <div class="col-md-6 col-xs-12">
                      <li class="articleAbout"><a href='/ItNews/440' title='中国联通困局：遭遇OTT宽带4G三大难题' target="_blank">
                        中国联通困局：遭遇OTT宽带4G三大难题</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 爱易网页 当前在线：376人　
        网站在1天3时21分40秒内访问总人数：191486人
    当前 8.30%
　<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>