|
ru.cgi.perl
- RU.CGI.PERL ------------------------------------------------------------------
From : Artem Arzumanyan 2:5020/2091.20 18 Dec 2000 01:56:06
To : Dmitriy Kuvshinov
Subject : что бы это значило? DBD, DBI еtс...
--------------------------------------------------------------------------------
16 Дек 00 16:10, Dmitriy Kuvshinov -> All:
DK> #!/usr/bin/perl
DK> print "content-type: text/html\n\n";
DK> use DBI;
DK> #print "OK!";
DK> my $dbh=DBI->connect('DBI:mysql:c:\InetPub\wwwroot\cgi-bin\base') or
DK> die $DBI::errstr; print "OK!";
DK> my $table_date = $dbh->prepare("select * from pdffile");
DK> $table_date->execute() or die $table_date->errstr();
DK> my @fields =@{$table_date -> NAME};
DK> my @types=@{$table_date -> TYPE};
DK> my @not_null = @{$table_date -> is_not_null};
DK> my @lenght = @{$table_date -> lenght};
DK> $dbh->disconnect;
DK> print join "<br>", @fields;
DK> print join "<br>", @types;
DK> print join "<br>", @not_null;
DK> print join "<br>", @lenght;
DK> print "OK!"
DK> сижу под виндами, файл pdffile.pdf лежит в той-же дирректории что и
DK> сам скрипт. MsSQL 7.0 модули все дописываю прямо в c:\Perl\lib в виде
^^^^^^^^^^^ - а может
тогда не #!/usr/bin/perl, а #!C:\Perl\Bin\perl.exe надо поставить?
DK> пм файлв... вопрос такой, почему ничего не возвращает скрипт. Вообще
DK> ничего. Специально принты написаны все. А смысл - хочу вывести
DK> таблицу, точнее все её колонки и все её столбцы. -- Отправлено через
А ваабще просматривай логи сервака иногда (если ты под ним запускаешь) =)
С уважением,
Artem Arzumanyan aka Kexx2000
--- CHAINIK v.3.2
* Origin: BCL6.2 vs Win98 - Armageddon (2:5020/2091.20)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
