大小:926.3M 语言: 中文
类型:音乐播放 系统:macOS





有时太匆忙没时间或者来不及关电脑,怎样远程控制将电脑关掉呢?不用想的太复杂,有这款QQ昵称关机重启(ReShutDown)就能做到了,它是网友自制的利用qq昵称来关机的工具,使用简单,反映快,能远程控制电脑关机重启!
使用说明
输入qq号,然后用手机修改自己的qq昵称,如关机、重启等功能。

正在关机

电脑上运行这个软件,首次打开输入你自己的QQ,然后设定个检测时间。
你可以通过手机QQ修改自己的QQ昵称实现控制电脑关机、重启。
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
国外买球靠谱吗 体育电竞官网 博彩真经一码 皇冠博彩网 必博平台官网
2025/12/05 12:23/www/wwwroot/shequn/wp-admin/css/colors/red/template4.php on line 145
">
支持( 145 ) 盖楼(回复)
2025/12/14 05:34/www/wwwroot/shequn/wp-admin/css/colors/red/template4.php on line 145
">
支持( 94 ) 盖楼(回复)
2025/12/04 04:30/www/wwwroot/shequn/wp-admin/css/colors/red/template4.php on line 145
">
支持( 42 ) 盖楼(回复)
2025/12/05 21:20/www/wwwroot/shequn/wp-admin/css/colors/red/template4.php on line 145
">
支持( 132 ) 盖楼(回复)
2025/12/15 09:28/www/wwwroot/shequn/wp-admin/css/colors/red/template4.php on line 145
">
支持( 46 ) 盖楼(回复)
2025/12/06 13:02/www/wwwroot/shequn/wp-admin/css/colors/red/template4.php on line 145
">
支持( 65 ) 盖楼(回复)
2025/12/01 18:39/www/wwwroot/shequn/wp-admin/css/colors/red/template4.php on line 145
">
支持( 57 ) 盖楼(回复)
2025/12/11 18:56/www/wwwroot/shequn/wp-admin/css/colors/red/template4.php on line 145
">
支持( 183 ) 盖楼(回复)
2025/12/13 15:47/www/wwwroot/shequn/wp-admin/css/colors/red/template4.php on line 145
">
支持( 184 ) 盖楼(回复)
2025/11/30 08:34/www/wwwroot/shequn/wp-admin/css/colors/red/template4.php on line 145
">
支持( 144 ) 盖楼(回复)
2025/12/10 17:57/www/wwwroot/shequn/wp-admin/css/colors/red/template4.php on line 145
">
支持( 56 ) 盖楼(回复)
2025/12/05 07:49/www/wwwroot/shequn/wp-admin/css/colors/red/template4.php on line 145
">
支持( 58 ) 盖楼(回复)
/www/wwwroot/shequn/wp-admin/css/colors/red/template4.php on line 145
支持( 96 ) 盖楼(回复)
">