使用易语言对db数据库进行加密的方法
易语言程序如下:
.版本 2
.程序集 窗口程序集_启动窗口
.子程序 _按钮1_被单击, , , 打开
.如果 (打开 (“test.edb”, , , , , 编辑框1.内容, ) = 假)
信息框 (“打开数据库失败!”, 0, , )
.否则
信息框 (“打开数据库成功!”, 0, , )
.如果结束
.子程序 _按钮2_被单击, , , 置数据库密码
.如果 (置数据库密码 (编辑框1.内容) = 真)
信息框 (“置数据库密码成功!”, 0, , )
.否则
信息框 (“数据库设置密码失败!”, 0, , )
.如果结束
关闭 ()
.子程序 _按钮3_被单击, , , 是否已加密
.如果 (是否已加密 (“test.edb”) = 真)
信息框 (“置数据已经加密!”, 0, , )
.否则
信息框 (“置数据未加密!”, 0, , )
.如果结束
.子程序 _按钮4_被单击, , , 密码输入框
.局部变量 密码变量, 文本型
.如果 (是否已加密 (“test.edb”) = 真)
密码输入框 (密码变量, )
.如果 (打开 (“test.edb”, , , , , 密码变量, ) = 假)
信息框 (“打开数据库失败!”, 0, , )
.否则
信息框 (“打开数据库成功!”, 0, , )
.如果结束
.否则
信息框 (“置数据未加密!”, 0, , )
.如果结束
关闭 ()
辰迅云「云服务器」,即开即用、新一代英特尔至强铂金CPU、三副本存储NVMe SSD云盘,价格低至29元/月。点击查看>>
推荐阅读: 易语言findwindowexa函数怎么用