Access2Base

Что такое Access2Base?

Access2Base - это библиотека макросов LibreOffice на языке Basic для разработчиков приложений и опытных пользователей (для коммерческого или личного использования). Это одна из библиотек, находящихся в разделе "Макросы и окна LibreOffice".

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

API, предоставляемый Access2Base, короче, интуитивно понятнее и проще в освоении, чем стандартный UNO API (API = Appication Programming Interface, интерфейс прикладного программирования).

Эта библиотека документирована онлайн на сайте http://www.access2base.com.

Реализованные макросы включают в себя:

1. простой и расширяемый API для манипуляций с формами , диалогами и элементами управления , аналогичными объектной модели Microsoft Access,

2. API для доступа к объектам баз данных таблицы, запроса, recordset и записи,

3. ряд действий с синтаксисом, идентичным соответствующим макросам/действиям Microsoft Access,

4. DLookup, DSum, ... функции баз данных,

5. поддержка сокращенных обозначений, таких как Forms!myForm!myControl

в дополнение

6. последовательный обработчик ошибок и исключений,

7. средства для программирования форм, диалогов и управления событиями и

8. поддержка как встроенных форм, так и автономных (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