求自动登录qq脚本
只要你把开始>程序里的QQ拉到启动里面去·然后在QQ登陆面板上把自动登录打勾就OK了...还用自动登录脚本吗?
qq自动登录器 qq登录自动登录怎么取消
qq自动登录器 qq登录自动登录怎么取消
qq自动登录器 qq登录自动登录怎么取消
qq自动登录器 qq登录自动登录怎么取消
qq自动登录器 qq登录自动登录怎么取消
2、去掉“启动QQ时为我自动登录”的选项,就可以取消qq自动登录
把QQ设置为开机自动运行,然后设置你的QQ号自动登录。(这个在QQ内设置)
不需要脚本啊·只要在自动启动项里面把QQ加上dim QQ,A,C,OX·然后在QQ上面选择自动登陆·那每次开机QQ就会自动登陆了啊·
QQ密码保存在什么位置
如果从QQ上点击小星星的图标就不需要了,或者使用快速登录。在盘里找到QQ安装的文件夹,里面有你的QQ号码的一个文件夹,密码文件存在autologin.db文件中,只能用十六进制编辑软件打开,而且里面的密码也加密了的。
楼主不要急,QQ1、最小修改,保持初心:程度上保留Chrome的内核特性。申诉是要等3个工作日的! 下面是关于申诉的资料: 如果你没有密码保护,可以试下申诉,,我试过申诉成功了 地址:
QQ密码是需要自己记住的,如果保存在什么位置容易被盗造成一定损失。若不记得账号密码,可以通过申诉来寻回。
打开QQ自动登录器,在账号管理器输不进去密码? 真是这样,建议换个自动登录器。 至于QQ登录器里面QQ和密码保存在哪里? 在你安装登录器的文件夹里面。输入QQ及密码后,里面会有个叫LoEnd FunctionginData的文件,这个就是。 QQ自动登录器,网上很多种,一搜一大把,选一种好用的方便的吧。
现在本地不存储密码的,你登录成功后,qq会给你一串临时的密文id,它代表你可以在这台设备的登录标志(若你很久没在本机登录qq它就失效)。你就算解码出那一串密文,你也用不了,因为这串密文只针对这台机和某时间段。
保存在你深深的脑海里
QQ批量自动登陆
'for each ps in getobject("winmgmts:.rootcimv2:win32_process").instances_ '列出系统中所有正在运行的程序功能:从指定的QQ号码和密码文件中读取信息,分别登录,也就是批量QQ号码自动登录。
1、把QQ号和密码写在一个叫QQ.ini的文件中,格式为QQ号码|密码,如88480666|12345678,其中|为号码和密码的分隔符。
3、修改你的QQ所在的路径,本例为T:/QQ2009/bin/QQ.exe。
4、双击XXX.vbs,开始自动登录。
说明:如果你有上百个QQ,恐怕开这么多QQ实例你的机器吃不消,就把'Close_Process("QQ.exe")前的'去掉。也就是说,每登录一个退出再登录另一个。
存在的问题:目前登录一个退出一个采用的是结束QQ进程的方法,这样不好,每次都要重新启动QQ实例,浪费时间,如果能注销刚才登录的QQ,再选择另一个号码登录,但本人没有解决这个问题,也没时间。
'Option Explicit
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objTextFile = objFSO.OpenTextFile("QQ.ini",1)
Do Until objTextFile.AtEndOfStream
Dim strNextLine
Dim WshShell, QQPath, QQselect
strNextLine = objTextFile.Readline
spIndex=InStr(strNextLine,"|")
qqnumber=Mid(strNextLine,1,spIndex-1)
'MsgBox qqnumber&":"WshShell.SendKeys "密码"&pwd
Set WshShell=WScript.CreateObject("WScript.Shell")
WshShell.Run QQPath
WScript.Sleep 2000
WshShell.AppActivate "Q登录"
WshShell.SendKeys "+{TAB}"
WshShell.SendKeys qqnumber
WshShell.Senqq晚上怎么会自动登录?qq晚上会自动登录。是因为在QQ的设置中勾选了“自动登录”,每次关闭QQ后重新打开它,QQ都会自动登录账号。可以通过以下步骤来查看和更改此设置:dKeys "{TAB}"
WshShell.SendKeys pwd
WshShell.SendKeys "{ENTER}"
WScript.Sleep 5000 '等5秒再换下一个号码登录
'如果QQ太多,机器吃不消,就用这种方法,登录一个,然后下线换另一个
'Close_Process("QQ.exe")
Loop
objTextFile.Close
'下面是关闭某个进程的过程
sub Close_Process(ProcessName)
On Error Resume Next
for each ps in getobject("winmgmts:.rootcimv2:win32_process").instances_ '循环进程
if Ucase(ps.name)=Ucase(ProcessName) then '关闭QQ,也可以改成其它的程序
ps.terminate
end if
next
end Sub
VBS取QQ或TM自动登录代码并防止关闭的脚本
Set objWMIServ = GetObject _
("winmgmts:" & "." & "rootcimv2")
("SELECT FROM Win32_process")
If LCase(ps.Name) = "qq.exe" Or LCase(ps.Name) = "tm.exe" Then '检测是否QQ或TM
AppPath = pandline '提取QQ程序的命行
tmp = Replace(AppPath, Chr(34), Space(1))
UIN1 = InStr(tmp, "QQUIN:") + 6
QQUIN = Mid(tmp, UIN1, InStr(UIN1, tmp, Space(1)) - UIN1) '取QQ号码.
End If
If Len(QQUIN) = 0 Then
MsgBox "系统中没有运行QQ或TM程序,请重新启动QQ或TM,登陆后再使用一键换切换一下QQ或TM程序,再运行本脚本"
Else
Do '循环检测
myqqin = chkuin(QQUIN) '检测上面提取出来的QQ号码是否有在本机打开
If Not myqqin Then '如果没有运行则,重新运行QQ程序并登录
runapp(AppPath) '
Else
End If
End If
Function RunApp(AppPath)
Dim obj
Set obj = CreateObject("WScript.Shell")
obj.exec(AppPath)
Function chkuin(QQUIN)
Set objWMIServ = GetObject _
("winmgmts:" & "." & "rootcimv2")
("SELECT FROM Win32_process")
'for each ps in getobject("winmgmts:.rootcimv2:win32_process").instances_
If LCase(ps.Name) = "qq.exe" Or LCase(ps.Name) = "tm.exe" Then
AppPatht = pandline
tmp = Replace(AppPatht, Chr(34), Space(1))
UIN1 = InStr(tmp, "QQUIN:") + 6
QQUINTMP = Mid(tmp, UIN1, InStr(UIN1, tmp, Space(1)) - UIN1)
End If
VBS脚本实现QQ自动登录的方法(旧)
Set WshShell=WScript.CreateObject("WScript.Shell")
WshShell.run "D:Progra~1TencentQQ.exe"
'QQ路径名,请按照自己QQ的路径修改
WshShell.SendKeys "{TAB}"
WshShell.SendKeys "{TAB}"
WshShell.SendKeys "{ENTER}"
把上面这些到记事本中,保存,后缀名为.vbs就可以了.
隐身登陆你的QQ,PWDHASH值我不会算,只知道VBS-Fans的L0Pk0zxjb6Zn87W/2PjWpg
C=MSGBOX("请首先把你的QQ密码改为:VBS-Fans" & CHR(13) & "注意大小写然后点确定!" & chr(13) & "因为QQ密码经过MD5,XOR,循环加密所以不提供算法,我也不会!",4097,"密码要求")
if C=1 then
qq=inputbox("请输入你的QQ号码","QQ","7673294")
QQ=trim(qq)
ox=1
end if
if ox=1 then
set ws=createobject("wscript.shell")
a="cmd /c ""D:Program FilesTencentQQQQ.exe"" /START QQUIN:" & QQ & " PWDHASH:L0Pk0zxjb6Zn87W/2PjWpg== /STAT:40 eixt"
ws.run a,0
end if
'以上代码另存成.vbs,运行就可以了!
这样可以么?
qq晚上怎么会自动登录
W'Dim QQUINScript.Sleep 2001、打开QQ客户端,进入主界面。
4、找到“自动登录”选项,查看它是否被勾选了。2、点击窗口左下角的“设置”图标。
3、在设置页面中,选择“安全”选项卡。
5、想取消自动登录,只需取消“自动登录”的勾选即可。自动登录是指当下一次访问一个网站或应用程序时,系统会自动记住用户名和密码,无需再次输入。可以通过在登录时选中“记住我”等选项来实现。
怎么设置电脑qq自动登录
打开QQ,在wscript.sleep 10000 '等待10秒下方找到
系ShowMsgs = ShowMsgs & "2:登陆406510741" &Chr(13)&Chr(10)统设置(图标像齿轮)-
的登录(个选项)else-
在右边勾选
“开机时自动启动QQ”、“启动QQ时为我自动登录”,并取消“总是打开登录提示”。
qq电脑版怎么取消自动登录?
2、把下面的脚本拷贝放到一个文本文件中,改名了XXX.vbs,XXX你自己任意定。作方法
3、或者你可以先退出QQ,然后在登录界面把“自动登录”的选项勾掉,这样也可以取消qq自动登录1、打开QQ面板,选择界面右下角的ox=0“设置”选项
在VBS里如何换行?
For Each ps in ps '列出系统中所有正在运行的程序这个真的很麻烦呢。。。我的方法是变量的追加~引用
'MsgBox ps.nameDim ShowMsgs
ShowMsgs = "请输入您要登录的QQ号码序号:" &Chr(13)&Chr(10)
ShowMsgs = ShowMsgs & "1:登陆403656085" &Chr(13)&Chr(10)
ShowMsgs = ShowMsgs & "12:同时登陆403656085和406510741" &Chr(13)&Chr(10)
ShowMsgs = ShowMsgs & "3:手工登录"
QQselect=InputBox(ShowMsgs, "QQ自动登录器")
可以后,只要你想开qq,只要双击这个bat就行。如果你想开机启动,把这个文件拉到“开始”——“程序”——“启动”,这样开机自动登录qq。ok!以 麽?
& Chr(13) & Chr(10) & "2:登陆406510741" _
& Chr(13) & Chr(10) & "3:手工登录", "QQ自动登录器")
msgbox
"abc"
&chr(10)
&"def"
&chr(10)
&"ghi"
QQ自动登录的BAT批处理
WScript.Sleep 200so easy,分为两步!
步,首先你打开你的qq,输入q号和密码,勾选“记住密码”“自动登录”。先登陆一次,登录成功后,可点开设置中心,里面有个自动关联已登录的QQ账号在前面点上√以退出。
第二部,右键新建记事本,打开,然后在里面输入:
start C:Progra~1TencentQQBinQQ.exe
保存,退出。重命名为“qq自动登录.bat”。
保存bat 文件
reg ad作:d "HKEY_CURRENT_USERSoftwareMicrosoftWindowsCurrentVersionRun" /v QQ2009 /d "C:Program FilesTencentQQBinQQ.exe" /t REG_SZ /f
如何设置QQ电脑管家自动登录?
dim WshShell你好,这个很简单,按下图作即可:
wscript.sleep 5000 '等待5秒请勾选上图自动登录复选框!
pwd=Mid(strNextLine,spIndex+1,Len(strNextLine))有其他问题欢迎到
腾讯电脑管家企业平台:
点右上角登录后
下面有个其他帐号登录
输入QQ账号和QQ密码后下面有个自动登录
点一下就ok了
手动输入帐号和密码,点击下面记住密码和自动登录即可
把自动登录打钩就好了
打开qq客户端腾讯网页的自动登录
你好!设置为默认浏览器,然后记住密码就行了。我个人认为有三种可能:
隐身登陆1.你用的浏览器不是默认的浏览器,把正在用的浏览器设为默认浏览器试试;
3、智能升级,用的网络资源,让你拥有的内核技术。2.还有可能是你现在用的这个浏览器的cookie处理方式有问题,换个浏览器试试;
3.你现在用的这个版本的QQ有问题,更新一下试试;
你打开网页时会自动登录,是因为qq在你的cookie写入了,你的账号密码,在你登录腾讯网页时浏览器自动会检测cookie,然后模拟你手动输入账号时的qq登录请求,发往腾讯,实现自动登录。。。。
朋友,您好。请不要担心,是系统在优化升级的原因,我们大家和你一样暂时都不能使用快速登录的功能。请看公告。
版权声明:本文内容由互联网用户自发贡献,该文观点仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌抄袭侵权/违法违规的内容, 836084111@qq.com 举报,一经查实,本站将立刻删除。