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