Access快速开发平台自动更新，保留默认账号和密码的方法

时　间:2019-07-14 09:12:35
作　者:宏鹏   ID：21115  城市：上海
摘　要:快速开发平台自动更新，保留默认账号和密码的方法。
正　文:

具体方法：

首先，在SysFrmLogin中添加以下代码：

SetParameter "Auto Login Enabled", dbBoolean, GetSetting("Access RDP App Project", "Auto Login", "Enabled")
    SetParameter "Auto Login Username", dbText, GetSetting("Access RDP App Project", "Auto Login", "Username")
    SetParameter "Auto Login Password", dbText, GetSetting("Access RDP App Project", "Auto Login", "Password")
    SetParameter "Auto Login Countdown Seconds", dbLong, GetSetting("Access RDP App Project", "Auto Login", "Countdown Seconds")

然后，在SysFrmMySettings中添加以下代码：

SaveSetting "Access RDP App Project", "Auto Login", "Enabled", CStr(Me.chkEnabledAutoLogin)
    SaveSetting "Access RDP App Project", "Auto Login", "Username", Nz(Me.txtAutoLoginUserName)
    SaveSetting "Access RDP App Project", "Auto Login", "Password", Nz(Me.txtAutoLoginPassword)
    SaveSetting "Access RDP App Project", "Auto Login", "Countdown Seconds", Nz(Me.txtAutoLoginCountdownSeconds, 0)

最后，在“我的设置”点一次保存就行了。（必须点保存按钮，才会触发保存到注册表中的操作。）