Set rowcount ? no hehe :)

here's the code.... remember it returns 20 rows

#!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";
}