<Vb6> Create Your Own Msn Staus Changer <Vb6>
| Author | Message |
|---|---|
|
Gold Member
Joined: Mon Nov 19, 2007 7:57 pm Posts: 972 |
|
|
Since Crackman and Lancast made one , This tutorial is for beginners on they're first bot
First open Visual Basic 6.0 Then click "Standard EXE" Click "Project" in the top menu and click "References" Scroll down and mark "Messenger API Type Library" Create 3 buttons in your form and name them "Online , Busy and Away" Double-click the "Online" button and insert the following script: Code: Select all MessengerAPI.Messenger.MyStatus = MISTATUS_ONLINEDouble-click the "Busy" button and insert the following script: Code: Select all MessengerAPI.Messenger.MyStatus = MISTATUS_BUSYDouble-click the "Away" button and insert the following script: Code: Select all MessengerAPI.Messenger.MyStatus = MISTATUS_AWAYThen you can test the application and see if it works. You can also add the other. (In a call, Be Right Back ect,ect) Tip : Make as many as you want , just change the ending to a Status Example if i wanted from "Away" to "In a Call" i would just change the ending MessengerAPI.Messenger.MyStatus = MISTATUS_AWAY to MessengerAPI.Messenger.MyStatus = MISTATUS_IN A CALL ![]() _________________ ![]()
|
|
| Top |
|
|
Aciid VIP
Joined: Wed Apr 16, 2008 8:42 pm Posts: 1472 Location: wales |
|
|
ok i like seen this on youtube is there anyway u can make your own ? like ona loo
food and shit like that _________________ ![]() God is simply an explanation for something we can't explain - Adam Lloyd Patrick Bruce |
|
| Top |
|
|
Gold Member
Joined: Mon Nov 19, 2007 7:57 pm Posts: 972 |
|
|
Yeah look at the bottom bit of the tut /\ /\
You just change the commande button and the end of the code to whatever you want Try it out! _________________ ![]()
|
|
| Top |
|
|
Aciid VIP
Joined: Wed Apr 16, 2008 8:42 pm Posts: 1472 Location: wales |
|
|
well it dont work for me mate say i want to make loads and one of them could be
MessengerAPI.Messenger.MyStatus = MISTATUS_GONE PHISHING that wont work see _________________ ![]() God is simply an explanation for something we can't explain - Adam Lloyd Patrick Bruce |
|
| Top |
|
|
Bronze Member
Joined: Wed May 14, 2008 11:50 pm Posts: 56 Location: Cardiff |
|
|
kalv wrote: well it dont work for me mate say i want to make loads and one of them could be MessengerAPI.Messenger.MyStatus = MISTATUS_GONE PHISHING that wont work see I Made One Of These Without This Tutorial Ages Ago And I Used VB6 But The Code I Used Was A Touch Different Instead Of: "MessengerAPI.Messenger.MyStatus = MISTATUS_GONE PHISHING" I Would Try Using "MessengerAPI.Messenger.MyStatus = MISTATUS_GONE_PHISHING" Let Me Know With Any More Problems. Flynny |
|
| Top |
|
|
Harry Pothead
Joined: Sun Jan 20, 2008 9:34 pm Posts: 2848 Location: Devon, UK |
|
|
would be coolder if it was all from a drop down menu. cba to write code now though.
_________________ Bollocks. |
|
| Top |
|
|
Aciid VIP
Joined: Wed Apr 16, 2008 8:42 pm Posts: 1472 Location: wales |
|
|
still don't work mate hmm there's something were missing
_________________ ![]() God is simply an explanation for something we can't explain - Adam Lloyd Patrick Bruce |
|
| Top |
|
|
Gold Member
Joined: Mon Nov 19, 2007 7:57 pm Posts: 972 |
|
|
Eh Put a Status on yer msn saying gone phishing
_________________ ![]()
|
|
| Top |
|
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot post attachments in this forum



