> Sorry numpang tanya.....
>
> Ada yang pernah buat treeview menggunakan database engga....
>
> bagi-bagi dong ilmunya...
Emmm...maksudnya mengisi treeview tapi isinya dari database gitu ya??
Kalo itu maksudnya, simple aja sih...saya dulu ngakalinnya gini :
Pertama :
Membuat table parent-child, contoh
KODE_PERUSAHAAN (primary key)
NAMA_PERUSAHAAN
INDUK_PERUSAHAAN (Foreign key terhadap KODE_PERUSAHAAN)
Contoh datanya spt ini :
KODE_PERUSAHAAN NAMA_PERUSAHAAN INDUK_PERUSAHAAN
001 PT. Indonesia Raya NULL
002 PT. Indonesia Abadi 001
003 PT. Indo Abadi 002
Trus contoh codingnya spt ini:
Dim Cn as New ADODB.Connection
Dim Rs as New ADODB.Recordset
Dim NodeKey As String
Dim NodeParent as String
Set Rs = Cn.Execute( _
"SELECT KODE_PERUSAHAAN, NAMA_PERUSAHAAN, ISNULL
(INDUK_PERUSAHAAN,'') As INDUK_PERUSAHAAN FROM TBL_PERUSAHAAN ORDER
BY KODE_PERUSAHAAN")
While Not Rs.EOF
NodeKey = Rs.Fields("KODE_PERUSAHAAN")
NodeParent = Rs.Fields("INDUK_PERUSAHAAN")
If NodeKey = "" Then
TreeView1.Nodes.Add , , NodeKey, Rs.Fields("NAMA_PERUSAHAAN")
Else
TreeView1.Nodes.Add ParentKey, tvwChild, NodeKey, Rs.Fields
("NAMA_PERUSAHAAN")
End If
Rs.MoveNext
Wend
Ok deh segitu dulu semoga membantu.
Best regard
eko heri
Untuk berhenti berlangganan kirim email kosong ke : [EMAIL PROTECTED]
Ikuti juga forum diskusi VB.net dengan
mengirim email kosong ke [EMAIL PROTECTED]
Yahoo! Groups Links
<*> To visit your group on the web, go to:
http://groups.yahoo.com/group/indoprog-vb/
<*> To unsubscribe from this group, send an email to:
[EMAIL PROTECTED]
<*> Your use of Yahoo! Groups is subject to:
http://docs.yahoo.com/info/terms/
