|
ru.perl
- RU.PERL ----------------------------------------------------------------------
From : mrrc 2:5020/400 18 Apr 2001 15:19:17
To : All
Subject : Помогите разобраться с IBPerl
--------------------------------------------------------------------------------
Возникла необходимость вывести содержимое базы в InterBase через веб, так
вот:
FreeBSD 4.2 + firebird-0.9_4 (InterBase 6.0 Classic version) + IBPerl-08p3
Hабросал скриптик, подскажите, что нужно подправить в нижеследующем примере,
чтобы вывести указанную в теле таблицу через броузер, что тут неправильно
выполнено? Hаверняка я ошибся на стадии обращения к этой таблице и запроса
из нее данных, а также вывода полученного содержимого на экран броузера.
Подключение к базе проходит нормально, все путем, вывод ошибки при
невозможности подсоединиться тоже отрабатывается должным образом, а вот что
дальше делать, не разберусь никак.
Один из прилагаемых примеров отработал, все вывелось, но там настолько все
мудрено, что толком ничего не понял.
--------------------------------------------------------------------------
#!/usr/bin/perl
print "Content-type: text/html\n\n";
use IBPerl;
$database = '/usr/interbase/examples/v5/employee.gdb';
$db = new IBPerl::Connection(
Server => '192.168.0.2',
Protocol => 'TCP/IP',
Path => $database,
User => 'sysdba',
Password => 'masterkey',
Cache => 1000);
if ($db->{Handle} < 0) {
print "Hевозможно подключиться к базе данных. Ошибка в следеющем:\n";
print "$db->{Error}\n";
exit 1; # No sense in continuing.
}
my $tr = new IBPerl::Transaction( Database => $db );
$tr->commit();
if ($tr->{Handle} < 0) {
print "Failure to start a transaction. Error as follows:\n";
print "$tr->{Error}\n";
exit 1;
}
my $st = new IBPerl::Statement(
Transaction => $tr,
SQL => 'SELECT * FROM EMPLOYEE');
$st->execute();
$st->fetch( \$result );
print "$result\n";
$db->disconnect();
-------------------------------------------------------------------------
--- ifmail v.2.15dev5
* Origin: Ye 'Ol Disorganized NNTPCache groupie (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
