R
Regent
Hi, friends
I'm getting lots of "Use of uninitialized value in array element at C:/Perl/lib/Win32/ODBC.pm line 256."
It seems that each matching row in the database returns this line.
Here's how I typically use Win32::ODBC
#!C:/Perl/bin/Perl -wT
use strict;
# <snip>
my $myDb= new Win32::ODBC("$DSN");
if (! $myDb)
{
print STDERR "error connecting to $DSN";
Win32::ODBC:umpError();
die;
}
else
{
$myDb->Sql("SELECT * FROM courses WHERE coursename = '$query'");
my (@fields) = $myDb->FieldNames();
while ($myDb->FetchRow())
{
my (%values) = $myDb->DataHash();
print $values{'coursename'};
}
$myDb->Close();
}
Thanks for any help!
Regent
(e-mail address removed)
I'm getting lots of "Use of uninitialized value in array element at C:/Perl/lib/Win32/ODBC.pm line 256."
It seems that each matching row in the database returns this line.
Here's how I typically use Win32::ODBC
#!C:/Perl/bin/Perl -wT
use strict;
# <snip>
my $myDb= new Win32::ODBC("$DSN");
if (! $myDb)
{
print STDERR "error connecting to $DSN";
Win32::ODBC:umpError();
die;
}
else
{
$myDb->Sql("SELECT * FROM courses WHERE coursename = '$query'");
my (@fields) = $myDb->FieldNames();
while ($myDb->FetchRow())
{
my (%values) = $myDb->DataHash();
print $values{'coursename'};
}
$myDb->Close();
}
Thanks for any help!
Regent
(e-mail address removed)