Ik wil data ophalen uit een MS SQL database via een vb applicatie. Deze wil ik in strings stoppen. Dus niet met een Datagrid en die andere zooi. Ik wil gewoon elk veldje in een String stoppen, zodat ik dat met een TreeView kan tonen op hierarchisch niveau
code:
1
2
3
4
5
6
7
8
9
10
11
| Dim strSQL as String
Dim rsTmp as Recordset
strSQL = "SELECT Kolom " _
& "FROM Tabel"
Set rsTmp = Conn.Execute(strSQL)
For i = 0 to rsTmp.Recordcount - 1
str = rsTmp.Fields("Kolom")
rsTmp.MoveNext
Next i |
Pseudo code:
Je moet natuurlijk eerst een root node aanmaken en met die (en z'n id) de 1e AddNodes aanroepen
Visual Basic:
1
2
3
4
5
6
7
| functie AddNodes(nodeParent, id) result = "select from table where parentid = " & id while not result. EOF nodeChild = nodeParen.AddChild(result.name) AddNodes(nodeChild, result.ID) end end functie |
Je moet natuurlijk eerst een root node aanmaken en met die (en z'n id) de 1e AddNodes aanroepen
oogjes open, snaveltjes dicht
Verwijderd
Ik weet eigenlijk nix van sql af, maar als je het in een datacontrol stopt, wat volgens mij kan als je het ook in een grid kan stoppen, kan je een aantal textboxen de weergave van de records laten doen, lees de textboxen uit en je bent klaar