Hey all,
I'm trying to use DBD::ADO in my project but one weird thing is
happening when I'm trying to execute simple SELECT statement.
Here is the code snippet:
my $dsn = "Provider=Microsoft.Jet.OLEDB.4.0;Data
Source=d:\\pub\\movies.db";
my $dbh = DBI->connect( "dbi:ADO:$dsn",
undef, undef, {RaiseError => 1,
PrintError => 1,
AutoCommit
=> 0}) || die DBI->errstr;
#Note: The connection is succesful
my $resGenres = $dbh->prepare($query); # $query is a SELECT statement
$resGenres->execute || die $dbh->errstr;
my ($Genre, @Genres);
$resGenres->bind_columns(\($Genre));
while ($resGenres->fetch) {
push @Genres, $Genre;
};
$resGenres->finish;
The error reads "Can't locate auto/DBI/SQL_BIT.al in @INC (@INC
contains: D:/Program Files/Perl/lib D:/Program Files/Perl/site/lib .) at
D:/Program Files/Perl/site/lib/DBD/ADO.pm line 1303".
If I comment all instances of DBI::SQL_BIT() out in ADO.pm the error
disappears.
The DBD::ADO version is 2.6.
Any ideas why its happening and how to fight it?
Thanks,
Max