ru.cgi.perl

 
 - RU.CGI.PERL ------------------------------------------------------------------
 From : Artem Chuprina                       2:5020/371.32  18 Dec 2000  12:34:35
 To : Dmitriy
 Subject : Re: что бы это значило? DBD, DBI еtс...
 -------------------------------------------------------------------------------- 
 

 В твоём письме от Sat, 16 Dec 2000 16:10:09 +0300 написано:
 
 dgpms> #!/usr/bin/perl
 dgpms> print "content-type: text/html\n\n";
 dgpms> use DBI;
 dgpms> 
 dgpms> #print "OK!";
 dgpms> 
 dgpms> my $dbh=DBI->connect('DBI:mysql:c:\InetPub\wwwroot\cgi-bin\base') or die
 dgpms> $DBI::errstr; 
 dgpms> print "OK!";
 dgpms> 
 dgpms> my $table_date = $dbh->prepare("select * from pdffile");
 
 $table_date->>execute() or die $table_date->errstr();
 
 dgpms> 
 dgpms> my @fields =@{$table_date -> NAME};
 dgpms> my @types=@{$table_date -> TYPE};
 dgpms> my @not_null = @{$table_date -> is_not_null};
 dgpms> my @lenght = @{$table_date -> lenght};
 $dbh->>disconnect;
 dgpms> print join "<br>", @fields;
 dgpms> print join "<br>", @types;
 dgpms> print join "<br>", @not_null;
 dgpms> print join "<br>", @lenght;
 dgpms> print "OK!"
 dgpms> 
 dgpms> сижу под виндами, файл pdffile.pdf лежит в той-же дирректории что и сам
 dgpms> скрипт.
 dgpms> MsSQL 7.0 модули все дописываю прямо в c:\Perl\lib в виде пм файлв...
 dgpms> вопрос такой, почему ничего не возвращает скрипт. Вообще ничего.
 dgpms> Специально принты написаны все. А смысл - хочу вывести таблицу, точнее
 dgpms> все её колонки и все её столбцы.
 
 Как обычно, во-первых, DBD::mysql к MsSQL никакого отношения не имеет, а кроме
 того, он компилируемый, поэтому просто писать его в c:\Perl\lib бессмысленно.
 Во-вторых, MsSQL к формату dbf опять же отношение имеет никакое, даже если
 расширения у них одинаковые. Что-то ты странное творишь...
 --- slrn/0.9.6.3-as (Linux)
  * Origin: AKA с подствольным плюсомётом (2:5020/371.32)
 
 

Вернуться к списку тем, сортированных по: возрастание даты  уменьшение даты  тема  автор