I would like to macro use current connection to the database (mysql throught ODBC).
I have this macro to get query results, how to change it?
Thanks for help!
Code: Select all
dim rows
rows = createUnoService("com.sun.star.sdb.RowSet")
rows.ActiveConnection = oSubForm.ActiveConnection
rows.CommandType = com.sun.star.sdb.CommandType.COMMAND
rows.Command = "SELECT `OrderItemId`, `OrderItemNameOrder`, `OrderItemQuantity`, `OrderItemIDH`, `OrderItemPrice`, `OrderItemCurrency`, `CompanyId`, `OrderItemNo` FROM `OrderItem` WHERE `OrderItemId` = " & OrderItem
rows.execute()