I have opened the database and can extract data from a table with limited success.
What I have done so far is open the database using
use Win32::ODBC;
etc
Then I have the following code:
Expand|Select|Wrap|Line Numbers
- #while ($db->FetchRow()) {
- while ($i<10) {
- $db->FetchRow() ;
- my %Data = $db->DataHash();
- print $i," ",$Data{Au_plot},"," ;
- print $Data{Cu},"," ;
- print $Data{Zn},"," ;
- print $Data{Pb};
- $i++;
- print "\n";
- }
But when I use
Expand|Select|Wrap|Line Numbers
- while ($db->FetchRow()) {
- instead of
- while ($i<10) {
Could someone tell me what is going on please?
Thanks
Chris