diff --git a/Source/Servidor/uDataModuleServer.pas b/Source/Servidor/uDataModuleServer.pas index 60e4c70f..21de8c69 100644 --- a/Source/Servidor/uDataModuleServer.pas +++ b/Source/Servidor/uDataModuleServer.pas @@ -158,6 +158,8 @@ function TdmServer.DarNuevaConexion: IDAConnection; begin with ConnectionManager do Result := NewConnection(GetDefaultConnectionName, False); + if not Result.isAlive then + Result.Open; end; procedure TdmServer.IniciarLog;