Innhold

# Access2Base

## Hva er Access2Base?

Access2Base er et LibreOffice BASIC-bibliotek med makroer for (forretningsmessige eller personlige) applikasjonsutviklere og avanserte brukere. Det er et av bibliotekene som er lagret i "Applikasjonsmakroer og dialoger".

Funksjonene som tilbys av de implementerte makroene er alle direkte inspirert av Microsoft Access. Makroene kan anropes hovedsakelig fra en LibreOffice Base-applikasjon, men også fra ethvert LibreOffice-dokument (Writer, Calc, ...) hvor tilgang til data lagret i en database der dette gir mening.

API-en som kommer med Access2Base er mer konsise, intuitive og lettere å lære enn de vanlige UNO API-ene. (API = Application Programming Interface eller applikasjonsprogrammeringsgrensesnitt på norsk).

Biblioteket er dokumentert på http://www.access2base.com

## De implementerte makroene inkluderer:

1. et forenklet og utvidbart API for skjema, dialoger og kontrollelement lignende MSAccess objekt modellen

2. Et API for database aksess medtabell, spørring, poster ogfelt objekter

3. en rekke med handlinger med en syntaksidentisk med de tilsvarende MSAccess makroer/handlinger

4. DLookup, DSum, ... databasefunksjonene,

5. støtte for snarveinotasjon som Forms!myForm!myControl.

i tillegg

6. en konsistent feil og unntakshåndterer

7. funksjonalitet for å programmere formulær, dialoger og kontroller handlinger

8. støtte for både innebygde og sjelvstendige (Writer) skjema

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