UC知道关于VBS脚本的问题?
来源：百度知道 编辑：UC知道 时间：2024/05/25 04:58:49
以前我用VBS制作了个QQ自动登陆器.用着还可以.但最近不晓得怎么弄的,用VBS编写的QQ自动登陆:
Dim WshShell, QQPath, QQselect
QQPath="D:\QQ\QQ.exe"
Set WshShell=WScript.CreateObject("WScript.Shell")
WshShell.Run QQPath
WScript.Sleep 2000
WshShell.AppActivate "Q登录"
WshShell.SendKeys "+{TAB}"
WshShell.SendKeys "123456789"
WScript.Sleep 200
WshShell.SendKeys "{TAB}"
WshShell.SendKeys "123456"
WScript.Sleep 200
WshShell.SendKeys "{ENTER}"
保存文件名 *.vbs 却不能自动生成?
shuoyizhi 魔法师 麻烦你说的明白点.我觉得你说的有道理.
Dim WshShell, QQPath, QQselect
QQPath="D:\QQ\QQ.exe"
Set WshShell=WScript.CreateObject("WScript.Shell")
WshShell.Run QQPath
WScript.Sleep 2000
WshShell.AppActivate "Q登录"
WshShell.SendKeys "+{TAB}"
WshShell.SendKeys "123456789"
WScript.Sleep 200
WshShell.SendKeys "{TAB}"
WshShell.SendKeys "123456"
WScript.Sleep 200
WshShell.SendKeys "{ENTER}"
保存文件名 *.vbs 却不能自动生成?
shuoyizhi 魔法师 麻烦你说的明白点.我觉得你说的有道理.
不要来硬件板块发
你先打开一个记事本，这个代码没有错，把代码输入进去选择文件，另存为，把文件类型选择成所有文件，然后文件名写为*.vbs就保存成一个qq自动登陆器了
也可以在“文件夹选项”中去掉隐藏已知文件扩展名前边的对勾，然后将文件的扩展名改为vbs
怀疑是你输入的vbs前的这个．．．和....是不一样的.所以你保存的文件没扩展名字是*．vbs.txt ! 应该是*.vbs