|
ru.perl
- RU.PERL ----------------------------------------------------------------------
From : Serge Shikov 2:5020/400 28 Sep 2000 12:01:29
To : All
Subject : Re: Problem with MySQL
--------------------------------------------------------------------------------
Johannes wrote:
>
> Даже если двойные кавычки поставить, все равно появляется ошибка.
> Попробовал так:
>
> use DBI;
> $drh = DBI->install_driver('mysql');
> $dbh = $drh->connect($HOST,$BASE_NAME,$ADMIN_PASS,$USER)or die "Error
> connecting to database";
Вместо die после каждой строки рекомендуется один раз написать снаружи
eval {...}
> $sql_statement="insert into users(user, first, last, organization, street,
> city, zip, phone, email) values($_[0], $_[1], $_[2], $_[3], $_[4], $_[5],
> $_[6],$_[7], $_[8])";
А вместо подстановки значений в строку рекомендую пользоваться ? вот в
таком виде:
eval {
$dbh->do(
"insert into users".
" (user, first, last, organization, street, city, zip, phone,
email)".
" values(?,?,?,?,?,?,?,?,?)",
undef,
$_[0], $_[1], $_[2], $_[3], $_[4], $_[5], $_[6],$_[7], $_[8]
);
};
if ($@) { print "Что-то у нас insert грохнулся...\n"; }
> $sth = $dbh->prepare($sql_statement);
> $sth->execute;
И уж никакого смысла нету пользоваться prepare/execute, если вопросов в
statement нету. Вот если они есть - тогда прямой смысл один раз prepare,
и потом много раз execute с параметрами.
> Тогда ошибки нету, но запись в базу не додает. :-\
Уф, ну а что, распечатать значения параметров - религия не позволяет? А
описание таблицы? Из тебя приходится тянуть информацию как из шпиена ;-)
Вот скажи мне - почем мы знаем, сколько у тебя в таблице колонок, какого
они типа, есть ли там на самом деле organization, совпадает ли тип у
$_[3] с типом этой колонки, и так далее? Если нифига не работает, проще
всего педантично проверить все подряд, и это вполне можно сделать
самостоятельно.
--- ifmail v.2.15dev5
* Origin: home (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
