Set rs = db.OpenRecordset("Select * from '" & TreeView1.SelectedItem.TeXt & "' where nome = '" & Trim(TreeView1.Nodes(TreeView1.SelectedItem.index)) & "'")