Contents
Index 🔎︎

# 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