Thanks again Paulo for availability. Why do you think that this doenst work for me:
cmd.CommandText="Select ubic From inventario Group By ubic Order By ubic Asc"
reader.Value=cmd.ExecuteReader
do while reader.ReadNextRow=true
combo.add(reader.GetValue(0))
loop
And this is my code:
Sub App_Start
Form1.Show
Con.New1
Reader.New1
Tree.New1("Form2", 5, 5, Form2.Width - 10, Form2.Height - 10)
Node.New1
Cmd.New1("",con.Value)
Con.Open("Data Source = " & AppPath & "\inventario.s3db") 'Opens a connection with the database.
AddEvent("btnExecute",Click,"mnuExecute_Click") 'The button and the menu use the same sub.
EditableTable.SetEdit("Main.Table1","Main.Validate","")
End Sub
Should i create a new reader with other name? I did that and nothing. Where should i find out what is a reader?
Thanks