api - 如何更改 vbs 代码以向 Skype 中搜索的所有人发送消息？

Question

如何使以下代码向所有在 Skype -> Search -> Domination 中找到的人发送消息？？！？我想“对于 yADAl.Friends 中的每个 GAG”应该更改为“”yaDal.Search(“Dominating”)“”但它不起作用

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,"Type text here"
next

Answer 1

Skype 不提供可能导致向其发送垃圾邮件的功能。你想做的这件事可能被认为是非法的。