Access2Base

Mi az az Access2Base?

Az Access2Base egy LibreOfficeDev BASIC makrógyűjtemény (üzleti vagy személyes) alkalmazások fejlesztőinek és gyakorlott felhasználóknak. Egyike az „Alkalmazásmakrók és -ablakok” alatt tárolt programkönyvtáraknak.

The functionalities provided by the implemented macros are all directly inspired by Microsoft Access. The macros are callable mainly from a LibreOfficeDev Base application, but also from any LibreOfficeDev document (Writer, Calc, ...) where access to data stored in a database makes sense.

Az Access2Base API-ját tömörebbnek, intuitívabbnak és egyszerűbben tanulhatónak tervezték, mint a szabványos UNO API-t.

A programkönyvtár online dokumentációja a http://www.access2base.com oldalon érhető el.

A megvalósított makrók közé tartozik:

1. egyszerűsített és bővíthető API űrlapok, párbeszédablakok és vezérlőelemek kezeléséhez a Microsoft Access objektummodellhez hasonlóan,

2. adatbázis-eléréshez használható API tábla, lekérdezés, rekordhalmaz és mező objektumokkal,

3. számos művelet a megfelelő Microsoft Access makrókkal/műveletekkel azonos szintaxissal,

4. a DLookup, DSum, ... adatbázis-függvények,

5. rövidített jelölés támogatása, például: Forms!myForm!myControl

továbbá

6. konzisztens hiba- és kivételkezelő,

7. szolgáltatások űrlap-, párbeszédablak-, és vezérlőesemények programozásához, és

8. beágyazott űrlapok és önálló (Writer) űrlapok támogatása.

Az Access2Base és az Microsoft Access VBA összehasonlítása

   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