SQLを実行するマクロ（INSERT）　−LibreOffice Base−

2019/6/24 2020/3/15 LibreOffice, LibreOffice Base, Linux

LibreOffice BASE は使えるか？ (2) マクロで、SQL実行 – Qiita　より。

Sub Do_Sql(sql as String)
    'msgbox(sql)
    oresult = ThisDataBaseDocument.DataSource.getconnection("","").createstatement.executequery(sql)
End Sub

↑で、SQLが実行されるようです。

↓例えば、次のような感じで使うことになるのでしょうね。

Sub Insert_Sql
    Dim tmpStr as String
    tmpStr = "insert into ""T_main"" (""ID"",""NAME"") Values(1,'山田太郎')"
    call Do_Sql(tmpStr)
End Sub

（　LibreOffice 6.2.0.3　／　Linux Mint Debian Edition3(LMDE3)”Cindy”　）