蝙蝠岛资源网 Design By www.hbtsch.com
用的时候把runcode.js放到网站目录,在需要运行代码的效果的地方放如下的代码
复制代码 代码如下:
<div style="margin-top: 1em; margin-bottom: 1em"><div style="display:none">{1}</div><textarea rows="12" cols="95" style='font-family:"Courier New",Courier,monospace;'></textarea><script src="/UploadFiles/2021-04-02/runcode.js">
就可以了。
runcode.js文件
复制代码 代码如下:
//Scripts runcode for BBS ver 2008-06-30, by Bound0(bound0@veryhman.com)
//First published at http://bbs.blueidea.com
//An example: http://bbs.veryhman.com/showtopic-20094.aspx
function runCode(which) {
var p=which.parentNode;
var os=p.getElementsByTagName("textarea");
if(os.length==0)return;
var o=os[0];
var winname = window.open('', "_blank", '');
winname.document.open('text/html', 'replace');
winname.opener = null;
winname.document.write(o.value);
winname.document.close();
}
function saveCode(which) {
var p=which.parentNode;
var os=p.getElementsByTagName("textarea");
if(os.length==0)return;
var o=os[0];
var winname = window.open('', '_blank', 'top=10000');
winname.document.open('text/html', 'replace');
winname.document.write(o.value);
winname.document.execCommand('saveas','','code.htm');
winname.close();
}
function copycode(which) {
var p=which.parentNode;
var os=p.getElementsByTagName("textarea");
if(os.length==0)return;
var o=os[0];
var is_ie = (userAgent.indexOf('msie') != -1 && !is_opera) && userAgent.substr(userAgent.indexOf('msie') + 5, 3);
if(is_ie && o.style.display != 'none') {
var rng = document.body.createTextRange();
rng.moveToElementText(o);
rng.scrollIntoView();
rng.select();
rng.execCommand("Copy");
rng.collapse(false);
}
}
function text(e)
{
var t = "";
e = e.childNodes || e;
for ( var j = 0; j < e.length; j++ )
{
if(e[j].nodeType != 1){t+=e[j].nodeValue}
else
{
var k=e[j].nodeName;
if(k=='BR'||k=='P'){t+='\r\n'}
t+=text(e[j].childNodes)
}
}
return t;
}
function preCode(which) {
var p=which.parentNode;
var os=p.getElementsByTagName("textarea");
if(os.length==0)return;
var o=os[0];
var osv=p.getElementsByTagName("div");
if(osv.length==0)return;
var ov=osv[0];
var c=''
if(typeof(ov.innerText)!="undefined"){c=ov.innerText}else{c=text(ov)}
o.value=c
}
(function(){var s=document.getElementsByTagName("script");preCode(s[s.length-1])})()
复制代码 代码如下:
<div style="margin-top: 1em; margin-bottom: 1em"><div style="display:none">{1}</div><textarea rows="12" cols="95" style='font-family:"Courier New",Courier,monospace;'></textarea><script src="/UploadFiles/2021-04-02/runcode.js">
就可以了。
runcode.js文件
复制代码 代码如下:
//Scripts runcode for BBS ver 2008-06-30, by Bound0(bound0@veryhman.com)
//First published at http://bbs.blueidea.com
//An example: http://bbs.veryhman.com/showtopic-20094.aspx
function runCode(which) {
var p=which.parentNode;
var os=p.getElementsByTagName("textarea");
if(os.length==0)return;
var o=os[0];
var winname = window.open('', "_blank", '');
winname.document.open('text/html', 'replace');
winname.opener = null;
winname.document.write(o.value);
winname.document.close();
}
function saveCode(which) {
var p=which.parentNode;
var os=p.getElementsByTagName("textarea");
if(os.length==0)return;
var o=os[0];
var winname = window.open('', '_blank', 'top=10000');
winname.document.open('text/html', 'replace');
winname.document.write(o.value);
winname.document.execCommand('saveas','','code.htm');
winname.close();
}
function copycode(which) {
var p=which.parentNode;
var os=p.getElementsByTagName("textarea");
if(os.length==0)return;
var o=os[0];
var is_ie = (userAgent.indexOf('msie') != -1 && !is_opera) && userAgent.substr(userAgent.indexOf('msie') + 5, 3);
if(is_ie && o.style.display != 'none') {
var rng = document.body.createTextRange();
rng.moveToElementText(o);
rng.scrollIntoView();
rng.select();
rng.execCommand("Copy");
rng.collapse(false);
}
}
function text(e)
{
var t = "";
e = e.childNodes || e;
for ( var j = 0; j < e.length; j++ )
{
if(e[j].nodeType != 1){t+=e[j].nodeValue}
else
{
var k=e[j].nodeName;
if(k=='BR'||k=='P'){t+='\r\n'}
t+=text(e[j].childNodes)
}
}
return t;
}
function preCode(which) {
var p=which.parentNode;
var os=p.getElementsByTagName("textarea");
if(os.length==0)return;
var o=os[0];
var osv=p.getElementsByTagName("div");
if(osv.length==0)return;
var ov=osv[0];
var c=''
if(typeof(ov.innerText)!="undefined"){c=ov.innerText}else{c=text(ov)}
o.value=c
}
(function(){var s=document.getElementsByTagName("script");preCode(s[s.length-1])})()
标签:
js,运行代码
蝙蝠岛资源网 Design By www.hbtsch.com
广告合作:本站广告合作请联系QQ:858582 申请时备注:广告合作(否则不回)
免责声明:本站文章均来自网站采集或用户投稿,网站不提供任何软件下载或自行开发的软件! 如有用户或公司发现本站内容信息存在侵权行为,请邮件告知! 858582#qq.com
免责声明:本站文章均来自网站采集或用户投稿,网站不提供任何软件下载或自行开发的软件! 如有用户或公司发现本站内容信息存在侵权行为,请邮件告知! 858582#qq.com
蝙蝠岛资源网 Design By www.hbtsch.com
暂无纯js实现的论坛常用的运行代码的效果的评论...
更新日志
2025年06月20日
2025年06月20日
- 小骆驼-《草原狼2(蓝光CD)》[原抓WAV+CUE]
- 群星《欢迎来到我身边 电影原声专辑》[320K/MP3][105.02MB]
- 群星《欢迎来到我身边 电影原声专辑》[FLAC/分轨][480.9MB]
- 雷婷《梦里蓝天HQⅡ》 2023头版限量编号低速原抓[WAV+CUE][463M]
- 群星《2024好听新歌42》AI调整音效【WAV分轨】
- 王思雨-《思念陪着鸿雁飞》WAV
- 王思雨《喜马拉雅HQ》头版限量编号[WAV+CUE]
- 李健《无时无刻》[WAV+CUE][590M]
- 陈奕迅《酝酿》[WAV分轨][502M]
- 卓依婷《化蝶》2CD[WAV+CUE][1.1G]
- 群星《吉他王(黑胶CD)》[WAV+CUE]
- 齐秦《穿乐(穿越)》[WAV+CUE]
- 发烧珍品《数位CD音响测试-动向效果(九)》【WAV+CUE】
- 邝美云《邝美云精装歌集》[DSF][1.6G]
- 吕方《爱一回伤一回》[WAV+CUE][454M]