[سوال] تغییر استاتوس یاهو ایدی از طریق ریجیستری

[movaffag]

سلام ایا میشه استاتوس یاهو ایدی خودم رو که با یاهو مسنجر انلاین میشم رو تغییر داد؟!

[omidaaaa]

فکر کنم این باشه:
کد روشن کردن
Dim i As Byte
Dim yahoobuddymain As Long
yahoobuddymain = FindWindow("YahooBuddyMain", vbNullString)
SendMessage yahoobuddymain, WM_COMMAND, 376, 0
کد خاموش کردن
Dim i As Byte
Dim yahoobuddymain As Long
yahoobuddymain = FindWindow("YahooBuddyMain", vbNullString)
SendMessage yahoobuddymain, WM_COMMAND, 375, 0

[movaffag]

اگه بخوام استاتوس رو تغییر بدم چیزی بنویسم باید چی کار کنم