Nvite nekdo prosim, kde lze nalezt priklady pouziti Win32::OD

[Roztocil Bohuslav]

Nejsme si zcela jist, ale neni DBD pro ODBC postaven nad Win32::ODBC?
Nicmene souhlasim, ze je lepsi pouzivat DBI.

Bob
-----Original Message-----
From: Polak Michal 
Posted At: Friday, April 30, 1999 7:42 AM
Posted To: cz.comp.lang.perl
Conversation: Nvite nekdo prosim, kde lze nalezt priklady pouziti
Win32::ODBC ???
Subject: Re: Nvite nekdo prosim, kde lze nalezt priklady pouziti
Win32::ODBC


> -----Původní zpráva-----
> Od: daemon na pandion.vslib.cz [mailto:daemon na pandion.vslib.cz]za
uživatele
> jindra na vavruska.cz (Jindra Vavruska)
> Předmět: Nvite nekdo prosim, kde lze nalezt priklady pouziti
Win32::ODBC
> --
> Jindra Vavruska (OK1FOU)

Dobry den,

o Win32::ODBC jsem nic neslysel.
Neslo by pouzit DBI ?
Toto je priklad, jak pristupuji na MSSQL, ktery nema/nenasel jsem
nativni ovladace. Nevi o nich nekdo ?

use DBI;
use strict;
my $dbi = DBI->connect ('dbi:ODBC:VIS','','') or die "$DBI::errstr";
#VIS je system DSN, pouziva se Trusted connection via NT
my $sh = $dbi->prepare('select * from Osoba') or die "Can't prepare
statement: $DBI::errstr";;
my $data = $sh->execute || die "Can't execute statement: $DBI::errstr";
while (my @data = $sh->fetchrow_array) { 
  print join ", ", @data, "\n";
};
$sh->finish;
$dbi->disconnect;