易语言如何设置进入密码?
发布网友
发布时间:2023-11-03 06:56
我来回答
共4个回答
热心网友
时间:2024-03-29 02:45
楼上,不用这么麻烦,变量即可。
比如:
输入原来的密码编辑框名字=A
输入现在的密码编辑框名字=B
原来密码变量=变量1(文本型)
如果(A.内容=变量1 且 B.内容≠“”)
则 变量1=B.内容
写配置项(取运行目录()+“\1.Sav”,“密码”,“密码”,变量1)
变量1=(读配置项(取运行目录()+“\1.Sav”,“密码”,“密码”))
A.内容=“”
B.内容=“”
否则 信息框(“修改密码失败,请查看密码是否有误,或输入修改密码”,0,“修改错误”)
纯手打,,,,,,,,,,,,,,,,,,,,,,,
这只是个参照,貌似有错误,如果想要密码加密,则使用#RC4加密
写出:写配置项 (取运行目录 () + “\1.Sav”, “密码”, “密码”, 到文本 (加密数据 (到字节集 (变量1), “1”, #RC4算法)))
读取:变量1 = 到文本 (解密数据 (到字节集 (读配置项 (取运行目录 () + “\1.Sav”, “密码”, “密码”, )), “1”, #RC4算法))。
热心网友
时间:2024-03-29 02:49
楼上,不用这么麻烦,变量即可。
比如:
输入原来的密码编辑框名字=A
输入现在的密码编辑框名字=B
原来密码变量=变量1(文本型)
如果(A.内容=变量1 且 B.内容≠“”)
则 变量1=B.内容
写配置项(取运行目录()+“\1.Sav”,“密码”,“密码”,变量1)
变量1=(读配置项(取运行目录()+“\1.Sav”,“密码”,“密码”))
A.内容=“”
B.内容=“”
否则 信息框(“修改密码失败,请查看密码是否有误,或输入修改密码”,0,“修改错误”)
纯手打!!!!!!!!!!!!!!!!!!!!!!!
这只是个参照,貌似有错误,如果想要密码加密,则使用#RC4加密
写出:写配置项 (取运行目录 () + “\1.Sav”, “密码”, “密码”, 到文本 (加密数据 (到字节集 (变量1), “1”, #RC4算法)))
读取:变量1 = 到文本 (解密数据 (到字节集 (读配置项 (取运行目录 () + “\1.Sav”, “密码”, “密码”, )), “1”, #RC4算法))
热心网友
时间:2024-03-29 02:44
楼上,不用这么麻烦,变量即可。
比如:
输入原来的密码编辑框名字=A
输入现在的密码编辑框名字=B
原来密码变量=变量1(文本型)
如果(A.内容=变量1
且
B.内容≠“”)
则
变量1=B.内容
写配置项(取运行目录()+“\1.Sav”,“密码”,“密码”,变量1)
变量1=(读配置项(取运行目录()+“\1.Sav”,“密码”,“密码”))
A.内容=“”
B.内容=“”
否则
信息框(“修改密码失败,请查看密码是否有误,或输入修改密码”,0,“修改错误”)
纯手打,,,,,,,,,,,,,,,,,,,,,,,
这只是个参照,貌似有错误,如果想要密码加密,则使用#RC4加密
写出:写配置项
(取运行目录
()
+
“\1.Sav”,
“密码”,
“密码”,
到文本
(加密数据
(到字节集
(变量1),
“1”,
#RC4算法)))
读取:变量1
=
到文本
(解密数据
(到字节集
(读配置项
(取运行目录
()
+
“\1.Sav”,
“密码”,
“密码”,
)),
“1”,
#RC4算法))。
热心网友
时间:2024-03-29 02:41
将密码写入数据库,并且设置数据库密码即可。打开时使用 读() 命令,对比输入的密码。