Module
Contents
Index 🔎︎

# Access2Base

## Çfarë është Access2Base?

Access2Base është një librari Themelore LibreOffice e makrove për zhvillues programesh (personalë ose biznesi) dhe përdorues të avancuar. Ajo është një nga libraritë e ruajtura në "LibreOffice makro dhe dialogë".

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

API e dhënë nga Access2Base është menduar të jetë më konçize, intuitive dhe e thjeshtë të mësohet sesa standardja UNO API (API = Application Programming Interface).

Libraria është e dokumentuar online në http://www.access2base.com.

## Makrot e implementuara përfshijnë:

1. një API e thjeshtuar dhe zgjeruar për modifikimet e formave, dialogjeve dhe kontrolleve e ngjashme me modelin e objektit Microsoft Access,

2. një API për aksesin në bazën e të dhënave me tabelën, query, rekordet dhe objektet e fushës

3. një numër i veprimeve me një sintaksë identike me marcos/veprimet korresponduese me Microsoft Access,

4. DLookup, DSum, ... funksionet e bazës së të dhënave,

5. suporti per shenime te shkurtruara si Forms!myForm!myControl

in addition

6. a consistent errors and exceptions handler,

7. lehtësi për programimin e eventeve për forma, dialog dhe kontrolle dhe

8. suporti i të dyja formave të ngulitura dhe të pavaruara (Writer).

## Krahaso Access2Base me 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