|
MySQL.RU - Webboard
 Вернуться
 perl и mySQL (помогите с запросом) (designer) 28/01/2005 - 11:00:01
 Re: разобрался :) (designer) 28/01/2005 - 12:12:09
From: designer - 28/01/2005 - 11:00:01
Subject:perl и mySQL (помогите с запросом)
-----------------
Добый всем День.
Есть в базе две таблицы, надо их связать.
Написал такой вот кодик, но есть вопрос.
#----------------------------------------
my $dbh_users = DBI -> connect ("DBI:mysql:tel_users",root,undef);
my $sth_users = $dbh_users-> prepare ("select login, name from users");
$sth_users -> execute ();
my $i=0;
while (my @row = $sth_users -> fetchrow_array() )
{
($login[$i],$name[$i]) = @row[0,1];
if ($login[$i] eq $user) {
print "Ваш логин: <b>$user</b><br>";
print "Этому логину соответствует имя: <b>$name[$i]</b><br>";
my $admin_group = $dbh_users-> prepare ("SELECT user_group FROM users, category WHERE users.id_user = category.id_admin AND name = '$name[$i]'");
$admin_group -> execute ();
print "Вы являестесь администратором: <b>$admin_group</b><br>";
$admin_group -> finish;
print "<hr>\n";
}
$i++
}
$sth_users -> finish;
$dbh_users -> disconnect ();
#----------------------------------------
Всё бы хорошо, да $admin_group не подставляется.
Можно ли, вообще, в запрос select подставлять переменную? (у меня это $name[$i])? Если да, то правильно ли я это сделал.
Вот, что выводит мне браузер:
Ваш логин: Ivanov
Этому логину соответствует имя: Ivanov A.B.
Вы являетесь: DBI::st=HASH(0x180781c)
[Это сообщение - спам!]
Последние сообщения из форума
Уважаемые посетители форума MySQL.RU!
Убедительная просьба, прежде чем задавать свой вопрос в этом форуме, обратите внимание на разделы:
- ответы на наиболее часто задаваемые вопросы - FAQ
- раздел документация
- раздел поиск по сообщениям форума и документации
Также, старайтесь наиболее подробно указывать свою ситуацию (версию операционной системы, версию MySQL,
версию программного обеспечения, по которому возникает вопрос, текст возникающих ошибок, и др.)
Помните, чем конкретнее Вы опишете ситуацию, тем больше шансов получить реальную помощь.
19809
|
|
