- Автор темы
- #1
У меня в движке реализована функция автоматических тегов. Но что б получить теги скрипт стучит на китайский сервер
Естественно русские теги я не получаю, только англ и китай
Ищу скрипт автоматической выборки тегов
Вот код где стучит, может что еще придумать можно?
Пожалуйста помогите..
Подкиньте хотя бы скрипт подборки ключевиков
Естественно русские теги я не получаю, только англ и китай
Ищу скрипт автоматической выборки тегов
Вот код где стучит, может что еще придумать можно?
PHP:
if(!$_G['setting']['headercharset']) {
@header('Content-Type: text/html; charset='.CHARSET);
}
$_G['inajax'] = 1;
$subjectenc = rawurlencode(strip_tags($_GET['subjectenc']));
$messageenc = rawurlencode(strip_tags(preg_replace("/\[.+?\]/U", '', $_GET['messageenc'])));
$data = @implode('', file("http://keyword.discuz.com/related_kw.html?title=$subjectenc&content=$messageenc&ics={$_G[charset]}&ocs={$_G[charset]}"));
if($data) {
$parser = xml_parser_create();
xml_parser_set_option($parser, XML_OPTION_CASE_FOLDING, 0);
xml_parser_set_option($parser, XML_OPTION_SKIP_WHITE, 1);
xml_parse_into_struct($parser, $data, $values, $index);
xml_parser_free($parser);
$kws = array();
foreach($values as $valuearray) {
if($valuearray['tag'] == 'kw' || $valuearray['tag'] == 'ekw') {
if(PHP_VERSION > '5' && CHARSET != 'utf-8') {
$kws[] = diconv(trim($valuearray['value']), 'utf-8');
} else {
$kws[] = trim($valuearray['value']);
}
}
}
$return = '';
if($kws) {
foreach($kws as $kw) {
$kw = dhtmlspecialchars($kw);
$return .= $kw.' ';
}
$return = trim($return);
}
showmessage($return, '', array(), array('msgtype' => 3, 'handle' => false));
} else {
showmessage(' ', '', array(), array('msgtype' => 3, 'handle' => false));
}
PHP:
if($tid = @intval($_GET['tid'])) {
$data = C::t('forum_post')->fetch_threadpost_by_tid_invisible($tid);
$subject = $data['subject'];
$message = cutstr($data['message'], 500, '');
$pid = $data['pid'];
} else {
$subject = $_GET['subjectenc'];
$message = $_GET['messageenc'];
}
$subjectenc = rawurlencode(strip_tags($subject));
$messageenc = rawurlencode(strip_tags(preg_replace("/\[.+?\]/U", '', $message)));
$data = @implode('', file("http://keyword.discuz.com/related_kw.html?ics=".CHARSET."&ocs=".CHARSET."&title=$subjectenc&content=$messageenc"));
if($data) {
if(PHP_VERSION > '5' && CHARSET != 'utf-8') {
require_once libfile('class/chinese');
$chs = new Chinese('utf-8', CHARSET);
}
$parser = xml_parser_create();
xml_parser_set_option($parser, XML_OPTION_CASE_FOLDING, 0);
xml_parser_set_option($parser, XML_OPTION_SKIP_WHITE, 1);
xml_parse_into_struct($parser, $data, $values, $index);
xml_parser_free($parser);
$kws = array();
foreach($values as $valuearray) {
if($valuearray['tag'] == 'kw' || $valuearray['tag'] == 'ekw') {
$kws[] = !empty($chs) ? $chs->convert(trim($valuearray['value'])) : trim($valuearray['value']);
}
}
$return = '';
if($kws) {
foreach($kws as $kw) {
$kw = dhtmlspecialchars($kw);
$return .= $kw.',';
}
$return = dhtmlspecialchars($return);
}
$return = substr($return, 0, strlen($return)-1);
if(!$tid) {
$_G['inajax'] = 1;
include template('forum/relatekw');
} elseif($kws) {
loadcache('censor');
C::t('forum_post')->update('tid:'.$_G['tid'], $pid, array(
'tags' => implode(',', $kws),
));
}
}
Подкиньте хотя бы скрипт подборки ключевиков