脚本qq号

A. 求一QQ定时自动改名脚本或软件

下面的代码可以实现你想要的功能，无论在哪里，鼠标，以及背景
注：
1，只要你的人，你想聊QQ，然后打开这个脚本打开的窗口线（打开的脚本，
必须让当前窗口的窗口，您要的扬声器打开脚本，你无法控制，可以很容易地做任何事情，除了关机）
2，此脚本是按键精灵8.0

USERVAR VAR1 = 0“0改变你想说的话”
HWND =插件。 Window.Foreground（）
：呼叫Plugin.Window.Move（HWND，0，0）
延迟3599000
：呼叫Plugin.Window.Show（HWND）
的延时1000 <BR / SayString VAR1
的KeyDown 18，1
按键83 1
在KeyUp 18 1

359900之间的差异，第二个小时，1000 =候秒

B. 求自动登录qq脚本

Dim WshShell, QQPath, QQselect
QQPath="D:\software\qq\QQ.exe" 'QQ所在路径
Set WshShell=WScript.CreateObject("WScript.Shell")
WshShell.Run QQPath
WScript.Sleep 2500
WshShell.AppActivate "QQ用户登录"
WshShell.SendKeys "+{TAB}"
WshShell.SendKeys "￥￥￥￥￥￥" 'qq号
WScript.Sleep 200
WshShell.SendKeys "{TAB}"
WshShell.SendKeys "￥￥￥￥￥￥￥'密码
WScript.Sleep 200
WshShell.SendKeys "{ENTER}"
WshShell.SendKeys "{ENTER}"