Gecko [ corporacionhdm.com.pe ]

Name	Size	Permission	Date
admincp.inc	4.2 KB	-rw-r--r--	2021-12-23 11:54
allowed_user_lnk.inc	3.62 KB	-rw-r--r--	2023-06-07 09:42
cookies.inc	8.13 KB	-rw-r--r--	2025-01-20 12:26
draw_forum_list.inc	9.43 KB	-rw-r--r--	2023-06-07 09:42
draw_forum_path.inc	1.01 KB	-rw-r--r--	2021-12-23 11:54
drawmsg.inc	24.32 KB	-rw-r--r--	2023-06-07 09:42
drawpmsg.inc	9.51 KB	-rw-r--r--	2023-06-07 09:42
err.inc	4.3 KB	-rw-r--r--	2021-12-23 11:54
errmsg.inc	6.18 KB	-rw-r--r--	2025-01-20 12:26
forumsel.inc	2.39 KB	-rw-r--r--	2021-12-23 11:54
get_cur_ppage.inc	1.04 KB	-rw-r--r--	2021-12-23 11:54
imsg_edt.inc	32.45 KB	-rw-r--r--	2025-01-20 12:26
logedin.inc	5.92 KB	-rw-r--r--	2023-06-07 09:42
post_common.inc	4.77 KB	-rw-r--r--	2021-12-23 11:54
post_opt.inc	2.74 KB	-rw-r--r--	2021-12-23 11:54
private.inc	7.24 KB	-rw-r--r--	2021-12-23 11:54
return.inc	1.13 KB	-rw-r--r--	2021-12-23 11:54
tabs.inc	1.63 KB	-rw-r--r--	2021-12-23 11:54
th_nav.inc	2.35 KB	-rw-r--r--	2021-12-23 11:54
thread_view_common.inc	3.62 KB	-rw-r--r--	2021-12-23 11:54
usercp.inc	1.14 KB	-rw-r--r--	2021-12-23 11:54
users.inc	21.61 KB	-rw-r--r--	2025-01-20 12:26

Rename

<?php
/**
* copyright            : (C) 2001-2011 Advanced Internet Designs Inc.
* email                : forum@prohost.org
* $Id$
*
* This program is free software; you can redistribute it and/or modify it
* under the terms of the GNU General Public License as published by the
* Free Software Foundation; version 2 of the License.
**/

function get_prev_next_th_id($frm_id, $th, &$prev, &$next)
{
	$next = $prev = '';
	$id = q_singleval('SELECT seq FROM fud30_tv_'. $frm_id .' WHERE thread_id='. $th);
	if (!$id) {
		return;
	}

$nn = $np = 0;

$c = uq('SELECT m.id, m.subject, tv.seq, t.moved_to FROM fud30_tv_'. $frm_id .' tv INNER JOIN fud30_thread t ON tv.thread_id=t.id INNER JOIN fud30_msg m ON t.root_msg_id=m.id WHERE tv.seq IN('. ($id - 1) .', '. ($id + 1) .')');
	while ($r = db_rowarr($c)) {
		if ($r[2] < $id) {
			if ($r[3]) { /* Moved topic, let's try to find another, */
				$np = 1; continue;
			}
			$prev = '<tr>
	<td class="ar GenText">Previous Topic:</td>
	<td class="GenText al"><a href="[[relativeurl]]/index.php?t='.$_GET['t'].'&amp;goto='.$r[0].'&amp;'._rsid.'#msg_'.$r[0].'">'.$r[1].'</a></td>
</tr>';
		} else {
			if ($r[3]) { /* Moved topic, let's try to find another, */
				$nn = 1; continue;
			}
			$next = '<tr>
	<td class="GenText ar">Next Topic:</td>
	<td class="GenText al"><a href="[[relativeurl]]/index.php?t='.$_GET['t'].'&amp;goto='.$r[0].'&amp;'._rsid.'#msg_'.$r[0].'">'.$r[1].'</a></td>
</tr>';
		}		
	}
	unset($c);

if ($np) {
		$r = db_saq(q_limit('SELECT m.id, m.subject FROM fud30_tv_'. $frm_id .' tv INNER JOIN fud30_thread t ON tv.thread_id=t.id INNER JOIN fud30_msg m ON t.root_msg_id=m.id WHERE tv.seq IN('. ($id - 10) .', '. ($id - 2) .') ORDER BY tv.seq ASC', 1));
		$prev = '<tr>
	<td class="ar GenText">Previous Topic:</td>
	<td class="GenText al"><a href="[[relativeurl]]/index.php?t='.$_GET['t'].'&amp;goto='.$r[0].'&amp;'._rsid.'#msg_'.$r[0].'">'.$r[1].'</a></td>
</tr>';
	}
	if ($nn) {
		$r = db_saq(q_limit('SELECT m.id, m.subject FROM fud30_tv_'. $frm_id .' tv INNER JOIN fud30_thread t ON tv.thread_id=t.id INNER JOIN fud30_msg m ON t.root_msg_id=m.id WHERE tv.seq IN('. ($id + 2) .', '. ($id + 10) .') ORDER BY tv.seq DESC', 1));
		$next = '<tr>
	<td class="GenText ar">Next Topic:</td>
	<td class="GenText al"><a href="[[relativeurl]]/index.php?t='.$_GET['t'].'&amp;goto='.$r[0].'&amp;'._rsid.'#msg_'.$r[0].'">'.$r[1].'</a></td>
</tr>';
	}
}
?>