Sorry for that late answer, but I was ill the last three weeks.
I've solved the problem! I want to post the solution:
You have to change the $dsn-String. The path to the .mdw-file has to be added with the key "SystemDB":
#! /usr/bin/perl
use strict;
use warnings;
use DBI;
my $user = 'username';
my $pass = 'password';
my $dsn = 'driver=Microsoft Access-Treiber (*.mdb); ';
$dsn .= 'dbq=db1.mdb; SystemDB=c:\path\to\file.mdw';
# to add the SystemDB-key is the solution!
my $dbh = DBI->connect("DBI:ODBC:$dsn",$user,$pass)
or die $DBI::errstr;
[...]
|