use strict; use Win32::ODBC; my $DSN = "DRIVER=Microsoft Access Driver (*.mdb);FIL=MSAccess;DriverId=25;DBQ=c:\\perlscript\\NOTICE.mdb"; my $db; my $query = "INSERT INTO logfile ({Date Send}, {Certificate file} ) VALUES ('01/01/02' 'junk')"; if (!($db = new Win32::ODBC($DSN))) { print "Error connecting to $DSN\n"; print "Error: " . Win32::ODBC::Error() . "\n"; } if ( $db->Sql($query)) { print "error executing query [ \"$query\" ]\n"; print "Error: " . Win32::ODBC::Error() . "\n"; } $db->Close();