找回密码
 加入
搜索
查看: 7121|回复: 16

[AU3基础] 如何让帐号密码被记住 已解决

 火.. [复制链接]
发表于 2013-1-19 17:14:14 | 显示全部楼层 |阅读模式
本帖最后由 p7749 于 2013-7-16 15:21 编辑

我设计一个游戏登录窗口,我想知道如何让我输入的账号密码被脚本记住了,下次打开就有了.
代码如下,请问还要加入什么内容才行:
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 367, 242, 192, 114)
$Label1 = GUICtrlCreateLabel("游戏帐号:", 16, 24, 55, 17)
$Input1 = GUICtrlCreateInput("", 88, 22, 207, 21)
$Label2 = GUICtrlCreateLabel("游戏密码:", 16, 72, 55, 17)
$Input2 = GUICtrlCreateInput("", 88, 70, 207, 21,$ES_PASSWORD)
$Button1 = GUICtrlCreateButton("OK", 128, 160, 97, 33)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
        $nMsg = GUIGetMsg()
        Switch $nMsg
                Case $GUI_EVENT_CLOSE
                        Exit

        EndSwitch
WEnd
发表于 2013-1-19 17:20:13 | 显示全部楼层
本帖最后由 gzh888666 于 2013-1-19 17:21 编辑
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 367, 242, 192, 114)
$Label1 = GUICtrlCreateLabel("游戏帐号:", 16, 24, 55, 17)
$Input1 = GUICtrlCreateInput("123456", 88, 22, 207, 21)
$Label2 = GUICtrlCreateLabel("游戏密码:", 16, 72, 55, 17)
$Input2 = GUICtrlCreateInput("123456", 88, 70, 207, 21,$ES_PASSWORD)
$Button1 = GUICtrlCreateButton("OK", 128, 160, 97, 33)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
        $nMsg = GUIGetMsg()
        Switch $nMsg
                Case $GUI_EVENT_CLOSE
                        Exit

        EndSwitch
WEnd
这10分得的毫无压力!
 楼主| 发表于 2013-1-19 17:24:15 | 显示全部楼层
你水平跟我一样还要分.从那里写入只要学一天也会,就不用在这问了.
跟我问的有差距.我是说我每次输入的账号密码,脚本都可以把最后那次输入的内容记住了.
发表于 2013-1-19 18:22:37 | 显示全部楼层
写配置文件吧
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 367, 242, 192, 114)
$Label1 = GUICtrlCreateLabel("游戏帐号:", 16, 24, 55, 17)
$Input1 = GUICtrlCreateInput("123456", 88, 22, 207, 21)
$Label2 = GUICtrlCreateLabel("游戏密码:", 16, 72, 55, 17)
$Input2 = GUICtrlCreateInput("123456", 88, 70, 207, 21,$ES_PASSWORD)
$Button1 = GUICtrlCreateButton("OK", 128, 160, 97, 33)
GUICtrlSetData($Input1, IniRead(@AppDataDir & "\" & "config.ini", "inf", "use", ""))
GUICtrlSetData($Input2, IniRead(@AppDataDir & "\" & "config.ini", "inf", "pwd", ""))
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
        $nMsg = GUIGetMsg()
        Switch $nMsg
                Case $GUI_EVENT_CLOSE
                        Exit
                                Case   $Button1
                               IniWrite(@AppDataDir & "\" & "config.ini", "inf", "use",GUICtrlRead($Input1, 0))
                           IniWrite(@AppDataDir & "\" & "config.ini", "inf", "pwd",GUICtrlRead($Input2, 0))
        EndSwitch
WEnd

如果必要还需考虑加上密码加密保存
发表于 2013-1-19 22:19:01 | 显示全部楼层
回复 4# zldfsz


    有没有对txt或ini加密的方法?
发表于 2013-1-19 22:29:25 | 显示全部楼层
回复 3# p7749

可以使用大师的办法,写配置文件或者写注册表
记录前可以对信息进行一些加密

PS:这不是提问者对回帖者应有的态度~~
发表于 2013-1-19 22:30:12 | 显示全部楼层
回复 5# moyi20

有现在的UDF,可以找一下包包里面的
 楼主| 发表于 2013-1-19 22:32:33 | 显示全部楼层
本帖最后由 p7749 于 2013-1-19 22:34 编辑

非常感谢和尚的无私帮助,圆满解决,又从中学会好几个函数.现在对我来说还不要加密.如果不是特别麻烦.有空时请把密码加密也写写吧.
 楼主| 发表于 2013-1-19 22:36:12 | 显示全部楼层
回复 6# annybaby


    接受您的批评.
发表于 2013-1-19 22:45:34 | 显示全部楼层
回复 8# p7749

UDF里有现成的,比如使用Ward大大写的_XXTEA_Encrypt(),密钥可以使用硬件码,比如取CPUID或者网卡MAC,这样生成的密码只能在生成的那台机上正确解密,别的机子就算取得了密文也解码不到正确的明文
发表于 2013-1-20 12:49:05 | 显示全部楼层
要记住就写入配置文件或者注册表。
加密的话用_Crypt_EncryptData 吧
发表于 2013-1-21 14:28:05 | 显示全部楼层
看不懂啊!!!!!
发表于 2013-1-26 13:42:43 | 显示全部楼层
加密有的啊。可以写入INI之前加密,读出来的时候解密就可以。
发表于 2013-1-30 09:17:22 | 显示全部楼层
頂上去,學習一下。
发表于 2013-1-30 14:45:19 | 显示全部楼层
配置文件才是王道
您需要登录后才可以回帖 登录 | 加入

本版积分规则

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

GMT+8, 2024-9-29 11:35 , Processed in 0.090067 second(s), 23 queries .

Powered by Discuz! X3.5 Licensed

© 2001-2024 Discuz! Team.

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