Cursor = SQL1.ExecQuery("SELECT _id, name, enddate, display_date FROM event order by startdate,enddate")
For i=0 To Cursor.RowCount-1
Cursor.Position=i
ListView1.AddTwoLinesAndBitmap2(Cursor.GetString("name"), Cursor.GetString("display_date"), Null, Cursor.GetInt("_id"))
Next
Cursor.Close