您当前位置: 首页 实用工具 致富暴利项目

致富暴利项目

致富暴利项目

类型: 实用工具 版本: V10.4

大小: 284.2 时间: 2025-12-18

推荐语
推荐语
致富暴利项目 2022年暴利的行业有时太匆忙没时间或者来不及关电脑,怎样远程控制将电脑关掉呢?不用想的太复杂,有这款QQ昵称关机重启(ReShutDown)就能做到了,它是网友自制的利用qq昵称来关机的工具,使用简单,反映快,能远程控制电脑关机重启! QQ昵称关机重启(ReShutDown)怎么用使用说明爱游戏输入qq号,然后用手机...
应用介绍

有时太匆忙没时间或者来不及关电脑,怎样远程控制将电脑关掉呢?不用想的太复杂,有这款QQ昵称关机重启(ReShutDown)就能做到了,它是网友自制的利用qq昵称来关机的工具,使用简单,反映快,能远程控制电脑关机重启!

QQ昵称关机重启(ReShutDown)怎么用

使用说明爱游戏

输入qq号,然后用手机修改自己的qq昵称,如关机、重启等功能。

正在关机

QQ昵称关机重启(ReShutDown)部分代码

PrivateSubForm_Load()

Appdisk=Trim(App.Path)

IfRight(Appdisk,1)<>""ThenAppdisk=Appdisk&""

Text1.Text=ReadIniFile(Appdisk&"set.ini","CONFIG","WangZhi")

Text2.Text=ReadIniFile(Appdisk&"set.ini","CONFIG","Wait")

Check1.Value=Val(ReadIniFile(Appdisk&"set.ini","CONFIG","Check"))

IfCheck1.Value=1ThenMe.Hide

Check1.Value=1

EndSub

PrivateSubForm_QueryUnload(CancelAsInteger,UnloadModeAsInteger)

CallINIWrite("CONFIG","WangZhi",Text1.Text,Appdisk&"set.ini") '提取源码的网址

CallINIWrite("CONFIG","Wait",Text2.Text,Appdisk&"set.ini") '等待的时间

CallINIWrite("CONFIG","Check",Check1.Value,Appdisk&"set.ini") '是否显示界面

EndSub

PrivateSubText2_KeyPress(KeyAsciiAsInteger)

IfKeyAscii=8Then

KeyAscii=8

ExitSub

EndIf

IfKeyAscii<47OrKeyAscii>58Then

  KeyAscii=0

  Beep'声音

EndIf

EndSub

PrivateSubText2_LostFocus()

IfText2.Text=""ThenText2.Text="5"

EndSub

PrivateSubTimer1_Timer()

Minute=Minute+1

IfMinute=Val(Text2.Text)Then

JiLuTime&"请求获取源码!"

Yuan=ReadinteFile("http://users.qzone.qq.com/fcg-bin/cgi_get_portrait.fcg?uins="&Text1.Text)

'IfInStr(Yuan,"关机")ThenQuitSystemWin0

'IfInStr(Yuan,"重启")ThenQuitSystemWin1

IfInStr(Yuan,"关机")ThenMsgBox"关机"

IfInStr(Yuan,"重启")ThenMsgBox"重启"

'请修改上面的代码实现功能

Minute=0

EndIf

EndSub

PublicFunctionReadinteFile(ByValsUrlAsString)AsString

DimxmlHTTP1AsObject

SetxmlHTTP1=CreateObject("Microsoft.XMLHTTP")

xmlHTTP1.Open"get",sUrl,True

xmlHTTP1.send

WhilexmlHTTP1.readyState<>4

DoEvents

Wend

ReadinteFile=xmlHTTP1.responseText

SetxmlHTTP1=Nothing

EndFunction


PrivateSubJiLu(MakStrAsString)

OnErrorResumeNext

DimFAsString,HAsLong

 F=Appdisk&"运行记录.txt"

 H=FreeFile

 OpenFForAppendAs#H

 Print#H,MakStr

 Close#H

EndSub

QQ昵称关机重启(ReShutDown)功能介绍

电脑上运行这个软件,首次打开输入你自己的QQ,然后设定个检测时间。

你可以通过手机QQ修改自己的QQ昵称实现控制电脑关机、重启。

应用信息
相关版本
相关推荐
同一开发者
本类最新
相关专题
相关文章
用户评论
24小时全自动挂机的赚钱软件

24小时全自动挂机的赚钱软件

2025/10/13 20:24更新

龟软一键整理内存就是款实用性非常强的内存整理软件。它不需要大家进行安装,就能立即进行使用,而且最重要的就是快速的对内存进行释放操作,从而让你运行缓慢的电脑获得快...

广电宽带 网友 qwe123 闲清棋牌
闲清棋牌

支持 ( 181 ) 盖楼(回复)

广电宽带 网友 qwe123 一亩龙虾能赚多少钱
一亩龙虾能赚多少钱

支持 ( 130 ) 盖楼(回复)

广电宽带 网友 qwe123 什么网站可以用手机做兼职赚钱
什么网站可以用手机做兼职赚钱

支持 ( 12 ) 盖楼(回复)

广电宽带 网友 qwe123 怎么跑步赚钱
怎么跑步赚钱

支持 ( 33 ) 盖楼(回复)

广电宽带 网友 qwe123 淘宝网店注册兼职
淘宝网店注册兼职

支持 ( 48 ) 盖楼(回复)

广电宽带 网友 qwe123 淘宝刷流量兼职
淘宝刷流量兼职

支持 ( 125 ) 盖楼(回复)

广电宽带 网友 qwe123 好的手机赚钱app
好的手机赚钱app

支持 ( 174 ) 盖楼(回复)

广电宽带 网友 qwe123 好家门窗装饰有限公司赚钱吗
好家门窗装饰有限公司赚钱吗

支持 ( 142 ) 盖楼(回复)

广电宽带 网友 qwe123 有什么在家能赚钱的
有什么在家能赚钱的

支持 ( 29 ) 盖楼(回复)

广电宽带 网友 qwe123 拉油罐车赚多少钱
拉油罐车赚多少钱

支持 ( 143 ) 盖楼(回复)

广电宽带 网友 qwe123 行业赚钱难
行业赚钱难

支持 ( 92 ) 盖楼(回复)

广电宽带 网友 qwe123 兼职工作app闲鱼
兼职工作app闲鱼

支持 ( 140 ) 盖楼(回复)

广电宽带 网友 qwe123 挣钱的偏门职业
挣钱的偏门职业

支持 ( 119 ) 盖楼(回复)

广电宽带 网友 qwe123 手机答题赚钱软件下载
手机答题赚钱软件下载

支持 ( 91 ) 盖楼(回复)

广电宽带 网友 qwe123 线上兼职月结
线上兼职月结

支持 ( 102 ) 盖楼(回复)

广电宽带 网友 qwe123 十大生意赚钱项目
十大生意赚钱项目

支持 ( 149 ) 盖楼(回复)

广电宽带 网友 qwe123 现在有什么游戏好挣钱
现在有什么游戏好挣钱

支持 ( 6 ) 盖楼(回复)

广电宽带 网友 qwe123 巴巴棋牌能提现吗
巴巴棋牌能提现吗

支持 ( 178 ) 盖楼(回复)

广电宽带 网友 qwe123 手机上兼职要交押金吗
手机上兼职要交押金吗

支持 ( 144 ) 盖楼(回复)

广电宽带 网友 qwe123 15岁能兼职吗
15岁能兼职吗

支持 ( 85 ) 盖楼(回复)

查看更多评论

致富暴利项目

实用工具 284.2

下载