$ До vbseo_sm_priority = ($ vboptions ['vbseo_sm_priority_rt'], $ relp);
если ($ vboptions ['vbseo_sm_freq_tsmart'])
{
$ Dpassed = (время () - $ threadrow ['lastpost']) / 86400;
если ($ dpassed <3) $ частота = 'ежедневно';
остальное, если ($ dpassed <10) $ частота = 'еженедельно';
остальное, если ($ dpassed <100) $ частота = 'ежемесячно;
еще $ частота = 'ежегодно;
} Другое
$ Частота = $ vboptions ['vbseo_sm_freq_t'];
vbseo_log_entry ("[showthread] forum_id: $ forumid, thread_id: $ threadrow [идент-нити], всех сообщений: $ totalposts, страниц: $ TotalPages, просмотров: $ threadrow [просмотров] $ до");
/ / Дополнительный код
$ Alanguages = массив
если (! $ архив) {
$ Strlenhost = StrLen ($ vbseo_vars ['bburl']."/");
$ Currentthreadurl = vbseo_url_thread ($ threadrow, 1, $ архив);
$ Currentthreadurl_before = подстрока ($ currentthreadurl, 0, $ strlenhost);
$ Currentthreadurl_after = "/" подстрока ($ currentthreadurl, $ strlenhost).
$ Lastpost = & $ threadrow ['lastpost'];
$ Vbseo_stat ['т'] + = SizeOf ($ alanguages);
Еогеасп ($ alanguages как $ языке) {
vbseo_add_url ($ currentthreadurl_before $ языка $ currentthreadurl_after, $ до $ lastpost, $ частота..);
}
}
/ / Конец дополнительный код
для ($ р = 1, $ р <= $ TotalPages, $ р + +)
{
$ Vbseo_stat [$ архив 'в': 'т'] + = vbseo_add_2urls (
vbseo_url_thread ($ threadrow, $ р, $ архив)
vbseo_url_thread ($ threadrow, $ р, $ архив, правда),
$ До,
$ Threadrow ['lastpost'],
$ Частота
);
}
если ($ showpost)
{
$ Getposts = $ DB-> Query ("
ВЫБОР p.dateline, p.postid, p.threadid
ОТ ". Table_prefix". Сообщению AS р
ГДЕ p.threadid = $ threadrow [ThreadId]
И видимых = 1
ORDER BY p.dateline
»);
$ Pcount = 0;
в то время как ($ postrow = $ DB-> fetch_array ($ getposts))
{
$ Pcount + +;
vbseo_log_entry ("[showpost] forum_id: $ forumid, thread_id: $ postrow [идент-нити], post_id: $ postrow [postid]");
$ = $ Relp relp * 0.8 + $ pcount / ($ threadrow ['replycount'] +1) * 0,2;
$ Relp *= vbseo_apply_custom_priority ('Форум', $ threadrow ['forumid']);
$ Prior2 = vbseo_sm_priority ($ vboptions ['vbseo_sm_priority_rp'], $ relp);
$ Vbseo_stat ['р'] + = vbseo_add_2urls (
vbseo_url_post ($ threadrow, $ postrow, $ pcount),
vbseo_url_post ($ threadrow, $ postrow, $ pcount, правда),
$ Prior2,
$ Postrow ['выходных данных'],
$ Vboptions ['vbseo_sm_freq_p']
);
}
$ DB-> free_result ($ getposts);
}
}
$ DB-> free_result ($ getthreads);
$ Vbseo_progress ['Шаг 3'] = 0;
}
vbseo_inc_progress ();
}
Функция vbseo_sitemap_polls ($ прогресса)
{
глобальной $ DB, $ vboptions, $ vbseo_vars;
если (vbseo_check_progress ($ прогресс)) возвращение;
$ Added_urls = 0;
vbseo_log_entry ("[РАЗДЕЛ START] опросов", правда);
$ Й = $ DB-> query_first ("
ВЫБОР
макс (избирателей) как maxre, мин (избирателей) как minre, средний (избирателей) как avgre
ОТ ". Table_prefix". Опрос
»);
Еогеасп ($ vbseo_vars ['forumslist'] как $ forumid)
{
$ Getthreads = $ DB-> Query ("
SELECT *
ОТ ". Table_prefix". Потоке, что нить
ГДЕ forumid = $ forumid
И видимых = 1
И pollid> 0
»);
в то время как ($ threadrow = $ DB-> fetch_array ($ getthreads))
{
$ Getpoll = $ DB-> query_first ("
SELECT *
ОТ ". Table_prefix". Опрос
ГДЕ pollid = ". $ Threadrow ['pollid']."
»);
если (! $ getpoll)
продолжаться;
vbseo_log_entry ("[опрос] forum_id: $ forumid, thread_id: $ threadrow [идент-нити], pollid: $ threadrow [pollid]");
$ Added_urls + +;
$ Relp2 = vbseo_math_avg_weight ($ getpoll ['избирателей'], $ й ['minre'], $ й ['maxre'], $ й ['avgre']);
$ Relp2 *= vbseo_apply_custom_priority ('Форум', $ threadrow ['forumid']);
$ До vbseo_sm_priority = ($ vboptions ['vbseo_sm_priority_rpoll'], $ relp2);
$ Added_urls + = vbseo_add_2urls (
vbseo_url_poll ($ threadrow, $ getpoll),
vbseo_url_poll ($ threadrow, $ getpoll, правда),
$ До,
$ Getpoll ['выходных данных'],
$ Vboptions ['vbseo_sm_freq_poll']
);
}
$ DB-> free_result ($ getthreads);
}
vbseo_inc_progress ();
вернуть $ added_urls;
}
Функция vbseo_sitemap_blogs ($ прогресса)
{
глобальной $ DB, $ vboptions, $ vbseo_vars;
если (vbseo_check_progress ($ прогресс)) возвращение;
если (! vbseo_dbtbl_exists («блог»))
возврат 0;
vbseo_log_entry ("[РАЗДЕЛ START] блоги", правда);
vbseo_add_url (? VBSEO_ON vbseo_any_url ($ vbseo_vars ['bburl'].'/ блог. VBSEO_PHP_EXT): $ vbseo_vars [' bburl'].'/ блог. VBSEO_PHP_EXT, 1.0..);
$ Added_urls = 0;
Ответить с цитированием
Сообщение от Cuti Malaysia
