请选择 进入手机版 | 继续访问电脑版

死性不改BBS - 网维行业自由、中立的技术与信息交流平台

 找回密码
 立即注册

QQ登录

只需一步,快速开始

扫一扫,访问微社区

搜索
热搜: 万能包 GHO
绝地求生(外服)公告 | 绝地求生(腾讯)公告英雄联盟-官网公告 | 官方论坛 | 服务器状态穿越火线-官网公告 | 官方论坛地下城与勇士-官网公告 | 官方论坛
查看: 283|回复: 3

[原创] RADMIN3 密码管理AU3源码

[复制链接]

25

主题

125

帖子

0

精华

级别:高中

人气
11
精华
0
金币
82
经验
2968
注册时间
2016-2-11
发表于 2020-5-22 23:16:41 | 显示全部楼层 |阅读模式

别装深沉了,赶快来凑凑热闹吧!

您需要 登录 才可以下载或查看,没有帐号?立即注册

x
While 1
WINWAITACTIVE("Radmin 安全性:")
$bt=StringMid(WinGetTitle("Radmin 安全性:"),12)
$sbt=StringRight ($bt,3)
$nx=StringInStr(FileRead("rpwd.ini"),$sbt)
$dd=StringInStr(FileRead("rpwd.ini"),$bt)
$all=StringInStr(FileRead("rpwd.ini"),"all")
if $dd <> 0 then
$mm = Iniread("rpwd.ini",$bt,"密码","有误")
sr()
elseif $nx <> 0 then
$mm = Iniread("rpwd.ini",$sbt,"密码","有误")
sr()
ElseIf $all <> 0 then
$mm = Iniread("rpwd.ini","all","密码","有误")
sr()
endif
WEnd
Func sr()
ControlSetText("Radmin 安全性:","输入密码","Edit1",$mm)
ControlClick("Radmin 安全性:","","确定")
EndFunc

r3pwd.ini内容
[all]
帐号=1111
密码=11111111111111
[后三位]
帐号=2222222
密码=2222222222
[名称全部]
帐号=333333
密码=333333333




如果你想回报坛友,最好的方法是为其加【人气】积分,为他人加人气积分不会扣除自己的积分,去做一个懂得回报的人吧!

[这是默认签名,更换签名点这里!]

9

主题

67

帖子

0

精华

级别:初中

人气
0
精华
0
金币
76
经验
1124
注册时间
2016-5-19
发表于 7 天前 | 显示全部楼层
nice.!nice.!nice.!
如果你想回报坛友,最好的方法是为其加【人气】积分,为他人加人气积分不会扣除自己的积分,去做一个懂得回报的人吧!

[这是默认签名,更换签名点这里!]
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

手机版|小黑屋|死性不改BBS - 网维行业自由、中立的技术与信息交流平台 ( 浙ICP备14029261号 )

浙公网安备 33010302001723号

GMT+8, 2020-5-30 01:06 , Processed in 0.074062 second(s), 27 queries .

Powered by Discuz! X3.4

Copyright © 2001-2020, Tencent Cloud.

快速回复 返回顶部 返回列表