RE: perl.exe crashes with 2 connects

[Sterin, Ilya (I.)]

Use trace...

DBI->trace(2, "trace.log");

-----Original Message-----
From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]]
Sent: Wednesday, December 04, 2002 8:01 AM
To: [EMAIL PROTECTED]
Subject: perl.exe crashes with 2 connects


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