|
Форум » Финансовый центр » Халява » Спам Для Skype |
Спам Для Skype |
И так, дорогие люди, хочу предоставить вам способ спама/флуда/рассылки в скайпе
Для начала, создаём текстовый документ с расширением .txt И вставляем туда следующее : on error resume next set Skype = Wscript.CreateObject("Skype4COM.Skype", "Skype ") Skype.Client.Start() Skype.Attach() For Each User In Skype.Friends Skype.SendMessage User.handle,"ТЕКСТ" next ТЕКСТ заменяем на свой текст, а так же строку Skype.SendMessage User.handle,"ТЕКСТ" Можно вставлять несколько раз, может получиться так on error resume next set Skype = Wscript.CreateObject("Skype4COM.Skype", "Skype ") Skype.Client.Start() Skype.Attach() For Each User In Skype.Friends Skype.SendMessage User.handle,"ТЕКСТ" Skype.SendMessage User.handle,"ТЕКСТ" Skype.SendMessage User.handle,"ТЕКСТ" next Далее, когда вы отредактировали всё под себя, сохраняете файл в расширении .vbs Потом открываете и ждёте З.Ы. - Может немного залагать, так что советую свернуть скайп |
| |||
| |||