| Go To Project menu Click On Refreneces Then Select Messenger then Open Your Code Windows Type Public WithEvents Msn as Messenger.MsgrObject Then Type Private Sub Form_load() Set Msn = vba.creatrobject("Messenger.MsgrObject") End Sub Then Select Treeview control draw In form add one button dbClick on button then Type On Error resumenext treeview1.Nodes.Add , , , "Online", 1 For i = 0 To Msn.List(MLIST_CONTACT).Count Treeview1.Nodes.Add 1, tvwChild, , pIMsgrUser.FriendlyName, 1 Next |
Add Msn Contact list In TreeView |
Freelance ASP PHP web development | Web developer India Web development India| Prayagasoft - web designer India, Ecommerce developer india, Ecommerce design