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

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

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

Rank: 9Rank: 9Rank: 9

跳转到指定楼层
1#
发表于 2011-10-27 00:58:45 |只看该作者 |倒序浏览
DEDECMS的全内链方案,所有设置关键词的内链都会在文档中创建,突破keyword的限制。但是可能会影响生成html的速度。 / Q) i' W% b) i  S$ k/ E# X
1.修改系统参数—>核心设置—>关键字替换(是/否)使用本功能会影响HTML生成速度(这里选 是) * K( ?8 m! a1 {/ m9 U% T: v' C
2.修改 include/arc.archives.class.php : o5 _, R$ o' r0 s, y* s& f+ ?
找到
0 A, c$ n9 }3 y. w; O2 F/ u$body = preg_replace("/(<a(.*))(>)(.*)(<)(\/a>)/isU", '\\1-]-\\4-[-\\6', $body);
# _0 f% n2 l8 N1 ?3 H: w, r在下方加入以下代码 6 n$ J$ m3 Z. t! |# h. R
//设置所有关键词 7 G  u6 h; g$ x# V7 z7 v: a
$dsql12 = new DedeSql();
* a: }: H  T! n5 Z5 X$query1="select * from dede_keywords";
5 d; W2 d# d) u: {  P9 N3 b3 w7 w# D$dsql12->SetQuery($query1);
: q+ J9 Z0 i# n; A) o3 T# H$dsql12->Execute(); " ]! ?* K( r8 I( L9 O
while($kws = $dsql12->GetArray())   {# q5 v2 Q0 }7 ?
{
2 N) b$ @. p7 b再找到: / i+ R8 T- n* q- k/ e
if($i > $maxkey) ' q: }% K2 z$ ^. ~% B. q/ w, |
{ ' ?; j1 [7 @; o& b$ z# \  x
break;
$ Y; \6 p) @1 U0 `8 c} : ?$ t& ^' [, b
并删除。
0 h* k2 E3 I$ t/ T找到
/ O+ n# D; ?- B! B) d3 ~9 d5 c8 V$body = preg_replace("/(^|>)([^<]+)(?=<|$)/sUe", "_highlight('\\2', \$karr, \$kaarr, '\\1')", $body); 6 ^4 V/ G1 `& Q$ {- x; @
在其上方加上一个 0 {7 N+ d1 J% ?1 K5 f: s
}
- f) W6 Z% Q( S- G3.核心—>文档关键词维护—>增加一个关键字和链接重新生成文章即可。
- f# M5 J' m0 H! u7 ?! U& W
您需要登录后才可以回帖 登录 | 注册


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

GMT+8, 2026-1-9 09:43 , Processed in 0.022001 second(s), 10 queries .

Powered by Discuz! X2

© 2001-2011 MinHang.CC.

回顶部