Oh sorry i forgot to say that i fixed that i used this:
code:
OnlineSTAT = MISTATUS_ONLINE
CurrentSTAT = objMessenger.MyStatus
If CurrentSTAT = OnlineSTAT Then
'i am online
Else
'i am offline
End If
I used that with my previous code.
All i need now is to find out a way to boot up my form on msgplus load. And a easy/quick way to change your nickname.