AX SQLを実行するマクロ(INSERT) −LibreOffice Base−

SQLを実行するマクロ(INSERT) −LibreOffice Base−

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” )

シェアする

  • このエントリーをはてなブックマークに追加

フォローする