Indhold

# Access2Base

## Hvad er Access2Base?

Access2Base er et LibreOffice BASIC-bibliotek af makroer til (forretningsmæssige eller personlige) applikationsudviklere og avancerede brugere. Det er et af bibliotekerne, der er gemt i "Applikationsmakroer og dialogbokse".

Funktionaliteterne fra de implementerede makroer er alle direkte inspireret af Microsoft Access. Makroerne kan hovedsageligt kaldes fra en LibreOffice Base-applikation, men også fra ethvert LibreOffice-dokument (Writer, Calc, ...), hvor adgang til data gemt i en database giver mening.

API'et som kommer med Access2base er mere kortfattet, intuitivt og lettere at lære end det normale UNO API (API = Application Programming Interface).

Biblioteket er dokumenteret online på http://www.access2base.com

## De aktuelle makroer er blandt andet:

1. et simpelt API, som kan udvides, til manipulation af formularer, dialoger og kontrolelementer som ligner Microsoft Access' objektmodel

2. et API til databasetilgang objekterne tabel, forespørgsel, poster og felter

3. en række handlinger med syntaks, som er identisk med de tilsvarende Microsoft Access makroer/handlinger

4. databasefunktionerne DLookup, DSum, ...

5. understøttelse for genveje som Forms!minFormular!metKontrolelement

og derudover

6. en konsistent fejl- og undtagelseshåndtering

7. faciliteter til programmering af formularer, dialoger og kontrolelementhandlinger og

8. understøttelse af både indlejrede formularer og selvstændige (Writer-) formularer.

## Sammenlign Access2Base med 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