Access2Base
Π§ΡΠΎ ΡΠ°ΠΊΠΎΠ΅ Access2Base?
Access2Base - ΡΡΠΎ Π±ΠΈΠ±Π»ΠΈΠΎΡΠ΅ΠΊΠ° ΠΌΠ°ΠΊΡΠΎΡΠΎΠ² LibreOffice Π½Π° ΡΠ·ΡΠΊΠ΅ Basic Π΄Π»Ρ ΡΠ°Π·ΡΠ°Π±ΠΎΡΡΠΈΠΊΠΎΠ² ΠΏΡΠΈΠ»ΠΎΠΆΠ΅Π½ΠΈΠΉ ΠΈ ΠΎΠΏΡΡΠ½ΡΡ ΠΏΠΎΠ»ΡΠ·ΠΎΠ²Π°ΡΠ΅Π»Π΅ΠΉ (Π΄Π»Ρ ΠΊΠΎΠΌΠΌΠ΅ΡΡΠ΅ΡΠΊΠΎΠ³ΠΎ ΠΈΠ»ΠΈ Π»ΠΈΡΠ½ΠΎΠ³ΠΎ ΠΈΡΠΏΠΎΠ»ΡΠ·ΠΎΠ²Π°Π½ΠΈΡ). ΠΡΠΎ ΠΎΠ΄Π½Π° ΠΈΠ· Π±ΠΈΠ±Π»ΠΈΠΎΡΠ΅ΠΊ, Π½Π°Ρ ΠΎΠ΄ΡΡΠΈΡ ΡΡ Π² ΡΠ°Π·Π΄Π΅Π»Π΅ "ΠΠ°ΠΊΡΠΎΡΡ ΠΈ ΠΎΠΊΠ½Π° LibreOffice".
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, ΠΏΡΠ΅Π΄ΠΎΡΡΠ°Π²Π»ΡΠ΅ΠΌΡΠΉ Access2Base, ΠΊΠΎΡΠΎΡΠ΅, ΠΈΠ½ΡΡΠΈΡΠΈΠ²Π½ΠΎ ΠΏΠΎΠ½ΡΡΠ½Π΅Π΅ ΠΈ ΠΏΡΠΎΡΠ΅ Π² ΠΎΡΠ²ΠΎΠ΅Π½ΠΈΠΈ, ΡΠ΅ΠΌ ΡΡΠ°Π½Π΄Π°ΡΡΠ½ΡΠΉ UNO API (API = Appication Programming Interface, ΠΈΠ½ΡΠ΅ΡΡΠ΅ΠΉΡ ΠΏΡΠΈΠΊΠ»Π°Π΄Π½ΠΎΠ³ΠΎ ΠΏΡΠΎΠ³ΡΠ°ΠΌΠΌΠΈΡΠΎΠ²Π°Π½ΠΈΡ).
ΠΡΠ° Π±ΠΈΠ±Π»ΠΈΠΎΡΠ΅ΠΊΠ° Π΄ΠΎΠΊΡΠΌΠ΅Π½ΡΠΈΡΠΎΠ²Π°Π½Π° ΠΎΠ½Π»Π°ΠΉΠ½ Π½Π° ΡΠ°ΠΉΡΠ΅ http://www.access2base.com.
Π Π΅Π°Π»ΠΈΠ·ΠΎΠ²Π°Π½Π½ΡΠ΅ ΠΌΠ°ΠΊΡΠΎΡΡ Π²ΠΊΠ»ΡΡΠ°ΡΡ Π² ΡΠ΅Π±Ρ:
-
ΠΏΡΠΎΡΡΠΎΠΉ ΠΈ ΡΠ°ΡΡΠΈΡΡΠ΅ΠΌΡΠΉ API Π΄Π»Ρ ΠΌΠ°Π½ΠΈΠΏΡΠ»ΡΡΠΈΠΉ Ρ ΡΠΎΡΠΌΠ°ΠΌΠΈ , Π΄ΠΈΠ°Π»ΠΎΠ³Π°ΠΌΠΈ ΠΈ ΡΠ»Π΅ΠΌΠ΅Π½ΡΠ°ΠΌΠΈ ΡΠΏΡΠ°Π²Π»Π΅Π½ΠΈΡ , Π°Π½Π°Π»ΠΎΠ³ΠΈΡΠ½ΡΠΌΠΈ ΠΎΠ±ΡΠ΅ΠΊΡΠ½ΠΎΠΉ ΠΌΠΎΠ΄Π΅Π»ΠΈ Microsoft Access,
-
API Π΄Π»Ρ Π΄ΠΎΡΡΡΠΏΠ° ΠΊ ΠΎΠ±ΡΠ΅ΠΊΡΠ°ΠΌ Π±Π°Π· Π΄Π°Π½Π½ΡΡ ΡΠ°Π±Π»ΠΈΡΡ, Π·Π°ΠΏΡΠΎΡΠ°, recordset ΠΈ Π·Π°ΠΏΠΈΡΠΈ,
-
ΡΡΠ΄ Π΄Π΅ΠΉΡΡΠ²ΠΈΠΉ Ρ ΡΠΈΠ½ΡΠ°ΠΊΡΠΈΡΠΎΠΌ, ΠΈΠ΄Π΅Π½ΡΠΈΡΠ½ΡΠΌ ΡΠΎΠΎΡΠ²Π΅ΡΡΡΠ²ΡΡΡΠΈΠΌ ΠΌΠ°ΠΊΡΠΎΡΠ°ΠΌ/Π΄Π΅ΠΉΡΡΠ²ΠΈΡΠΌ Microsoft Access,
-
DLookup, DSum, ... ΡΡΠ½ΠΊΡΠΈΠΈ Π±Π°Π· Π΄Π°Π½Π½ΡΡ ,
-
ΠΏΠΎΠ΄Π΄Π΅ΡΠΆΠΊΠ° ΡΠΎΠΊΡΠ°ΡΠ΅Π½Π½ΡΡ ΠΎΠ±ΠΎΠ·Π½Π°ΡΠ΅Π½ΠΈΠΉ, ΡΠ°ΠΊΠΈΡ ΠΊΠ°ΠΊ Forms!myForm!myControl
Π² Π΄ΠΎΠΏΠΎΠ»Π½Π΅Π½ΠΈΠ΅
-
ΠΏΠΎΡΠ»Π΅Π΄ΠΎΠ²Π°ΡΠ΅Π»ΡΠ½ΡΠΉ ΠΎΠ±ΡΠ°Π±ΠΎΡΡΠΈΠΊ ΠΎΡΠΈΠ±ΠΎΠΊ ΠΈ ΠΈΡΠΊΠ»ΡΡΠ΅Π½ΠΈΠΉ,
-
ΡΡΠ΅Π΄ΡΡΠ²Π° Π΄Π»Ρ ΠΏΡΠΎΠ³ΡΠ°ΠΌΠΌΠΈΡΠΎΠ²Π°Π½ΠΈΡ ΡΠΎΡΠΌ, Π΄ΠΈΠ°Π»ΠΎΠ³ΠΎΠ² ΠΈ ΡΠΏΡΠ°Π²Π»Π΅Π½ΠΈΡ ΡΠΎΠ±ΡΡΠΈΡΠΌΠΈ ΠΈ
-
ΠΏΠΎΠ΄Π΄Π΅ΡΠΆΠΊΠ° ΠΊΠ°ΠΊ Π²ΡΡΡΠΎΠ΅Π½Π½ΡΡ ΡΠΎΡΠΌ, ΡΠ°ΠΊ ΠΈ Π°Π²ΡΠΎΠ½ΠΎΠΌΠ½ΡΡ (Writer) ΡΠΎΡΠΌ.
Π‘ΡΠ°Π²Π½Π΅Π½ΠΈΠ΅ Access2Base Ρ 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