#AdditionalJar: sqlite-jdbc-3.7.2
Sub Process_Globals
.
.
.
Private sql1 As SQL
End Sub
Sub AppStart (Form1 As Form, Args() As String)
.
.
.
.
.
'open DB
Try
sql1.InitializeSQLite(File.DirApp,"data/rflink_data.db", False)
Log("Database open")
Catch
Log("Unable to open database")
End Try
Find_device("TEST")' JUST FOR TEST !!!!!!
End Sub
Sub Find_device(tmpDevice As String)
Dim mlist As List
mlist.Initialize
mlist=DBUtils.ExecuteMemoryTable(sql1,"SELECT * FROM switches WHERE Name =?" ,tmpDevice,0)
Log("mlist" & mlist)
End Sub