And, in case you're curious, here's a throwaway program I
threw together once just to see if I could get it to work:
use Win32::ODBC;
$Data = new Win32::ODBC("DatbaseTest");
unless (defined($Data)) {
print "Failed to connect to the DSN.\n";
exit();
}
$command = qq{SELECT * FROM "Test Table" WHERE (("vacancy" = 'W9920')
+AND ("FullName" CONTAINS 'ke'))};
if (! $Data->Sql($command)){
@FieldNames = $Data->FieldNames();
while($Data->FetchRow()){
undef %Data;
%record = $Data->DataHash();
print "Name is $record{'FullName'}\n";
}
exit();
} else {
print "Error:".Win32::ODBC::Error();
}
This assumes, of course, that you have established an ODBC
data source using the ODBC Control Panel in Win98/NT.
Gary Blackburn
Trained Killer