$dbh = CreateObject OLE "ADODB.Connection" or die "Can't create connection to DataBase: $!" unless $dbh;