
Следвай
2
Как да изпратите съобщение до всички абонати в скайп.
369
20.11.2013
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
Виж повече
Виж по-малко