代码缩放 for 4.0

问题已经解决
如下
codedisp函数替换成如下代码

function codedisp($code) {
        global $discuzcodes;
        $discuzcodes['pcodecount']++;
        $code = htmlspecialchars(str_replace('\\"', '"', preg_replace("/^[\n\r]*(.+?)[\n\r]*$/is", "\\1", $code)));
        $discuzcodes['codehtml'][$discuzcodes['pcodecount']] = "<br><textarea name='FF$discuzcodes[pcodecount]' rows=\"15\" cols=\"95\">$code</textarea><br><input type=\"button\" value=\"运行代码\" onclick=\"runCode(FF$discuzcodes[pcodecount])\">&nbsp;<input type=\"button\" value=\"复制代码\" onclick=\"copyCode(FF$discuzcodes[pcodecount])\">&nbsp;<input type=\"button\" value=\"另存代码\" onclick=\"saveCode(FF$discuzcodes[pcodecount])\">&nbsp;<script language=JavaScript>ffcod=delpost.FF$discuzcodes[pcodecount].value;ffcod=ffcod.replace(/<br \/>/g,'');delpost.FF$discuzcodes[pcodecount].value=ffcod;</script>提示：你可以先修改部分代码再运行<br>";
        return "[\tDISCUZ_CODE_$discuzcodes[pcodecount]\t]";
}



在common.js文件里增加如下函数


function runCode(obj) {
        var winname = window.open('', "_blank", '');
        winname.document.open('text/html', 'replace');
        winname.document.writeln(obj.value);
        winname.document.close();
}

function saveCode(obj) {
        var winname = window.open('', '_blank', 'top=10000');
        winname.document.open('text/html', 'replace');
        winname.document.writeln(obj.value);
        winname.document.execCommand('saveas','','code.htm');
        winname.close();
}

[ 本帖最后由 飞飞小剑 于 2006-1-15 22:51 编辑 ]

原帖由 飞飞小剑 于 2006-1-15 21:10 发表
问题已经解决
如下
codedisp函数替换成如下代码

function codedisp($code) {
        global $discuzcodes;
        $discuzcodes['pcodecount']++;
        $code = htmlspecialchars(str_replace('\\"', '"', pre ...

按照你的代码修改后,会有网页发生错误状况,及复制代码和另存代码都无法使用

已经测试通过
演示：
http://bbs.ffjh.com/viewthread.php?tid=1161&extra=page%3D1

帮你顶上去

还是不行！

不错。收藏了再慢慢看。