MySql数据库上传的问题

396384183

是这样的，刚学习了下MySql的教程，现在遇到了个问题就是我想把3个超级列表框内容同时上传到一个数据库，不同的表格里面，同时上传会出错卡死状态。如果一个一个的表格点击的话，第一个表格上传完毕，然后上传第二个表格，等第二个表格上传完毕以后，在上传第三个表格，这样是可以的，如何才可以更好的同时上传3个表格呢。

启动线程 (&子程序1, , )
启动线程 (&子程序2, , )
启动线程 (&子程序3, , )
这样的方式会出错 会卡死 不知道怎么回事



子程序1 ()
子程序2 ()
子程序3 ()

这个可以正常运行 但是像让3个子程序同时运行 不知道如何才可以搞定
我也测试了做了3个按钮，每个按钮分别对应 （批量上传超级列表框1 到数据库），等待一个表格上传完毕以后，程序才能点击第二个表格上传，要不会出现卡死状态，或者不上传数据状态，请问这个如何解决呢

下载地址：
https://wwoc.lanzoum.com/i8Cv411fblni

liangmoumou

  

子程序名	返回值类型	公开	备 注
超级列表框_导入MySQL	文本型		将超级列表框中的数据读到数据库，返回写入内容，配合insert语句使用例如：“INSERT INTO `wangluoshuju`.`biaoge1` (`user`, `pass`, `status`, `point`) VALUES (”
参数名	类 型	参考	可空	数组	备 注
超级列表框_导入组件	超级列表框

变量名	类 型	静态	数组	备 注
局_表项数	整数型
局_列数	整数型
局_表项计次	整数型
局_列计次	整数型
局_文本	文本型
局_内容	文本型
SQL句柄	整数型
SQL语句	文本型

局_表项数 ＝ 超级列表框_导入组件.取表项数 ()  ' 行
' 局_列数 ＝ 超级列表框_导入组件.取列数 ()  ' 列
局_列数 ＝ 4
计次循环首 (局_表项数, 局_表项计次)  ' 行
计次循环首 (局_列数, 局_列计次)  ' 列
局_文本 ＝ 超级列表框_导入组件.取标题 (局_表项计次 － 1, 局_列计次 － 1 ＋ 2)
判断 (局_表项计次 ＝ 1)
判断 (局_列计次 ＝ 1)
局_内容 ＝ “'” ＋ 局_文本 ＋ “'”
局_内容 ＝ 局_内容 ＋ “,'” ＋ 局_文本 ＋ “'”

判断 (局_列计次 ＝ 1)
局_内容 ＝ 局_内容 ＋ “'” ＋ 局_文本 ＋ “'”
局_内容 ＝ 局_内容 ＋ “,'” ＋ 局_文本 ＋ “'”

计次循环尾 ()
局_内容 ＝ 局_内容 ＋ “),(”
计次循环尾 ()
局_内容 ＝ 文本_删右边 (局_内容, 2)
返回 (局_内容)

子程序名	返回值类型	公开	备 注
子程序1

变量名	类 型	静态	数组	备 注
SQL语句	文本型
局_文本	文本型

进入许可区 (许可证)
局_文本 ＝ 超级列表框_导入MySQL (超级列表框1)
SQL语句 ＝ “INSERT INTO `wangluoshuju`.`biaoge1` (`user`, `pass`, `status`, `point`) VALUES (” ＋ 局_文本
判断 (执行SQL语句 (mysql句柄, SQL语句) ＝ 真)
调试输出 (“数据添加成功”)
调试输出 (“数据添加失败”)
退出许可区 (许可证)

i支持库列表	支持库注释
iext	扩展界面支持库一
EThread	多线程支持库
mysql	MySql支持库
spec	特殊功能支持库

.版本 2<br /> .支持库 iext<br /> <br /> .子程序 超级列表框_导入MySQL, 文本型, 公开, 将超级列表框中的数据读到数据库，返回写入内容，配合insert语句使用例如：“INSERT INTO `wangluoshuju`.`biaoge1` (`user`, `pass`, `status`, `point`) VALUES (”<br /> .参数 超级列表框_导入组件, 超级列表框<br /> .局部变量 局_表项数, 整数型<br /> .局部变量 局_列数, 整数型<br /> .局部变量 局_表项计次, 整数型<br /> .局部变量 局_列计次, 整数型<br /> .局部变量 局_文本, 文本型<br /> .局部变量 局_内容, 文本型<br /> .局部变量 SQL句柄, 整数型<br /> .局部变量 SQL语句, 文本型<br /> <br /> 局_表项数 ＝ 超级列表框_导入组件.取表项数 ()  ' 行<br /> ' 局_列数 ＝ 超级列表框_导入组件.取列数 ()  ' 列<br /> 局_列数 ＝ 4<br /> .计次循环首 (局_表项数, 局_表项计次)  ' 行<br />     .计次循环首 (局_列数, 局_列计次)  ' 列<br />         局_文本 ＝ 超级列表框_导入组件.取标题 (局_表项计次 － 1, 局_列计次 － 1 ＋ 2)<br />         .判断开始 (局_表项计次 ＝ 1)<br />             .判断开始 (局_列计次 ＝ 1)<br />                 局_内容 ＝ “'” ＋ 局_文本 ＋ “'”<br />             .默认<br />                 局_内容 ＝ 局_内容 ＋ “,'” ＋ 局_文本 ＋ “'”<br />             .判断结束<br /> <br />         .判断 (局_列计次 ＝ 1)<br />             局_内容 ＝ 局_内容 ＋ “'” ＋ 局_文本 ＋ “'”<br />         .默认<br />             局_内容 ＝ 局_内容 ＋ “,'” ＋ 局_文本 ＋ “'”<br />         .判断结束<br /> <br />     .计次循环尾 ()<br />     局_内容 ＝ 局_内容 ＋ “),(”<br /> .计次循环尾 ()<br /> 局_内容 ＝ 文本_删右边 (局_内容, 2)<br /> 返回 (局_内容)<br /> .版本 2<br /> .支持库 EThread<br /> .支持库 mysql<br /> .支持库 spec<br /> <br /> .子程序 子程序1<br /> .局部变量 SQL语句, 文本型<br /> .局部变量 局_文本, 文本型<br /> <br /> 进入许可区 (许可证)<br /> 局_文本 ＝ 超级列表框_导入MySQL (超级列表框1)<br /> SQL语句 ＝ “INSERT INTO `wangluoshuju`.`biaoge1` (`user`, `pass`, `status`, `point`) VALUES (” ＋ 局_文本<br /> .判断开始 (执行SQL语句 (mysql句柄, SQL语句) ＝ 真)<br />     调试输出 (“数据添加成功”)<br /> .默认<br />     调试输出 (“数据添加失败”)<br /> .判断结束<br /> 退出许可区 (许可证)

396384183

liangmoumou

你把数据库连接写在每个子程序试试

396384183

liangmoumou 发表于 2023-7-6 08:33
你把数据库连接写在每个子程序试试

之前测试了 还是不行

thdujh

试试增加线程许可证,
多线程导致的出错

396384183

thdujh 发表于 2023-7-6 11:03
试试增加线程许可证,
多线程导致的出错

我没有写多线程的方法 就是图片那样操作的 你可以帮忙写下？

396384183

thdujh 发表于 2023-7-6 11:03
试试增加线程许可证,
多线程导致的出错

你好，能给个完整的例子吗？

liangmoumou

  

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

许可证 ＝ 创建进入许可证 ()

子程序名	返回值类型	公开	备 注
__启动窗口_将被销毁

删除进入许可证 (许可证)

i支持库列表	支持库注释
EThread	多线程支持库

.版本 2<br /> .支持库 EThread<br /> <br /> .子程序 __启动窗口_创建完毕<br /> <br /> 许可证 ＝ 创建进入许可证 ()<br /> <br /> .版本 2<br /> .支持库 EThread<br /> <br /> .子程序 __启动窗口_将被销毁<br /> <br /> 删除进入许可证 (许可证)

liangmoumou

这个例子实际上还是单线程，你要是想组件多线程的话，你要不还是用鱼刺的模块吧