Moduł
Spis treści
Indeks 🔎︎

# Access2Base

## Co to jest Access2Base ?

Access2Base jest biblioteką makr LibreOffice Basic dla (biznesowych lub osobistych) programistów i zaawansowanych użytkowników. Jest to jedna z bibliotek przechowywanych w "LibreOffice makra i okna dialogowe".

Funkcjonalności zapewniane przez zaimplementowane makra są bezpośrednio inspirowane przez Microsoft Access. Makra można wywoływać głównie z aplikacji LibreOffice Base , ale także z dowolnego dokumentu LibreOffice (Writer, Calc, ...), w którym ma sens dostęp do danych przechowywanych w bazie danych.

API dostarczone przez Access2Base jest przeznaczone do tego, by być bardziej zwięzłym, intuicyjnym i łatwiejszym do opanowania niż standardowe API UNO (API = Application Programming Interface).

Biblioteka jest udokumentowana w Internecie na http://www.access2base.com.

## Zaimplementowane makra zawierają:

1. uproszczone i rozszerzalne API dla formularzy, okien dialogowych i formantów manipulacje podobne z modelu obiektowego Microsoft Access,

2. API dostępu do bazy danych z tabelą, kwerendą, zestawem rekordów i obiektami pola,

3. liczba akcji o składni identycznej do odpowiednich makr/akcji Microsoft Access

4. DLookup, DSum, ... funkcje bazodanowe,

5. wsparcie notacji skrótu jak Forms!myForm!myControl

dodatkowo

6. spójna obsługa błędów i wyjątków,

7. udogodnienia dla programowania zdarzeń formularza, okna dialogowego i formantu

8. wsparcie dla formularzy osadzonych i samodzielnych (Writer).

## Porównanie Access2Base z 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