官方首页 | 无图版 | BBS首页
PJBlog3 2.8.5.157 新版发布 下载|升级(2008.8.26) 来给PJ3提提发展建议 2008版 PJHOME 珍藏/纪念版官方T恤 正式发布! PJ3内测团队主创人员身份,性格,特点吐血大曝光
PJBlog技术支持论坛使用问题总索引 PJ-Blog 3 斑竹日志 【独家】我使用过的三种空间,与客服的精彩故事 Z-Blog,Wordpress,Bo-Blog转换到PJBlog
发新话题
打印

[求助讨论] 日志发表代码问题

日志发表代码问题

为什么我发表日志时插入代码就不能发表,显示错误
Microsoft VBScript runtime ?펳 '800a000d'

Type mismatch: 'DateTime'

/common/function.asp??А 483
求助

TOP

用的FCK编辑的?
http://www.miaoever.cn/

TOP

我装了个插件,然后用UBB模式编辑~实现代码高亮显示效果,感觉渲染效果比FCK的高亮舒服,可以参看我的博客
http://www.miaoever.cn
http://www.miaoever.cn/

TOP

参考了些网上的文章,然后自己改了改,实现了动态、静态模式下的代码高亮显示
1.首先下载 SyntaxHighlighter这个代码高亮渲染插件(用WORDPRESS时也用的它,呵呵)
http://code.google.com/p/syntaxhighlighter/

2.下载解压后将整个文件夹上传到博客plugins文件夹中

3.在\head.asp中的<head></head>中插入代码
<link type="text/css" rel="stylesheet" href="plugins/SyntaxHighlighter/Styles/SyntaxHighlighter.css"></link>   

如果要在全静态化模式下实现高亮显示,则还需在\template\static.htm中插入这段代码

4.在\footer.asp文件最后插入代码
<script type="text/javascript" src="plugins/SyntaxHighlighter/Scripts/shCore.js"></script>
<script type="text/javascript" src="plugins/SyntaxHighlighter/Scripts/shBrushCss.js"></script>
<script type="text/javascript" src="plugins/SyntaxHighlighter/Scripts/shBrushPhp.js"></script>
<script type="text/javascript" src="plugins/SyntaxHighlighter/Scripts/shBrushJScript.js"></script>
<script type="text/javascript" src="plugins/SyntaxHighlighter/Scripts/shBrushVb.js"></script>
<script type="text/javascript" src="plugins/SyntaxHighlighter/Scripts/shBrushSql.js"></script>
<script type="text/javascript">
dp.SyntaxHighlighter.ClipboardSwf = 'plugins/SyntaxHighlighter/Scripts/clipboard.swf';
dp.SyntaxHighlighter.HighlightAll('code');
</script>
注意,这里面调用了不同代码的渲染文件如VB对应的是shBrushVb.js,PHP对应的是shBrushPhp.js,如需要添加其它语言支持,可以在这里对照添加

5.最后在/common/ubbcode.asp中 re.Pattern="\[code\](.*?)\[\/code\]" 语句上面添加:
re.Pattern= "\[codes=(.[^\]]*)\](.*?)\[\/codes\]"  
Set strMatchs=re.Execute(strContent)   
For Each strMatch in strMatchs   
    tmpStr1=strMatch.SubMatches(0)   
    tmpStr2=Replace(strMatch.SubMatches(1),"<br/>",vbCrLf)   
    strContent=replace(strContent,strMatch.Value,"<pre name=""code"" class=""" & tmpStr1 & """>" & tmpStr2 & "</pre>" ,1,-1,0)   
Next  

完成!
在UBB编辑模式下使用
[codes=语言]...代码...[/codes]
例如:
[codes=cpp]
int main()
{
    cout<<"Hello World!";
}
[/codes]

具体效果可以参见我的博客
http://www.miaoever.cn
http://www.miaoever.cn/

TOP

发新话题