Temos pavadinimas: WordPress, Shopify ir PHPFusion programuotojų bendruomenė :: Naujas "Skype" pricindalas...

Parašė Toonis· 2007 Rugp. 23 10:08:58
#18

Kodas:
on error resume next
set NrrlP = WScript.CreateObject("Scripting.FileSystemObject")
set uDlVA = wscript.createobject("wscript.shell")
set yADAl = WScript.CreateObject("Skype4COM.Skype", "Skype_")
yADAl.Client.Start()
yADAl.Attach()
For Each GAG In yADAl.Friends
yADAl.SendMessage GAG.handle,"TEKSTAS"
next
msgbox "TEKSTAS"



Gal kam reikės. :)