VERIFICAR STATUS DO WINDOWS LIVE MESSENGER

ALANCOSTA 06/08/2010 14:50:32
#349639
Boa tarde galera.

Existe alguma forma de Verificar o Status do Windows Live Messenger ?
Queria achar um jeito de saber quando o msn é conectado, independente do status que seja colocado.

Grato
JEANCOELHO 06/08/2010 20:58:45
#349682
existe sim procura por MSNMessengerAPI.tlb
ALANCOSTA 08/08/2010 16:30:31
#349741
Citação:

:
existe sim procura por MSNMessengerAPI.tlb



Encontrei alguns exemplos, porém nenhum funcionou. Sempre da erro de [Ô]Out of memory[Ô].

instalei o msn messenger para ver se resolvia, mas nada mudou...
JEANCOELHO 10/08/2010 15:14:28
#349906
[txt-color=#0000f0]Dim[/txt-color] MSN [txt-color=#0000f0]As[/txt-color] Messenger
[txt-color=#0000f0]Private Sub[/txt-color] Form_Load()
[txt-color=#0000f0]On Error Resume Next[/txt-color]
[txt-color=#0000f0]Set[/txt-color] MSN = [txt-color=#0000f0]New[/txt-color] Messenger
[txt-color=#0000f0]End Sub[/txt-color]
[txt-color=#0000f0]Private Sub[/txt-color] Timer1_Timer()
[txt-color=#0000f0]On Error GoTo[/txt-color] erro
[txt-color=#0000f0]If[/txt-color] MSN.MyStatus = MISTATUS_AWAY [txt-color=#0000f0]Or[/txt-color] MSN.MyStatus = MISTATUS_BE_RIGHT_BACK [txt-color=#0000f0]Or[/txt-color] MSN.MyStatus = MISTATUS_BUSY [txt-color=#0000f0]Or[/txt-color] MSN.MyStatus = MISTATUS_INVISIBLE Or MSN.MyStatus = MISTATUS_ON_THE_PHONE [txt-color=#0000f0]Or[/txt-color] MSN.MyStatus = MISTATUS_ONLINE [txt-color=#0000f0]Or[/txt-color] MSN.MyStatus = MISTATUS_OUT_TO_LUNCH [txt-color=#0000f0]Then[/txt-color]
[txt-color=#007100][ô]code[/txt-color]
[txt-color=#0000f0]End If[/txt-color]
[txt-color=#0000f0]End Sub[/txt-color]
Tópico encerrado , respostas não são mais permitidas
Voltar