Access2Base

Τι είναι Access2Base;

Η Access2Base είναι μια βιβλιοθήκη μακροεντολών της BASIC του LibreOffice για προγραμματιστές εφαρμογών (επιχειρηματικούς ή προσωπικούς) και προχωρημένους χρήστες. Είναι μια από τις βιβλιοθήκες που είναι αποθηκευμένες στο "Application macros and dialogs" (Μακροεντολές και διάλογοι εφαρμογής).

Οι λειτουργίες που παρέχονται από τις υλοποιημένες μακροεντολές είναι όλες άμεσα εμπνευσμένες από τη Microsoft Access. Οι μακροεντολές μπορούν να κληθούν κυρίως από μια εφαρμογή Base του LibreOffice, αλλά και από οποιοδήποτε έγγραφο του LibreOffice (Writer, Calc, ...) όπου υπάρχει πρόσβαση σε δεδομένα που είναι αποθηκευμένα σε μια βάση δεδομένων που βγάζει νόημα.

Η API που παρέχεται από την Access2Base προορίζεται να είναι πιο περιεκτική, ευκολονόητη και εύκολη στην εκμάθηση από την τυπική API UNO (API = διεπαφή προγραμματισμού εφαρμογών).

Εικονίδιο προειδοποίησης

Η βιβλιοθήκη τεκμηριώνεται δικτυακά στο http://www.access2base.com.


Οι υλοποιημένες μακροεντολές περιλαμβάνουν:

  1. απλοποιημένο και επεκτάσιμο API για χειρισμούς φορμών, διαλόγων και στοιχείων ελέγχου παρόμοια με το πρότυπο αντικειμένου Microsoft Access,

  2. μια API για πρόσβαση βάσεων δεδομένων με αντικείμενα πινάκων, ερωτημάτων, συνόλου εγγραφών και πεδίων,

  3. αριθμό από ενέργειες με σύνταξη ταυτόσημη με τις αντίστοιχες τους στις μακροεντολές/ενέργειες του Microsoft Access,

  4. τις συναρτήσεις βάσης δεδομένων DLookup, DSum, ...

  5. υποστήριξη της σημειογραφίας συντομεύσεων όπως Forms!myForm!myControl

και επιπλέον

  1. έναν χειριστή ομοιόμορφων σφαλμάτων και εξαιρέσεων,

  2. λειτουργίες για φόρμες προγραμματισμού, διαλόγους και στοιχεία ελέγχου συμβάντων και

  3. υποστήριξη και ενσωματωμένων φορμών και αυτόνομων φορμών (Writer).

Σύγκριση της Access2Base με VBA Microsoft Access


   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