Duda Listar contactos de messenger con el grupo

[c4st0r]

Hola a todos, bien lo que me gustaria es poder listar los contactos del messenger con el grupo al que le corresponde, de esta manera listariamos todos los contactos pero sin el grupo en un textbox

Código [Seleccionar] Expandir


Private Sub ListContact_Click()
For Each user In MSN.MyContacts
List1.AddItem user.SigninName
Next
For i = 0 To List1.ListCount
Text1.Text = Text1.Text & List1.List(i) & vbCrLf
Next
End Sub


He estado buscando por google y no encuentro nada en español al respecto, gracias

[wACtOr]

hola, no se como se puede hacer parta listar los grupos, sim embargo te voy a deja una pagina que encontre con la api del msn, aver si te puede servir de algo:

http://www.messengeradictos.com/13/55/documentos.php

[c4st0r]

Gracias por responder tan rapido pero ya lei esa pagina.
Lo de listar los grupos es muy facil:

Código [Seleccionar] Expandir


Dim grupo As IMessengerGroup
For Each grupo In MSN.MyGroups
List1.AddItem grupo.Name
Next


asi salen los grupo en un listbox pero lo q necesito es listar los contactos dentro de su respectivo grupo, es decir la orden clave que estoy buscando es como puedo saber a que grupo  pertenece un contacto

[ActiveSheet]

que mala onda a mi no me jala esa variable del MSN 

me tengo que basar en un formulario con las variables ya declaradas

alguien sabe por que pasa eso?

[wACtOr]

as marcado las referencias activesheet?

[ActiveSheet]

si todo todito esta bantante raro

lo intente de todos los metodos redactandolo todo igual que el otro form
copyandolo y pegandolo
y asta sustituyendo su archivo binario del form

pero no es prioritario 

[wACtOr]

creo que ay que tener el windows messenger abierto, no iniciada la sesion, pero si abierto, prueba que no sea eso :S

[c4st0r]

Tienes que tener el Windows Messenger instalado para usar la API de messenger,
por favor que no se devie el tema, necesito a ver si alguien tiene informacion sobre la api de messenger, en la parte de Propiedades de IMessengerGroup para ver si puedo listar los contactos por grupos.

[ActiveSheet]

jajajaja lo que digo es que jala en un proyecto que baje  y en el que redacto no

tengo instalado asta el plus