SAVE POSITION IN TREEVIEW

[bakerm]

I need to know how to reload a treeview control and have it expand out to index the user was previously at. This could be several levels deep at times.

Any help would be greatly appreciated.

Mark

 

[edderic]

a example of me after save and reload the listview :

Dim adoCon As Connection
Dim adoCmd As Command
Dim adoRS As Recordset
Dim cmdtext As String
Dim lstItem As ListItem

lstTitles.ListItems.Clear
' here we are building the SQL statement based upon the filter drop down
If cmbFilter.Text = "Selecteer Categorie" Then
cmdtext = "SELECT id, title, codetype FROM source "
Else
cmdtext = "SELECT id, title, codetype FROM source WHERE codetype='" & StuffQuotes(cmbFilter.Text) & "' "
End If

'connect to the database and retrieve the code
Set adoCon = CreateObject("ADODB.Connection&quot
adoCon.Open gblConnectString
Set adoCmd = CreateObject("ADODB.Command&quot
adoCmd.ActiveConnection = adoCon
adoCon.CursorLocation = adUseClientBatch
adoCmd.CommandText = cmdtext
Set adoRS = adoCmd.Execute

'loop through the recordset and add each item to the listview
Do While Not adoRS.EOF
Set lstItem = lstTitles.ListItems.Add(, , adoRS("title&quot)
lstItem.Tag = adoRS("id&quot 'used for updating and deleting
lstItem.SubItems(1) = CStr(adoRS("codetype&quot)
adoRS.MoveNext
Loop
lstTitles_Click 'reset the list
'make sure to clean up after ourselves
adoRS.Close
Set adoRS = Nothing
Set adoCmd = Nothing
adoCon.Close
Set adoCon = Nothing
Exit Sub Eric De Decker
vbg.be@vbgroup.nl

Licence And Copy Protection AxtiveX
Source CodeBook for the programmer

http://www.createsoftware2000.com

 

[Guest_imported]

Before reloading the TV, store .SelectedItem.Key. After reloading, set TV.Nodes(strKeyValue).Selected = True.

Remember to trap for errors. The previously selected node may not exist after reloading.

Craig Boland