创建一个记事本，黏贴下面的东西：
Set WshShell=WScript.CreateObject("WScript.Shell")
WshShell.AppActivate"小号我的"
for i=1 to 6
WScript.Sleep 100
WshShell.Sendkeys"^v"
WShShell.Sendkeys "%s"
Next
而后保存：后缀改为：.vbs
VBS是基于Visual Basic的脚本语言。VBS的全称是:Microsoft Visual Basic Script Edition。
来讲解一下吧：
Set WshShell=WScript.CreateObject("WScript.Shell")：创建的意思
sendkeys 用于输入键盘按键
appactivate 用于聚焦程序
WshShell.AppActivate"小号我的"：这个双引号里你要写上你要发送人的昵称。一次只可以一个！
appactive:是获取窗口的，你添加一个昵称之后才可以确定。
因为是窗口，所以你必须打开才可以执行这个操作！是根据Windows窗口来进行选择的，并不是获得你的好友列表。
for i=1 to 6：这个是for循环语句。从1到6.一共6次。当然你也可以写1000,10000之类的！有点恐怖！
前期提示：
Shift---------WshShell.SendKeys "+"
Ctrl---------WshShell.SendKeys "^"
Alt---------WshShell.SendKeys "%"
WScript.Sleep 100：这个是delay，就是延时的意思！
1000ms=1s。这个是以毫秒为单位的！例子里是延时0.1s.
WshShell.Sendkeys"^v"：
这个是两个并用！
等同于**Ctrl+v**.就是常说的复制黏贴里的黏贴呀！
WShShell.Sendkeys "%s"
：这个是字符串，可以接受长长的一句。
Next：进行下一个！
且用且小心！
用源码进行测试的时候！
set wshshell=wscript.createobject("wscript.shell")
WshShell.AppActivate"两个"
for i=1 to 6
WScript.Sleep 100
WshShell.Sendkeys"^v"
WshShell.Sendkeys i
WShShell.Sendkeys "%s"
Next
这个是用来计数的！