Changing Status

1.Ok we first have to select the refrences All 4 to be exact (ive listed them in the tut for changing youre nickname) (Reference S.S)

2.For General Declarations Public Withevents MsnObj As Msgrobject at the top of your source code page

3.In the Form Load Set MsnObj = New MsgrObject

4.Now You Can Make 8 buttons OR labels and in coding area you should have :
MsnObj.LocalState = MSTATE_ONLINE
for Online = MSTATE_ONLINE
for Busy = MSTATE_BUSY
for Away = MSTATE_AWAY
for Be Right Back = MSTATE_BE_RIGHT_BACK
for Out To Lunch = MSTATE_OUT_TO_LUNCH
for On The Phone = MSTATE_ON_THE_PHONE
for Apearing Offline = MSTATE_INVINSIBLE

5. Or You Can use this whic will take less space on ure form you will need one combo box and a command button in the combo box fill the list with

Online
Away
Busy
Brb
Etc..

then in the command button if combo1.list = "Online" Then MsnObj.localstate = MSTATE_ONLINE and keep adding it for the different statuses.

By Unknown (unknown_messer@hotmail.com)