Dim sql As SQL
sql.InitializeSQLite("D:\Users\Patrick\OneDrive\Documents\B4X", "MQTTServer.db", False)
Dim rs As ResultSet = sql.ExecQuery("SELECT * from TesTable")
Dim ser As B4XSerializator
Dim ResultPackage() As Byte
ResultPackage = ser.ConvertObjectToBytes(rs)