Access2Base

Що таке Access2Base?

Access2Base - це бібліотека макросів на LibreOffice Basic для розробників програм (бізнес або особисте) і досвідчених користувачів. Це одна з бібліотек розміщених у "LibreOffice макроси та діалоги".

Функціональні можливості, надані реалізованими макросами, повністю натхненні Microsoft Access. Макроси можна викликати в основному з програми LibreOffice Base, а також з будь-якого документу LibreOffice (Writer, Calc, ...) де має сенс доступ до даних, що зберігаються в базі даних.

API, що надає Access2Base, покликаний бути гнучкішим, інтуїтивнішим та простішим для вивчення, ніж стандарт UNO API (API = Application Programming Interface - прикладний програмний інтерфейс).

Піктограма Попередження

Бібліотека документована у мережі на http://www.access2base.com


Реалізовані макроси включають:

  1. спрощений і розширюваний API для керування формами, діалогами та елементами керування подібний до об'єктної моделі Microsoft Access,

  2. API для доступу до баз даних з об'єктами таблиця, запит, набір записів та поле,

  3. багато дій з таким самим синтаксисом, як у відповідних макросах/діях Microsoft Access,

  4. функції баз даних DLookup, DSum та інші,

  5. підтримка короткого запису на зразок Forms!myForm!myControl

додатково

  1. стійкий обробник помилок та виняткових ситуацій,

  2. засоби для програмування подій форм, діалогів та елементів керування і

  3. підтримка як вбудованих, так і окремих (Writer) форм.

Порівняння Access2Base та Microsoft Access VBA


   REM Open a form ... 
             OpenForm("myForm") 
   REM Move a form to new left-top coordinates ... 
             Dim ofForm As Object  ' In VBA =>  Dim ofForm As Form 
             Set ofForm = Forms("myForm") 
             ofForm.Move(100, 200) 
   REM Get the value of a control ... 
             Dim ocControl As Object 
             ocControl = ofForm.Controls("myControl") 
             MsgBox ocControl.Value 
   REM Hide a control ... 
             ocControl.Visible = False 
   REM ... or alternatively ... 
             setValue("Forms!myForm!myControl.Visible", False)  '  Shortcut notation 
             ' In VBA =>  Forms!myForm!myControl.Visible = False