Forum Webscript.Ru

Программирование => Perl => Тема начата: Kwazar от 16 Февраля 2003, 20:14:18

Название: запросы в запросе. Perl+MySQL
Отправлено: Kwazar от 16 Февраля 2003, 20:14:18

Оговорюсь, я занаю. что MySQL Не поддерживает вложенные запросы, речь не об этом.
Вопрос в том, что используя perl я выполняю такой запрос:
$sth = $dbh->prepare("select name,mail,sity,icq,site,time,text,id,answ_st,comm from $main_gb_table ORDER BY time DESC LIMIT $first,$st_mess");
$sth->execute || die $dbh->errstr;
while (@rez=$sth->fetchrow)
{
$sth = $dbh->prepare("select name,mail,sity,icq,site,time,answ,answ_st from $re_gb_table where id=\'$id\' ORDER BY time DESC");
$sth->execute || die $dbh->errstr;
while (@rez2=$sth->fetchrow)
}
}

Этот прмимер только для показа алгоритма. Однако такой способ получения данных не работает, так как после выполнения первого цикла в первом запросе вывод из первого запроса останавливается, цикл прекращается..
Как быть?

Заранее благодарен за развернутый ответ :)

Название: запросы в запросе. Perl+MySQL
Отправлено: C++ от 16 Февраля 2003, 21:19:45

while (@rez=$sth->fetchrow)
{
my $sth1 = $dbh->prepare("select name,mail,sity,icq,site,time,answ,answ_st from $re_gb_table where id=\'$id\' ORDER BY time DESC");
$sth1->execute || die $dbh->errstr;
while (@rez2=$sth1->fetchrow)
}
}

Название: запросы в запросе. Perl+MySQL
Отправлено: Kwazar от 16 Февраля 2003, 21:42:41

Огромное спасибо, выручили. Сейчас попробую..

Название: запросы в запросе. Perl+MySQL
Отправлено: Kwazar от 16 Февраля 2003, 21:50:57

Теперь работает, еще раз спасибо