Simple Messenger Client in VB6

[syntaxed_error]

I'm thinking of writing a simple messenger client in VB6, any information on this would be appreciated.

[SlickWillie31]

You might try looking at the Messaging API, using the IMessage interface. The docs for this are located at:

http://msdn.microsoft.com/library/default.asp?url=/library/en-us/WinMessenger/winmessenger/reference/messengeruasdk/cpp_client_entry.asp

Most of the reference is for C programmers, but the API should actually work for VB as well. This appears to work for MSN messaging only. Not sure if you could use it for an all purpose messaging client or not.

This code, if put behind a button, will log you in and debug.print your MSN contacts:

Dim msgr As New Messenger
Dim oContact As IMessengerContact


msgr.Signin 0, "my_user_name@hotmail.com", "abc123"
For Each oContact In msgr.MyContacts
Debug.Print oContact.FriendlyName & " - " & oContact.SigninName
Next
msgr.Signout

Set msgr = Nothing

As far as a general messaging client that can be used with multiple clients, that may be more difficult.

Good luck.

William