114网址导航高手怎么取消别人加我的问题呢
全部***(共2个回答)
设置成拒绝任何人添加好友就好了
楼主 你好、
然后找到权限设置
就可以找到的
希望可以帮到你
添加好友验证设置那
1.很可能是你的重启键按进去了
2.是你的硬件接触不良,你开机箱查看一下
3.应该是盗板系统碟***的问题。
没有被激活就自动注销。
建议重装。。...
人人网的注销只是限制别人访问他的主页,显示已注销,其他的基本上不变,所以特别好友里面还可能会有。。注销以后甚至连日志相册里的东西都还在。。可能是等大家回心转意再...
亲,QQ系统设置 - 身份验证,取消相关验证即可。
如果我的回答对您有所帮助,请您在微问中选择“好评”。如有其它问题,感谢反馈,协助我们帮助更多网友解决类似问题...
大家还关注
QQ老是弹出提醒
,花样直播订阅提醒,...
确定举报此问题
举报原因(必选):
广告或垃圾信息
激进时政或意识形态话题
不雅词句或人身攻击
侵犯他人隐私
其它违法和不良信息
报告,这不是个问题
报告原因(必选):
这不是个问题
这个问题分类似乎错了
这个不是我熟悉的地区你的位置:
做天的qq 加好友程序终于完成现在等高手
11:50:40 |
来源: 按键精灵资源站
//查找添加
FindPic 0,0,,&E:\系统箱\xp\桌面\1.bmp&,0.9,XA,YA
If XA & 0 And YA&0 Then
MoveTo XA+10,YA+5
LeftClick 1
MessageBox &找不到1&
//向Excel文档工作表(1)单元格(1, 2)读出内容存入(Text)变量
行数 = Plugin.Office.ReadXls(1, 1, 1, &E:\系统工具箱\xp\桌面\分割\下1.xls&)
//读取要百找的QQ
QQ = Plugin.Office.ReadXls(1, 行数, 1, &E:\系统工具箱\xp\桌面\分割\下1.xls&)
//读取姓名
姓名 = Plugin.Office.ReadXls(1, 行数, 2, &E:\系统工具箱\xp\桌面\分割\下1.xls&)
//输入找查QQ号码
SayString QQ
//点击找查
FindPic 0,0,,&E:\系统工具箱\xp\桌面\2.bmp&,0.9,XA,YA
If XA & 0 And YA&0 Then
MoveTo XA+10,YA+5
LeftClick 1
MessageBox &找不到2&
Delay 1500
//回车&&确认添加客户
KeyPress &Enter&, 1
Delay 2000
//查找错误
FindPic 0,0,,&E:\系统工具箱\xp\桌面\已经是重复好友.bmp&,0.9,intX,intY
If intX & 0 And intY & 0 Then
//如果找到 已经是重复好 就调用子程序重复
Call 重复()
&&FindPic 0,0,,&E:\系统工具箱\xp\桌面\账号不存在.bmp&,0.9,intX,intY
&&If intX & 0 And intY & 0 Then
&&//如果找到 空号 就调用子程序空号
&&Call 空号()
& & FindPic 0,0,,&E:\系统工具箱\xp\桌面\验证信息.bmp&,0.9,intX,intY
& & If intX & 0 And intY & 0 Then
& &&&//如果找到 已经是验证 就调用子程序验证
& & Call 验证信息()
& && &&&FindPic 0,0,,&E:\系统工具箱\xp\桌面\您将添加以下好友.bmp&,0.9,intX,intY
& && &&&If intX & 0 And intY & 0 Then
& && &&&//如果找到 已经是验证 就调用子程序添加好友
& && &&&Call 您将添加以下好友()
Delay 2000
//输入姓名
SayString 姓名
Delay 2000
//确定加好友
FindPic 0,0,,&E:\系统工具箱\xp\桌面\25.bmp&,0.9,intX,intY
If intX & 0 And intY & 0 Then
MoveTo intX+10,intY+5
LeftClick 1
MessageBox &找不到A&
KeyPress &Enter&, 1
Rem 执行取消加一
//点击消取
FindPic 0,0,,&E:\系统工具箱\xp\桌面\26.bmp&,0.9,intX,intY
If intX & 0 And intY & 0 Then
MoveTo&&intX+10,intY+5
LeftClick 1
MessageBox &找不到B&
Call Plugin.Office.WriteXls(1, 1, 1,行数+1,&E:\系统工具箱\xp\桌面\分割\下1.xls&)
Sub 您将添加以下好友()
KeyPress &Enter&, 3
Delay 2000
Goto 执行取消加一
Sub 验证信息()
SayString 姓名
Delay 2000
KeyPress &Enter&, 4
Delay 2000
Goto 执行取消加一
Sub 空号()
Goto 执行取消加一
Sub 重复()
KeyPress &Enter&, 1
Delay 2000
Goto 执行取消加一
顺便问一下啊!!验证码怎么做啊?
谁能教我啊???
给大家学着玩!!