From 6f0dc4334a2772e14d8a1c771e9f31108212c506 Mon Sep 17 00:00:00 2001 From: Jean-Pierre Ledure Date: Tue, 13 Nov 2018 09:08:01 +0100 Subject: Access2Base - tdf#121342 Increase number of recordsets RecordsetMax attribute of Database object is increased by 1 at each Recordset opening. It is reset to zero at each database opening. While the database remains open it is increased without limit. Make it a Long type i.o. an Integer one. Change-Id: Ifc9854cddc1917e4336c0c0c5aa1048623de2a49 --- wizards/source/access2base/Database.xba | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/wizards/source/access2base/Database.xba b/wizards/source/access2base/Database.xba index 7f1d5e726572..cbaa96555e06 100644 --- a/wizards/source/access2base/Database.xba +++ b/wizards/source/access2base/Database.xba @@ -34,7 +34,7 @@ Private _ColumnTypesAlias() As Variant ' To what should a field whose o Private _BinaryStream As Boolean ' False = binary fields must NOT be streamed f.i. via ReadAllBytes or WriteAllBytes Private Form As Object ' com.sun.star.form.XForm Private FormName As String -Private RecordsetMax As Integer +Private RecordsetMax As Long ' To make unique names in Collection below (See bug # 121342) Private RecordsetsColl As Object ' Collection of active recordsets REM ----------------------------------------------------------------------------------------------------------------------- -- cgit