--- a/lib/ObjectModel/DBIBackEnd.pm
+++ b/lib/ObjectModel/DBIBackEnd.pm
@@ -545,8 +545,9 @@
 sub UseDBIBackEnd
 {
   my $class = shift;
-
-  $ObjectModel::BackEnd::ActiveBackEnd = $class->new();
-  $ObjectModel::BackEnd::ActiveBackEnd->{ConnectArgs} = \@_;
+  my $DbSelector = shift;
+
+  $ObjectModel::BackEnd::ActiveBackEnds{$DbSelector} = $class->new();
+  $ObjectModel::BackEnd::ActiveBackEnds{$DbSelector}->{ConnectArgs} = \@_;
 }
 1;