W
winzux123
Гость
Здравствуйте, скриптерчане.Появилась необходимость добавить около 200 контактов в скайп.Есть список логинов.Сталкивался кто с таким? Есть ли какая-то софтина для автоматического добавления?
- Регистрация
- 17 Май 2008
- Сообщения
- 6,618
- Реакции
- 1,035
Библиотека Skype4COM.VB
im friends As IUserCollection = refSkype.SearchForUsers("user"
If friends.Count >= 1 Then friends(1).BuddyStatus = TBuddyStatus.budPendingAuthorization Else MsgBox("Skype User Does Not Exist" End If
im friends As IUserCollection = refSkype.SearchForUsers("user" If friends.Count >= 1 Then friends(1).BuddyStatus = TBuddyStatus.budPendingAuthorization Else MsgBox("Skype User Does Not Exist" End If