易语言edb数据库多用户操作问题

一个user.edb存放用户账号和密码进行账号和密码的验证
多个user_data.edb存放对应账号的多个数据表
然后账号admin和账号123同时登陆同时操作不同的user_data.edb怎么操作
我建立线程时用户读不到了所以启动线程那个代码是注销的
目前只能单用户操作,等待这个用户完成后才能让另外一个用户操作
我上代码(由于百度提示补充问题过长,删减部分不相关的代码)

.版本 2
.支持库 spec

.子程序 判断收到的数据
.如果真 (取文本左边 (到文本 (解密的数据文本), 2) = “zc”)
账号密码文本 = 分割文本 (到文本 (解密的数据文本), “/”, )
账号 = 账号密码文本 [2]
密码 = 账号密码文本 [3]
打开 (取运行目录 () + “\user.edb”, “user”, , , , , )
到首记录 ()
.如果 (查找 (账号 = 读 (1)))
画板1.滚动写行 (“账号:|” + 账号 + “|已被注册”)
服务器1.发送数据 (服务器1.取回客户 (), 到字节集 (“yzc”), )
.否则
加空记录 ()
写 (1, 账号)
写 (2, 密码)
创建目录 (取运行目录 () + “\” + 账号)
写到文件 (取运行目录 () + “\” + 账号 + “\data.edb”, #初始数据库)
画板1.滚动写行 (“账号:|” + 账号 + “|注册成功”)
服务器1.发送数据 (服务器1.取回客户 (), 到字节集 (“zccg”), )
.如果结束
关闭 (“user”)
.如果真结束
.如果真 (取文本左边 (到文本 (解密的数据文本), 4) = “hqsj”)
.判断开始 (用户操作数据 = 真)
画板1.滚动写行 (“账号:|” + 账号 + “|正在操作中”)
服务器1.发送数据 (服务器1.取回客户 (), 到字节集 (“usercz”), )
.默认
分割的数据 = 分割文本 (到文本 (解密的数据文本), “/”, )
账号信息 = 分割的数据 [2]
画板1.滚动写行 (“账号:|” + 账号信息 + “|开始下发数据。。。”)
用户操作数据 = 真
加载数据库文件下发到客户端 ()
.判断结束
.如果真结束
.版本 2
.支持库 spec

.子程序 加载数据库文件下发到客户端
.局部变量 加密数据文本, 文本型

打开 (取运行目录 () + “\” + 账号信息 + “\data.edb”, “data”, , , , , )
到首记录 ()
.计次循环首 (取记录数 (), )
加密数据文本 = xxxxxxx“这里对加密的代码进行X处理
服务器1.发送数据 (服务器1.取回客户 (), 到字节集 (加密数据文本), )
延时 (200)
跳过 ()
处理事件 ()
.计次循环尾 ()
关闭 (“data”)
服务器1.发送数据 (服务器1.取回客户 (), 到字节集 (“fswc”), )
画板1.滚动写行 (“账号:|” + 账号信息 + “|数据下发完成”)
用户操作数据 = 假
已经取消了服务端的认证!直接在客户端上连接使用mysql数据库了!此问题已不是问题!你们随便回答个我采纳就可以了

第1个回答  2022-02-14
用线程操作,启动线程时读取数据库里关键信息到线程里操作,读取这个时间是可以忽略不计的。本回答被提问者和网友采纳

相关了解……

你可能感兴趣的内容

本站内容来自于网友发表,不代表本站立场,仅表示其个人看法,不对其真实性、正确性、有效性作任何的担保
相关事宜请发邮件给我们
© 非常风气网