wizards/source/access2base/Database.xba    |    7 +++++--
 wizards/source/access2base/acConstants.xba |    2 +-
 2 files changed, 6 insertions(+), 3 deletions(-)

New commits:
commit 7a7eb2c270d598cb15ce38cefceeecba149fe467
Author:     Jean-Pierre Ledure <j...@ledure.be>
AuthorDate: Sun Jul 29 12:22:17 2018 +0200
Commit:     Jean-Pierre Ledure <j...@ledure.be>
CommitDate: Sun Jul 29 12:22:17 2018 +0200

    Access2Base - FIX: flush external connections
    
    Connections opened with DoCmd.OpenDatabase
    were not flushed when closed explicitly.
    Risk of data loss.

diff --git a/wizards/source/access2base/Database.xba 
b/wizards/source/access2base/Database.xba
index 3bd3bced482b..2a61d7e3c73a 100644
--- a/wizards/source/access2base/Database.xba
+++ b/wizards/source/access2base/Database.xba
@@ -227,8 +227,11 @@ Const cstThisSub = &quot;Database.Close&quot;
        mClose = False
        If _DbConnect &lt;&gt; DBCONNECTANY Then Goto Error_NotApplicable
 
-       Connection.close()
-       Connection.dispose()
+       With Connection
+               .flush
+               .close()
+               .dispose()
+       End With
        Set Connection = Nothing
        mClose = True
 
diff --git a/wizards/source/access2base/acConstants.xba 
b/wizards/source/access2base/acConstants.xba
index ae969182433f..e7961f5af4b0 100644
--- a/wizards/source/access2base/acConstants.xba
+++ b/wizards/source/access2base/acConstants.xba
@@ -9,7 +9,7 @@ REM 
============================================================================
 Option Explicit
 
 REM Access2Base -----------------------------------------------------
-Global Const Access2Base_Version = &quot;1.9.0&quot;
+Global Const Access2Base_Version = &quot;6.2.0&quot;           &apos;  
Alignment on LibreOffice versions
 
 REM AcCloseSave
 REM -----------------------------------------------------------------
_______________________________________________
Libreoffice-commits mailing list
libreoffice-comm...@lists.freedesktop.org
https://lists.freedesktop.org/mailman/listinfo/libreoffice-commits

Reply via email to