
Следвай
106
Как да пратим съобщение до всички скайп абонати!
1 668
06.12.2010
Set oSkype = CreateObject("Skype4COM.Skype")
oSkype.Attach
For Each friend In oSkype.Friends
oSkype.SendMessage friend.Handle, "Тук напишете съобщението, което ще се прати!"
Next
oSkype.Attach
For Each friend In oSkype.Friends
oSkype.SendMessage friend.Handle, "Тук напишете съобщението, което ще се прати!"
Next
Виж повече
Виж по-малко