最新更新 sitemap 网站制作设计本站搜索
网页设计
国外网站 韩国网站 个人主页 手提袋设计 CSS 网页特效 平面设计 网站设计 Flash CMS技巧 服装网站 php教程 photoshop 画册 服务器选用 数据库 Office
虚拟主机 域名注册 云主机 网页设计 客服QQ:8208442
当前位置:首页 > 网站综合 > CMS系统技巧

如何给zblog加上运行代码功能技巧

日期:09-24    来源:中国设计秀    作者:cnwebshow.com

 xHy中国设计秀

如何给zblog加上运行代码功能技巧,给zblog添加上“运行代码”的功能,这是“密陀僧”修改z-blog源码,给z-bog增添的新功能。这个方法出来很久了,我现在才加上还不晚吧,因为以后可能要贴出一些与时间相关的代码,所以用上这个“运行代码”的功能,是最为方便的了。xHy中国设计秀

下面转一下方法,相关讨论参见“z-blog论坛”。如果你按如下步骤设置完毕,调用这个功能的方法是,在文章编辑区中加入" [ code ]  你的代码 [ /code ]",因为这是是演示,所以“中括号”与code之间留了空格,你实际用的时候,请去掉空格。xHy中国设计秀

这个调用方法,是在请教Visc之后,才知道的,有时离成功就差这一步,在此感谢Visc的指点。xHy中国设计秀

1、在script/common.js里面增加xHy中国设计秀

//*********************************************************xHy中国设计秀
// 目的: 代码运行框xHy中国设计秀
// 输入: objxHy中国设计秀
// 返回: xHy中国设计秀
//*********************************************************xHy中国设计秀
function copycode(obj) {xHy中国设计秀
var rng = document.body.createTextRange();xHy中国设计秀
var obj1=document.getElementById(obj)xHy中国设计秀
rng.moveToElementText(obj1);xHy中国设计秀
rng.scrollIntoView();xHy中国设计秀
rng.select();xHy中国设计秀
rng.execCommand("Copy");xHy中国设计秀
rng.collapse(false);xHy中国设计秀
}xHy中国设计秀
xHy中国设计秀
function runCode(obj) {xHy中国设计秀
var winname = window.open('', "_blank", '');xHy中国设计秀
   var obj1=document.getElementById(obj)xHy中国设计秀
winname.document.open('text/html', 'replace');xHy中国设计秀
    winname.opener = null // 防止恶意修改xHy中国设计秀
winname.document.writeln(obj1.value);xHy中国设计秀
winname.document.close();xHy中国设计秀
}xHy中国设计秀
function saveCode(obj) {xHy中国设计秀
var winname = window.open('', '_blank', 'top=10000');xHy中国设计秀
   var obj1=document.getElementById(obj)xHy中国设计秀
winname.document.open('text/html', 'replace');xHy中国设计秀
winname.document.writeln(obj1.value);xHy中国设计秀
winname.document.execCommand('saveas','','code.htm');xHy中国设计秀
winname.close();xHy中国设计秀
}xHy中国设计秀

xHy中国设计秀
2、func/c_function.asp,查找Function TransferHTML(source,para),把 xHy中国设计秀

If Instr(para,"[space]")>0 Then source=Replace(source," "," ")xHy中国设计秀

注释掉。xHy中国设计秀
xHy中国设计秀
找到xHy中国设计秀

objRegExp.Pattern="([CODE])(.+?)([/CODE])"xHy中国设计秀
      strContent=objRegExp.Replace(strContent,"<textarea class=""code"" name=""runcode0"" rows=""10"" cols=""50"">$2</textarea>")xHy中国设计秀

修改为xHy中国设计秀

Dim codeNum,rndStrxHy中国设计秀
xHy中国设计秀
codeNum=0xHy中国设计秀
RandomizexHy中国设计秀
rndStr=int(rnd*100)xHy中国设计秀
  xHy中国设计秀
strContent=objRegExp.Replace(strContent,"<textarea class=""code"" name=""code"&rndStr&codeNum&""" id=""code"&rndStr&codeNum&""" rows=""10"" cols=""50"">$2</textarea><br /><input type=""button"" value=""运行代码"" onclick=""runCode('code"&rndStr&codeNum&"')""> <input type=""button"" value=""复制代码"" onclick=""copycode('code"&rndStr&codeNum&"')""> <input type=""button"" value=""另存代码"" onclick=""saveCode('code"&rndStr&codeNum&"')""> 提示:您可以先修改部分代码再运行")xHy中国设计秀
codeNum=codeNum+1xHy中国设计秀

xHy中国设计秀
关于这个rndStr,可以用文章id代替。但是可能产生重复代码框id。保险起见,还是使用了随机函数。xHy中国设计秀
xHy中国设计秀
3、重建所有页面。xHy中国设计秀
 xHy中国设计秀

4、最后,试一下效果,因为在“可视编辑”状态中,编辑器不知给代码做了什么处理,导致不能运行,所以建议一些复杂代码,还是用“UBB编辑”保险。xHy中国设计秀

javascript 能获得汉字拼音的第一个字母 xHy中国设计秀

xHy中国设计秀
提示:您可以先修改部分代码再运行xHy中国设计秀

本文引用地址:/site/article_63695.html
网站地图 | 关于我们 | 联系我们 | 网站建设 | 广告服务 | 版权声明 | 免责声明