VBSScript
使用方法：
复制需要转发的内容，点击QQ或者微信窗口，，再双击VBS脚本即可自动运行
On Error Resume Next
Dim xda,ye
set xda=createobject("wscript.shell")
`循环次数(这是备注 运行前请删除）
for i =1 to 200
`循环间隔时间(这是备注 运行前请删除）
wscript.sleep 70
xda.AppActivate
xda.sendKeys "^v"
xda.sendKeys "%s"
next
wscript.quit
