diff --git a/comp/src/gb.web/.src/SqliteSessionManager.class b/comp/src/gb.web/.src/SqliteSessionManager.class
index fd80a4edb..34a466ea2 100644
--- a/comp/src/gb.web/.src/SqliteSessionManager.class
+++ b/comp/src/gb.web/.src/SqliteSessionManager.class
@@ -38,11 +38,14 @@ End
 Public Sub Load() As Boolean
   
   Dim rConf As Result
+  Dim hSave As Connection
 
   If Not Exist($sPath) Then Goto _ABANDON
   
   Me.Size = Stat($sPath).Size
   
+  hSave = DB.Current
+  
   $hConn = New Connection
   $hConn.Type = "sqlite"
   $hConn.Host = File.Dir($sPath)
@@ -50,6 +53,8 @@ Public Sub Load() As Boolean
   
   $hConn.Open
   
+  DB.Current = hSave
+  
   rConf = $hConn.Find("config")
 
   $eStartup = rConf!fStartup