
Ето как можете да изпратите масово съобщение до всичките си абонати в skype
1. Отваряте notepad и пишете този код
on error resume next
set obj = WScript.CreateObject(„Skype4COM.Skype“,“Skype_“)
obj.Clienr.Start()
For Each elem in obj.Friends
obj.SendMessage elem.handle,“съобщението тук“
next
msgbox „Made by www.trikove.net“
2. давате save as …. и избирате как да се казва файла като накрая трябва да завършва на .vbs
ето как примерно text.vbs
3. След това намирате файла , където сте го съхранили и го отваряте и това е

Добави в любими 
zashto mi pokazva nqkakva greshka,kato shtrakna da go otvarqm?
(Отговори)
каква грешка ти дава … намери ме в skype emoyambol
(Отговори)
stana
(Отговори)
script: c:\Document and Setting\….\Desktop\text.vbs
Line: 3
Char: 32
Error: Invalid Character
Code:800A0404
Source: Microsoft VBScript compilation error
(Отговори)
Объркал си нещо , при другите става
(Отговори)
i pri mene ima gre6ka
(Отговори)
и при мене има грешка..
(Отговори)
(Отговори)
trqbva da razmenite kavi4kite s „
(Отговори)
mi i pri men ne stana
(Отговори)
on error resume next
set obj = WScript.CreateObject(„Skype4COM.Skype“,“Skype_“)
obj.Clienr.Start()
For Each elem in obj.Friends
obj.SendMessage elem.handle,“Saob6tenie Tuk!“
next
(Отговори)