Dim ds As DataSet = New DataSet()
Dim conn As OleDbConnection
conn = New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Server.MapPath("dATABASE\MYTREE.mdb"))
Dim mycommand As OleDbDataAdapter
mycommand = New OleDbDataAdapter("select * from tree where TreeNode='" + NodeText + "' order by NodeNumber asc", conn)
conn.Open()
mycommand.Fill(ds)
datagrid.datasource=ds
datagrid,databind()