找回密码
 加入
搜索
查看: 2394|回复: 12

可能有点难度的问题

[复制链接]
发表于 2008-10-9 14:55:27 | 显示全部楼层 |阅读模式
$Form1 = GUICreate("Form1", 223, 103, 338, 243)
$Label1 = GUICtrlCreateLabel("密  码", 24, 16, 34, 17)
GUICtrlCreateInput("", 64, 16, 121, 21)
$Button1 = GUICtrlCreateButton("登陆", 128, 64, 75, 25, 0)
$Button2 = GUICtrlCreateButton("修改密码", 40, 64, 75, 25, 0)
GUISetState(@SW_SHOW)
While 1
        $nMsg = GUIGetMsg()
        Switch $nMsg
                Case $GUI_EVENT_CLOSE
                        Exit
        EndSwitch
WEnd
谁能给我一段关于登陆密码的代码。初始密码为123456,可以修改密码。并把密码加密保存到注册表或文件里。谢谢。论坛上没有看到这方面的资料。

[ 本帖最后由 xg911335 于 2008-10-12 11:52 编辑 ]
发表于 2008-10-9 15:06:39 | 显示全部楼层
用MD5加密?我也想知道用哪个函数~!

[ 本帖最后由 78391493 于 2008-10-9 15:07 编辑 ]
发表于 2008-10-9 15:28:32 | 显示全部楼层
sanhen发的这个不错,就是不知道怎么解密,郁闷。可惜了
http://www.autoitx.com/forum.php?mod=viewthread&tid=273
发表于 2008-10-9 15:48:04 | 显示全部楼层
叁恨快来,怎么解密?
发表于 2008-10-9 20:43:36 | 显示全部楼层
官网有加解密
发表于 2008-10-10 07:59:55 | 显示全部楼层

;加密和解密

Global  $ad=IniRead(@ScriptDir  &  "\password.ini","password","admin","")
Global  $jm1=_StringEncrypt(0,$ad,"yiyaojiemijiuzhaowoa","administrators")
Global  $ps=IniRead(@ScriptDir  &  "\password.ini","password","pass","")
Global  $jm2=_StringEncrypt(0,$ps,"yiyaojiemijiuzhaowoa","administrators")
发表于 2008-10-10 08:53:58 | 显示全部楼层

回复 6# liongodmien 的帖子

没看懂,明明都是一样的
发表于 2008-10-10 10:41:27 | 显示全部楼层
原帖由 78391493 于 2008-10-10 08:53 发表
没看懂,明明都是一样的

没看懂没关系,能用就好了
 楼主| 发表于 2008-10-10 11:05:18 | 显示全部楼层
有没有这样的列子,发来看看。感谢。
发表于 2008-10-10 11:11:59 | 显示全部楼层
原帖由 xg911335 于 2008-10-10 11:05 发表
有没有这样的列子,发来看看。感谢。

http://www.1msoft.com/column/system-yingyong/iniencrypt.html
 楼主| 发表于 2008-10-10 13:31:58 | 显示全部楼层
谢谢楼上的兄弟。有没有MD5的加密列子?
发表于 2008-10-11 10:44:21 | 显示全部楼层

回复 8# liongodmien 的帖子

没看懂怎么用。。。。
发表于 2008-10-11 10:44:51 | 显示全部楼层
算法无所谓,好用就行~~~~~~
您需要登录后才可以回帖 登录 | 加入

本版积分规则

QQ|手机版|小黑屋|AUTOIT CN ( 鲁ICP备19019924号-1 )谷歌 百度

GMT+8, 2024-4-28 18:47 , Processed in 0.075805 second(s), 19 queries .

Powered by Discuz! X3.5 Licensed

© 2001-2024 Discuz! Team.

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