Access2Base

Vad Àr Access2Base?

Access2Base Àr ett LibreOffice Basic makrobibliotek för programutvecklare (kommersiellt eller privat) samt avancerade anvÀndare. Det Àr ett av biblioteken som lagras under "LibreOffice makron och dialoger".

Funktionerna som tillhandahÄlls av de implementerade makrona Àr alla direkt inspirerade av Microsoft Access. Makrona Àr i huvudsak anropningsbara frÄn en LibreOffice Base applikation, men ocksÄ frÄn nÄgot LibreOffice-dokument (Writer, Calc, ...) dÀr tillgÄng till data lagrad i en databas Àr meningsfull.

Det API som Access2Base ger Àr tÀnkt att vara kortfattat, intuitivt och enklare att lÀra sig Àn det normala UNO API (API = Application Programming Interface).

Varningssymbol

Biblioteket finns dokumenterat online pÄ http://www.access2base.com.


De makron som Àr implementerade inkluderar:

  1. ett förenklat och utbyggbart API för manipulering av formulÀr, dialoger and kontroller liknande Microsofts Access objektmodell,

  2. ett API för databasÄtkomst med tabell-, frÄge-, post- och fÀlt- objekt,

  3. ett antal handlingar med en syntax som Àr identisk med sina motsvarigheter i Microsoft Access makron/ÄtgÀrder

  4. DLookup, DSum, ... databasfunktionerna,

  5. stöd för kortkommandon som Forms!myForm!myControl

dessutom

  1. en konsekvent fel- och undantagshantering,

  2. hjÀlpmedel för att programmera formulÀr, dialoger och kontroll hÀndelser och

  3. stöd för bÄde inbÀddade formulÀr och fristÄende (Writer) formulÀr.

JÀmför 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