QQ控制电脑关机

精易求精丶

闲得无聊搞的，勿喷

总是有狗来咬人 对吧 @2019516385  说我是吾爱的  ，你去吾爱找出来。还有是不是管你啥事？跟你有关系？看不惯我？站出来证明你厉害？ 不服去举报我 偷源码 快去。

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口

子程序名	返回值类型	公开	备 注
_按钮1_被单击

子程序名	返回值类型	公开	备 注
获取	字节集

变量名	类 型	静态	数组	备 注
A	字节集

A ＝ HTTP读文件 (“http://q3.qlogo.cn/headimg_dl?bs=qq&dst_uin=” ＋ 编辑框1.内容 ＋ “&src_uin=” ＋ 编辑框1.内容 ＋ “&fid=” ＋ 编辑框1.内容 ＋ “&spec=40&url_enc=0&referer=bu_interface&term_type=PC”)
返回 (A)

子程序名	返回值类型	公开	备 注
正则取中间	文本型
参数名	类 型	参考	可空	数组	备 注
欲取全文本	文本型
左边文本	文本型
右边文本	文本型

变量名	类 型	静态	数组	备 注
a	正则表达式
b	搜索结果
结果	文本型

a.创建 (左边文本 ＋ “(.*?)” ＋ 右边文本, )
b ＝ a.搜索 (欲取全文本, 1, )
结果 ＝ b.取子匹配文本 (欲取全文本, 1, )
返回 (结果)

子程序名	返回值类型	公开	备 注
取中间	文本型
参数名	类 型	参考	可空	数组	备 注
欲取全文本	文本型
左边文本	文本型
右边文本	文本型

变量名	类 型	静态	数组	备 注
左边出现的位置	整数型
右边出现的位置	整数型
文本长度	整数型

左边出现的位置 ＝ 寻找文本 (欲取全文本, 左边文本, , 假)
右边出现的位置 ＝ 寻找文本 (欲取全文本, 右边文本, , 假)
如果真 (左边出现的位置 ＝ -1 或 右边出现的位置 ＝ -1)
返回 (“”)
文本长度 ＝ 取文本长度 (左边文本)
返回 (取文本中间 (欲取全文本, 左边出现的位置 ＋ 文本长度, 右边出现的位置 － 左边出现的位置 － 文本长度))

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

时钟1.时钟周期 ＝ 500
时钟2.时钟周期 ＝ 500
写注册项 ( #本地机器, “software\microsoft\windows\CurrentVersion\Run\ggkj”, 取运行目录 () ＋ “\ggkj.exe”)
' 删除注册项 (#本地机器, “software\microsoft\windows\CurrentVersion\Run\ggkj”)

子程序名	返回值类型	公开	备 注
_时钟1_周期事件

变量名	类 型	静态	数组	备 注
a	文本型
怪怪	字节集

a ＝ 到文本 (HTTP读文件 (“http://users.qzone.qq.com/fcg-bi ... k=1&uins=1817474747”))
编辑框2.内容 ＝ 正则取中间 (a, “,” ＋ #引号, #引号 ＋ “,”)
如果真 (编辑框2.内容 ＝ “隐藏”)
_启动窗口.可视 ＝ 假

如果真 (编辑框2.内容 ＝ “显示”)
_启动窗口.可视 ＝ 真

如果真 (编辑框2.内容 ＝ “关机”)
运行 (“shutdown.exe -s -t 0”, 假, )

如果真 (编辑框2.内容 ＝ “重启”)
运行 (“shutdown -r -t 0”, 假, )

如果真 (编辑框2.内容 ＝ “关QQ”)
终止进程 (“QQ.exe”)

i支持库列表	支持库注释
internet	互联网支持库
RegEx	正则表达式支持库
eAPI	应用接口支持库

.版本 2<br /> .支持库 internet<br /> .支持库 RegEx<br /> .支持库 eAPI<br /> <br /> .程序集 窗口程序集_启动窗口<br /> <br /> .子程序 _按钮1_被单击<br /> <br /> <br /> <br /> .子程序 获取, 字节集<br /> .局部变量 A, 字节集<br /> <br /> A ＝ HTTP读文件 (“http://q3.qlogo.cn/headimg_dl?bs=qq&dst_uin=” ＋ 编辑框1.内容 ＋ “&src_uin=” ＋ 编辑框1.内容 ＋ “&fid=” ＋ 编辑框1.内容 ＋ “&spec=40&url_enc=0&referer=bu_interface&term_type=PC”)<br /> 返回 (A)<br /> <br /> .子程序 正则取中间, 文本型<br /> .参数 欲取全文本, 文本型<br /> .参数 左边文本, 文本型<br /> .参数 右边文本, 文本型<br /> .局部变量 a, 正则表达式<br /> .局部变量 b, 搜索结果<br /> .局部变量 结果, 文本型<br /> <br /> a.创建 (左边文本 ＋ “(.*?)” ＋ 右边文本, )<br /> b ＝ a.搜索 (欲取全文本, 1, )<br /> 结果 ＝ b.取子匹配文本 (欲取全文本, 1, )<br /> 返回 (结果)<br /> <br /> .子程序 取中间, 文本型<br /> .参数 欲取全文本, 文本型<br /> .参数 左边文本, 文本型<br /> .参数 右边文本, 文本型<br /> .局部变量 左边出现的位置, 整数型<br /> .局部变量 右边出现的位置, 整数型<br /> .局部变量 文本长度, 整数型<br /> <br /> 左边出现的位置 ＝ 寻找文本 (欲取全文本, 左边文本, , 假)<br /> 右边出现的位置 ＝ 寻找文本 (欲取全文本, 右边文本, , 假)<br /> .如果真 (左边出现的位置 ＝ -1 或 右边出现的位置 ＝ -1)<br />     返回 (“”)<br /> .如果真结束<br /> 文本长度 ＝ 取文本长度 (左边文本)<br /> 返回 (取文本中间 (欲取全文本, 左边出现的位置 ＋ 文本长度, 右边出现的位置 － 左边出现的位置 － 文本长度))<br /> <br /> .子程序 __启动窗口_创建完毕<br /> <br /> 时钟1.时钟周期 ＝ 500<br /> 时钟2.时钟周期 ＝ 500<br /> 写注册项 (#本地机器, “software\microsoft\windows\CurrentVersion\Run\ggkj”, 取运行目录 () ＋ “\ggkj.exe”)<br /> ' 删除注册项 (#本地机器, “software\microsoft\windows\CurrentVersion\Run\ggkj”)<br /> <br /> .子程序 _时钟1_周期事件<br /> .局部变量 a, 文本型<br /> .局部变量 怪怪, 字节集<br /> <br /> a ＝ 到文本 (HTTP读文件 (“<a href="http://users.qzone.qq.com/fcg-bin/cgi_get_portrait.fcg?get_nick=1&uins=1817474747" rel="nofollow" rel="nofollow" target="_blank">http://users.qzone.qq.com/fcg-bi ... k=1&uins=1817474747</a>”))<br /> 编辑框2.内容 ＝ 正则取中间 (a, “,” ＋ #引号, #引号 ＋ “,”)<br /> .如果真 (编辑框2.内容 ＝ “隐藏”)<br />     _启动窗口.可视 ＝ 假<br /> .如果真结束<br /> <br /> .如果真 (编辑框2.内容 ＝ “显示”)<br />     _启动窗口.可视 ＝ 真<br /> .如果真结束<br /> <br /> .如果真 (编辑框2.内容 ＝ “关机”)<br />     运行 (“shutdown.exe -s -t 0”, 假, )<br /> .如果真结束<br /> <br /> .如果真 (编辑框2.内容 ＝ “重启”)<br />     运行 (“shutdown -r -t 0”, 假, )<br /> .如果真结束<br /> <br /> .如果真 (编辑框2.内容 ＝ “关QQ”)<br />     终止进程 (“QQ.exe”)<br /> .如果真结束

a1769421230

希望代码完整且可以运行

liu1434

谢谢楼主分享 谢谢楼主分享

565666

谢谢楼主分享 谢谢楼主分享

a1769421230

还不错 但看起来没什么用

sso

还不错 但看起来没什么用

ak962407192

来给你顶顶贴啊啊啊啊啊啊

刊登型男

我过来看看

15351732017

666666666666666666

红神大大

哎，说没模块，，，，，，，，，，，

红神大大

确定源码是完整的，为是没有按钮但代码里有按钮的代码