航空论坛_航空翻译_民航英语翻译_飞行翻译

 找回密码
 注册
搜索
查看: 1592|回复: 0
打印 上一主题 下一主题

DedeCms5.5全站自动给关键字加内链的修改方法 [复制链接]

Rank: 9Rank: 9Rank: 9

跳转到指定楼层
1#
发表于 2011-10-27 00:58:45 |只看该作者 |倒序浏览
DEDECMS的全内链方案,所有设置关键词的内链都会在文档中创建,突破keyword的限制。但是可能会影响生成html的速度。
' a! _- y3 S( i) U" o: A& U/ d1.修改系统参数—>核心设置—>关键字替换(是/否)使用本功能会影响HTML生成速度(这里选 是)
" t0 P, O9 B1 ]( `$ ?2.修改 include/arc.archives.class.php
, ?& B  I- P1 r0 Y' @" B/ _找到
0 l2 k0 K7 j& q, o/ p$body = preg_replace("/(<a(.*))(>)(.*)(<)(\/a>)/isU", '\\1-]-\\4-[-\\6', $body); 8 y- N+ S* _* G) w
在下方加入以下代码
8 m" I1 y) j+ _& g2 X1 t6 @6 e//设置所有关键词
5 o0 Z7 E+ l1 a$dsql12 = new DedeSql(); : f5 q+ \/ b' h
$query1="select * from dede_keywords"; - E: [5 F: x1 I4 k) n* M
$dsql12->SetQuery($query1); + A3 I( M# \& |
$dsql12->Execute();
& U9 }9 U5 C  |2 {$ `. C: ~9 Gwhile($kws = $dsql12->GetArray()) 7 t% f, O( H2 S& K
{
4 d; T) k. E$ i. G9 V再找到: 9 C: X0 F) k/ W% s# ]1 L9 r7 ~
if($i > $maxkey)
  i0 P; j8 \4 L$ U{
+ k2 ~( k! Y2 B+ |' y6 I  ]break;
+ u3 |0 C- e' P% _" V# _} 2 g' l  {- L$ }, N1 @5 ^5 P( k& h
并删除。
$ ~1 H8 T: \2 B( `# W# ?2 v找到 8 f/ G1 s1 i3 t% E8 g5 l! X
$body = preg_replace("/(^|>)([^<]+)(?=<|$)/sUe", "_highlight('\\2', \$karr, \$kaarr, '\\1')", $body); % V# Z& c# g+ r+ u
在其上方加上一个 ) z" N8 Q7 d" I2 s; M4 L1 ~0 D
} 3 c; V* \  ~  P! d. Z, [) N0 \
3.核心—>文档关键词维护—>增加一个关键字和链接重新生成文章即可。0 w" s9 s) P3 V, `
您需要登录后才可以回帖 登录 | 注册


Archiver|航空论坛 ( 渝ICP备10008336号 )

GMT+8, 2024-11-25 01:48 , Processed in 0.393022 second(s), 11 queries .

Powered by Discuz! X2

© 2001-2011 MinHang.CC.

回顶部