Hi,
I have a problem with the following code:
--------------------------------------------
use DBI;
my $msdbh = DBI->connect("dbi:ODBC:EasyArchiv", "user", "pass", { RaiseError
=> 1, PrintError => 1, AutoCommit => 1 } ) or die $DBI::errstr;
$mssth = $msdbh->prepare("USE REFDB") ;
$mssth->execute;
print "$DBI::errstr\n";
my $db2dbh = DBI->connect("dbi:ODBC:DB2J21", "user", "pass", { RaiseError =>
1, PrintError => 1, AutoCommit => 1} ) or die $DBI::errstr;
print "$DBI::errstr\n";
$msdbh->disconnect;
$db2dbh->disconnect;
---------------------------------------------
As soon as I run this, perl.exe crashes. When I remove either the MSSQL
(EasyArchiv) or the DB2 part, it works. Am I not allowed to have to connects
running?
Lars
