diff options
author | Jean-Pierre Ledure <jp@ledure.be> | 2018-08-25 15:19:50 +0200 |
---|---|---|
committer | Jean-Pierre Ledure <jp@ledure.be> | 2018-08-25 15:19:50 +0200 |
commit | fc45d4ae3ab0fb42739571df97bd2cdd46341467 (patch) | |
tree | 3d3568aaed9b5d191e98259d40398e462e6436a7 /wizards | |
parent | f903dd5e21265e0b520c312bc41cd65a1ab74851 (diff) |
Access2Base - Fix typo
Typo error in commit f903dd5e21265e0b520c312bc41cd65a1ab74851
Change-Id: I3c770296d1d4063c6bd3190eb90df0389ecf8f26
Diffstat (limited to 'wizards')
-rw-r--r-- | wizards/source/access2base/Database.xba | 2 | ||||
-rw-r--r-- | wizards/source/access2base/DoCmd.xba | 1 |
2 files changed, 2 insertions, 1 deletions
diff --git a/wizards/source/access2base/Database.xba b/wizards/source/access2base/Database.xba index 69988fb4c9af..46592218e1f2 100644 --- a/wizards/source/access2base/Database.xba +++ b/wizards/source/access2base/Database.xba @@ -228,7 +228,7 @@ Const cstThisSub = "Database.Close" If _DbConnect <> DBCONNECTANY Then Goto Error_NotApplicable With Connection - If Utils.hasUNOMethod(Connection, "flush") Then .flush + If Utils._hasUNOMethod(Connection, "flush") Then .flush .close() .dispose() End With diff --git a/wizards/source/access2base/DoCmd.xba b/wizards/source/access2base/DoCmd.xba index 161b544a87fe..447cd7736856 100644 --- a/wizards/source/access2base/DoCmd.xba +++ b/wizards/source/access2base/DoCmd.xba @@ -275,6 +275,7 @@ Const cstProgressMeterLimit = 100 _ConvertDataDescriptor oSourceCol, oSourceDatabase._RDBMS, oTargetCol, oDatabase oTarget.Columns.appendByDescriptor(oTargetCol) Next i + ' Copy keys Set oSourceKeys = oSourceTable.Keys Set oTargetKey = oTarget.Keys.createDataDescriptor() |