Перейти из форума на сайт.

НовостиФайловые архивы
ПоискАктивные темыТоп лист
ПравилаКто в on-line?
Вход Забыли пароль? Первый раз на этом сайте? Регистрация
Компьютерный форум Ru.Board » IkonBoard и другие форумы » Ikonboard v.2 » Убираем профиль несуществующего пользователя

Модерирует : Antuan

batva (11-11-2002 12:43): Тема исчерпана.  Версия для печати • ПодписатьсяДобавить в закладки
Страницы: 1 2

   

lynx



Advanced lynx
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Убираем профиль несуществующего пользователя

 
 
По умолчанию на стандартной IB2 если открыть профиль несуществующего пользователя, конфа отобразит страницу профиля и напишет:
 
Статус: Deleted  
Обновления This Member has been removed by the board Admin  
Всего записей: N/A  
 
Это не совсем корректно. Лучше писать, что такого пользователя нет на конференции.
 
Открываем profile.cgi
 
sub showprofile  
 
Перед выводом профиля мембера, то есть перед:  
 

Код:
 
$output .= qq~  
    <tr>  
    <td bgcolor=$miscbacktwo valign=middle colspan=2 align=center><font face="$font" color=$fontcolormisc size=$dfontsize3><b>$ibtxt{'1817'} <font color=$fonthighlight>$inmember</b></font></td></tr>  
    <tr>  
    <td bgcolor=$miscbackone valign=middle width=30%><font face="$font" color=$fontcolormisc size=$dfontsize1><b>$ibtxt{'1818'}</b></font></td>  
    <td bgcolor=$miscbackone valign=middle><font face="$font" color=$fontcolormisc size=$dfontsize1>$joineddate</font></td></tr>  
 

 
Написать:  
 

Код:
 
$filetoopen = "$ikondir" . "members/$inmember.cgi";  
unless (-e $filetoopen) { &error("Пользователь не найден&Пользователь $inmember не зарегистрирован на нашей конференции"); }  
 

 





Всего записей: 11712 | Зарегистр. 08-05-2001 | Отправлено: 06:25 27-10-2002 | Исправлено: lynx, 18:36 07-08-2003
lynx



Advanced lynx
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору

Цитата:
Наверняка программеры смогут решить эту проблему более изящно

 
Более того, прочитав мои извраты с кодом, один из программеров сказал, что меня надо изолировать от Перла... Однако, обидно
 
Ладно, вот решение поизящней, спасибо за идею.
 
Перед выводом профиля мембера, то есть перед:
 

Код:
$output .= qq~  
    <tr>  
    <td bgcolor=$miscbacktwo valign=middle colspan=2 align=center><font face="$font" color=$fontcolormisc size=$dfontsize3><b>$ibtxt{'1817'} <font color=$fonthighlight>$inmember</b></font></td></tr>  
    <tr>  
    <td bgcolor=$miscbackone valign=middle width=30%><font face="$font" color=$fontcolormisc size=$dfontsize1><b>$ibtxt{'1818'}</b></font></td>  
    <td bgcolor=$miscbackone valign=middle><font face="$font" color=$fontcolormisc size=$dfontsize1>$joineddate</font></td></tr>  

 
Написать:
 

Код:
 
$filetoopen = "$ikondir" . "members/$inmember.cgi";
unless (-e $filetoopen) { &error("Пользователь не найден&Пользователь $inmember не зарегистрирован на нашей конференции"); }
 

 
Это все.

Всего записей: 11712 | Зарегистр. 08-05-2001 | Отправлено: 04:23 01-11-2002
CarHelp



Member
Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
lynx

Цитата:
вот решение поизящней, спасибо за идею

О! Вот так уже понятней! Спасибо! Поставлю, нужное дело!

Цитата:
Более того, прочитав мои извраты с кодом, один из программеров сказал, что меня надо изолировать от Перла...  Однако, обидно  

Поверь в той теме речь шла не о тебе! Перечитай тему!

----------
Авторемонт,Автоновости,АвтоФлейм!
АвтоТехФорум

Всего записей: 369 | Зарегистр. 29-01-2002 | Отправлено: 16:41 02-11-2002
Grey2002



Advanced Member
Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
CarHelp

Цитата:
Поверь в той теме речь шла не о тебе! Перечитай тему!

не-не. Давай не оффтопить. По-моему она не про тему говорит, а про асю.


----------
Мой Блог

Всего записей: 1325 | Зарегистр. 24-12-2001 | Отправлено: 18:10 04-11-2002
CarHelp



Member
Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
Grey2002
Могет и так.....
lynx
А не работает! Проверь ещё разок! Где то ошибочка.... опять показывает делетед.....

----------
Авторемонт,Автоновости,АвтоФлейм!
АвтоТехФорум

Всего записей: 369 | Зарегистр. 29-01-2002 | Отправлено: 19:18 04-11-2002
lynx



Advanced lynx
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
CarHelp
 

Цитата:
А не работает! Проверь ещё разок! Где то ошибочка.... опять показывает делетед.....

 
Не знаю. у меня все работает
 
Смотри.

Всего записей: 11712 | Зарегистр. 08-05-2001 | Отправлено: 01:11 05-11-2002
CarHelp



Member
Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
lynx

Цитата:
Не знаю. у меня все работает  

Попытаюсь переставить!

Цитата:
Смотри.

я думаю ты тоже увидела.....

----------
Авторемонт,Автоновости,АвтоФлейм!
АвтоТехФорум

Всего записей: 369 | Зарегистр. 29-01-2002 | Отправлено: 02:17 05-11-2002
lynx



Advanced lynx
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
CarHelp
 

Цитата:
я думаю ты тоже увидела.....

 
Если честно, то только сейчас. Не поняла даже сначала. лол Давайте всем ру-бордом ко мне бежать. У меня половина мемберов отсюда...  
 
Хорошо, смотри сюда.

Всего записей: 11712 | Зарегистр. 08-05-2001 | Отправлено: 03:02 05-11-2002
WSergey

Junior Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
lynx
У тебя работает видел.
Но у меня нет.
выдает:
Internal Server Error
The server encountered an internal error or misconfiguration and was unable to complete your request.
 
Я  

Код:
$filetoopen = "$ikondir" . "members/$inmember.cgi";  
unless (-e $filetoopen) { &error("Пользователь не найден&Пользователь $inmember не зарегистрирован на нашей конференции"); }  

Ставлю прямо перед

Код:
$output .= qq~

 и после

Код:
if ($membertitle eq "member" || $membertitle eq "$ibtxt{’0136’}") { $membertitle = $mtitle; }  

 
Что не так?

Всего записей: 186 | Зарегистр. 14-07-2002 | Отправлено: 13:25 06-11-2002
lynx



Advanced lynx
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
WSergey
 
Попробуй убрать переменную отсюда:
 

Код:
("Пользователь не найден&Пользователь $inmember не зарегистрирован на нашей конференции"); }  

 
Убери ее вообще.
Если поможет - ставь перед ней обратный слеш \
Если не поможет... мыль конфу на мыло. Только скрипты. Картинки не вздумай мылить! Но смогу посмотреть только дня через два.
 

Цитата:
Internal Server Error  

 
Показал бы ты логи Апача. И код бы просто процитировал, а не поворил "это после этого".
Где все это? Заливаешь то верно? Режим закачки?
 
Код перед ("Пользователь не найден&Пользователь $inmember не зарегистрирован на нашей конференции"); }   покажи побольше.

Всего записей: 11712 | Зарегистр. 08-05-2001 | Отправлено: 17:17 06-11-2002
WSergey

Junior Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
lynx

Код:
   ($postdate, $posturl, $posttopic) = split(/\%%%/,$lastpostdate);
   
   if ($postdate ne "$ibtxt{’1816’}") {
       $postdate = &longdate($postdate + ($timedifferencevalue*3600) + ($timezone*3600));
       $lastpostdetails = qq~$ibtxt{’1815’} <a href="$posturl">$posttopic</a> $ibtxt{’1119’} $postdate~;
       }
       else {
           $lastpostdetails = "$ibtxt{’1816’}";
           }
           if (($avatars eq "on") && ($useravatar) && ($useravatar ne "noavatar")) {
            $useravatar = qq(<img src="$imagesurl/avatars/$useravatar.gif" border=0 width="32" height="32">);
            }    
   else { $useravatar = ""; }
   
    if ($gender eq "guy") { $gender = "Мужской"; }
elsif ($gender eq "gal") { $gender = "Женский"; }
else { $gender = " "; }
 
   $inmember =~ y! !_!; &set_up_guest() unless (-e $ikondir . ’members/’.$inmember.’.cgi’);
   
   if (-e "$imagesdir/foto/$inmember.jpg") {  
                $foto = qq~<tr>  
            <td bgcolor=$miscbackone valign=top width=30%><font face="$font" color=$fontcolormisc size=$dfontsize2><b>Фото:</b></font></td>  
            <td bgcolor=$miscbackone valign=middle align=center><img border=0 src="$imagesurl/foto/$inmember.jpg"></td></tr>~;  
                }  
 
   $pm = qq~<a href="$messengerprog?action=new&touser=$inmember ">Отправить ему сообщение</a>~;
   
  if    ($numberofposts > $mpostmark5) { $mtitle = "$mtitle5"; }  
            elsif ($numberofposts > $mpostmark4) { $mtitle = "$mtitle4"; }  
            elsif ($numberofposts > $mpostmark3) { $mtitle = "$mtitle3"; }  
            elsif ($numberofposts > $mpostmark2) { $mtitle = "$mtitle2"; }  
            else { $mtitle = "$mtitle1"; }  
 
if ($membertitle eq "member" || $membertitle eq "$ibtxt{’0136’}") { $membertitle = $mtitle; }    
 
   $filetoopen = "$ikondir" . "members/$inmember.cgi";  
unless (-e $filetoopen) { &error("Пользователь не найден&Пользователь не зарегистрирован на нашей конференции"); }  
 
    $output .= qq~
<tr>
<td bgcolor=$miscbacktwo valign=middle colspan=2 align=center><table><tr><td valign=middle align=center><font color=$fontcolormisc size=$dfontsize3><b>$ibtxt{’1817’} <font color=$fonthighlight>$inmember</b></font><br><font size=$dfontsize2>$pm</font></td><td valign=middle>$useravatar</td></tr></table></td></tr>

 
Столько хватит?
 
заливаю и все такое правильно. Когда эту фичу вырезаю все нормально, показыват удаленного и все.  
 
Профиль сам работает, но как набираешь не того ника то 500
 
Пробывал и так и сяк и \ и убирать - результат тот же - 500.

Всего записей: 186 | Зарегистр. 14-07-2002 | Отправлено: 18:03 06-11-2002
lynx



Advanced lynx
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Походу Вы наворочили сюда каши из хаков, вот и глюкует.
 
Так с виду все правильно.  
 

Цитата:
$filetoopen = "$ikondir" . "members/$inmember.cgi";  
unless (-e $filetoopen) { &error("Пользователь не найден&Пользователь не зарегистрирован на нашей конференции"); }  

 
Ну не знаю, ковыряйтесь. Логи бы Апача посмотреть.
Замяйте, смотрите, что такое дает.
Например:
 
$filetoopen = "$ikondir" . "members/$inmember.cgi";  
unless (-e $filetoopen) { print; }  
 
или  
 
$filetoopen = "$ikondir" . "members/$inmember.cgi";  
unless (-e $filetoopen) { &error("test1&test2"); }  
 
 
$filetoopen = "$ikondir" . "members/$inmember.cgi";  
unless (-e $filetoopen) { print("Нет такого\, отвали"); }  
 
Надо видеть логи сервера.

Всего записей: 11712 | Зарегистр. 08-05-2001 | Отправлено: 18:25 06-11-2002
batva



crazy administrator
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
WSergey

Цитата:
Я  
 
Код:$filetoopen = "$ikondir" . "members/$inmember.cgi";  
unless (-e $filetoopen) { &error("Пользователь не найден&Пользователь $inmember не зарегистрирован на нашей конференции"); }  
 
Ставлю прямо перед  
 
Код:$output .= qq~  
 
 и после  
 
Код:if ($membertitle eq "member" || $membertitle eq "$ibtxt{’0136’}") { $membertitle = $mtitle; }  
 
 
Что не так?

 
все так.
 
 
Насколько я помню переменная с именем $filetoopen юзается кругом в скрипте, возможно ты ее переопределяя ломаешь все то, что далее.
 
Сделай так
 

Код:
 
#my $filetoopen = "$ikondir" . "members/$inmember.cgi";  
unless (-e "$ikondir/members/$inmember.cgi") { &error("Пользователь не найден&Пользователь $inmember не зарегистрирован на нашей конференции"); }  
 


Всего записей: 12593 | Зарегистр. 07-01-2001 | Отправлено: 19:50 07-11-2002
WSergey

Junior Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
batva
Я в шоке....
Твои советы не канают, просто нет слов ....
Все тажа 500 ошибка

Всего записей: 186 | Зарегистр. 14-07-2002 | Отправлено: 20:12 07-11-2002
lynx



Advanced lynx
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
WSergey
 
Сделай так:
 
my $sergeyfile = "$ikondir" . "members/$inmember.cgi";    
unless (-e $sergeyfile) { &error("Пользователь не найден&Пользователь $inmember не зарегистрирован на нашей конференции"); }  
 

Всего записей: 11712 | Зарегистр. 08-05-2001 | Отправлено: 03:45 08-11-2002
WSergey

Junior Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
lynx
Не работает
 
У меня такое впечатление что вы на угад пишите????
От балды, методом тыка
 
Ладно это не важная фича, потом руки доберутся люди помогут...

Всего записей: 186 | Зарегистр. 14-07-2002 | Отправлено: 13:16 08-11-2002
batva



crazy administrator
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
WSergey

Цитата:
Твои советы не канают, просто нет слов ....  
Все тажа 500 ошибка  

 
а я в шоке от того, что до того как ты добавляешь те две строки скрипт работает, а после добавления нет.
 
Причем в тех двух строках нет ошибок синтаксиса либо каких других.
Может ты даш мне доступ к тебе по фтп, я разберусь схожу...?
Если хочешь конечно, если да, кидай в пм логин и пасс...
 
 
 
P.S если хочешь сам разбираться, сделай например так.

Код:
 
unless (-e "$ikondir/members/$inmember.cgi") {  
print header();
print "Это тест ура, 500 ошибки нет, проблема в sub error";
exit;
 
 }  
 
 

 
 
 
WSergey

Цитата:
У меня такое впечатление что вы на угад пишите????  
От балды, методом тыка  

 
А ты никогда не думал о том, что если у всех этот хак работает, а у тебя нет, то... делай выводы сам...  
Удачи.

Всего записей: 12593 | Зарегистр. 07-01-2001 | Отправлено: 15:45 08-11-2002
WSergey

Junior Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
batva
Я вот тоже понимаю, что у кого то работает у кого то нет, и  я не один такой.
 
Сделал по твоему рецепту, получил - Это тест ура, 500 ошибки нет, проблема в sub error
 
так в чем там проблема????
 
Вижу будет победа.

Всего записей: 186 | Зарегистр. 14-07-2002 | Отправлено: 16:05 08-11-2002
lynx



Advanced lynx
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
WSergey
 

Цитата:
Я в шоке....  
Твои советы не канают, просто нет слов ....  

 
Против кривый рук бессилен даже Батва
 
Мыль свои скрипты и папку дата архивом на мыло. Только скрипты и папку дата, больше ничего не вздумай мылить.
 

Цитата:
У меня такое впечатление что вы на угад пишите????  
От балды, методом тыка

 
Ну, ессно, мы же не видим твой код. На моем работает, на стандартном работает, а что ты там напортачил, как мы можем угадать??
 

Цитата:
 Это тест ура, 500 ошибки нет, проблема в sub error  

 
Давай сюда саб еррор, она в икон.либ.

Всего записей: 11712 | Зарегистр. 08-05-2001 | Отправлено: 00:33 09-11-2002
WSergey

Junior Member
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
lynx
Мылить пока не буду.
 
batva и lynx
 

Цитата:
sub error {
my $errorinfo = shift;
($where, $errormsg) = split(/\&/, $errorinfo);
 
$inmembername = cookie("amembernamecookie");
$inpassword = cookie("apasswordcookie");
 
&title;

 
Еще раз повторяюсь я не одинок в этой ошибке...

Всего записей: 186 | Зарегистр. 14-07-2002 | Отправлено: 01:22 09-11-2002
   

Страницы: 1 2

Компьютерный форум Ru.Board » IkonBoard и другие форумы » Ikonboard v.2 » Убираем профиль несуществующего пользователя
batva (11-11-2002 12:43): Тема исчерпана.


Реклама на форуме Ru.Board.

Powered by Ikonboard "v2.1.7b" © 2000 Ikonboard.com
Modified by Ru.B0ard
© Ru.B0ard 2000-2024

BitCoin: 1NGG1chHtUvrtEqjeerQCKDMUi6S6CG4iC

Рейтинг.ru