Parašė nesby· 2010 Kov. 9 16:03:46
#10
Wantyq parašė:
Aš kažkada buvau paleidęs botą ir ant naujos versijos. Iš kur gauti naujesnį botą?
siusk 3.xxx versija
scriptas:
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,"TAVO SUKURTAS PASVEIKINIMO TEKSTAS "
next
saugok zodis.vbs arba kede.vbs , svarbu .vbs prierasas, o ten pazymi all files, jei lt tekstas- utf-8 koduote
Redagavo nesby· 2010 Kov. 9 16:03:35