#!perl
use Win32::ODBC;
$DSN = "cheat";
if (!($db = new Win32::ODBC($DSN))){
print "Error connecting to $DSN\n";
print "Error: " . Win32::ODBC::Error() . "\n";
exit;
}
if (!($dbORG = new Win32::ODBC($DSN))){
print "Error connecting to $DSN\n";
print "Error: " . Win32::ODBC::Error() . "\n";
exit;
}
$SqlStatement = "SELECT * FROM tblCheats";
if ($dbORG->Sql($SqlStatement)){
print "SQL failed.\n";
print "Error: " . $dbORG->Error() . "\n";
$$dbORG->Close();
exit;
}
while($dbORG->FetchRow()){
undef %Data2;
%Data2 = $dbORG->DataHash();
print "$Data2{'name'}\n";
}
In reply to Re: WIN32::ODBC Returning to few rows...
by KrYo
in thread WIN32::ODBC Returning to few rows...
by KrYo
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |