- 易表在线答疑 (http://egrid2000.com/dvbbs/index.asp)
-- 用户社区 (http://egrid2000.com/dvbbs/list.asp?boardid=2)
---- 如何给自己编写的易表系统增加注册功能？ (http://egrid2000.com/dvbbs/dispbbs.asp?boardid=2&id=29112)
-- 发布时间：2017/1/20 8:29:00
--
-- 发布时间：2017/1/20 15:40:00
--
为系统增加注册功能
如果你希望为自己的系统增加注册功能，请参考以下资料：
-- 发布时间：2017/1/20 17:14:00
--
EncryptString
字符串加密函数，加密结果可以用DecryptString函数还原。
语法
EncryptString(String, Key)
String 要加密的字符串
Key
密钥字符串
加密示例：
EncryptString("易表","ABC")="D957BD65"
还原示例：
DecryptString("D957BD65","ABC")="易表"
加密与还原必须使用相同的密钥字符串。
DecryptString
还原EncryptString加密的字符串
语法
DecryptString(String, Key)
String
要还原的字符串
Key 密钥字符串
加密示例：
EncryptString("易表","ABC")="D957BD65"
还原示例：
DecryptString("D957BD65","ABC")="易表"
加密与还原必须使用相同的密钥字符串。
-- 发布时间：2017/1/20 21:31:00
--
再看看？
如果想注册后不留痕迹，则注册按钮公式中加上删除“注册”表，公式如下：
If([第二列]=Left(EncryptString([第一列],"ABCD"),20),MsgBox("注册成功!",0) And ShowMainWindow() And OpenGrid("表1") And RemoveGrid("注册"),MsgBox("注册码错误!",0))
[此贴子已经被作者于2017/1/21 8:19:14编辑过]
-- 发布时间：2017/1/21 16:59:00
--
在这个注册菜单是怎么进入的
-- 发布时间：2017/1/22 11:07:00
--
点击“进入系统”看看！