运行效率很慢，谁能帮我看看是哪儿的问题吗？

shanyukun

  

数据库文件 ＝ 取运行目录 () ＋ “\代码库.db3”
文件_删除 (配置文件)
文件_删除 (数据库文件)
db3字段 [1].名称 ＝ “daima”
db3字段 [2].名称 ＝ “name”
db3数据库.打开 (数据库文件, 真)
区 ＝ “qu”
处 ＝ “chu”
校 ＝ “xiao”
社 ＝ “she”
db3数据库.创建表 (区, db3字段)
db3数据库.创建表 (处, db3字段)
db3数据库.创建表 (社, db3字段)
db3数据库.创建表 (校, db3字段)
文本文件 ＝ 取运行目录 () ＋ “\2022年办事处社区.txt”
学校代码 ＝ 读入文本 (打开文件 (文本文件, , ), )
文本_分割文本 (学校代码, #换行符, , 学校代码组)
进度条1.最大位置 ＝ 取数组成员数 (学校代码组)
db3数据表.打开 (处, db3数据库)
计次循环首 (取数组成员数 (学校代码组), 数量)
一行文本 ＝ 学校代码组 [数量]
判断代码 ＝ 取文本左边 (一行文本, 1)
判断 (判断代码 ＝ “a”)
区代码 ＝ 取文本中间 (一行文本, 2, 3)
区名称 ＝ 取文本右边 (一行文本, 取文本长度 (一行文本) － 4)
' db3数据表.打开 (处, db3数据库)
db3数据表.插入 ()
db3数据表.写字段值 (1, 区代码)
db3数据表.写字段值 (2, 区名称)
db3数据表.提交 ()


进度条1.位置 ＝ 数量
计次循环尾 ()

i支持库列表	支持库注释
sqlite3	(未知支持库)

.版本 2<br /> .支持库 sqlite3<br /> <br /> 数据库文件 ＝ 取运行目录 () ＋ “\代码库.db3”<br /> 文件_删除 (配置文件)<br /> 文件_删除 (数据库文件)<br /> db3字段 [1].名称 ＝ “daima”<br /> db3字段 [2].名称 ＝ “name”<br /> db3数据库.打开 (数据库文件, 真)<br /> 区 ＝ “qu”<br /> 处 ＝ “chu”<br /> 校 ＝ “xiao”<br /> 社 ＝ “she”<br /> db3数据库.创建表 (区, db3字段)<br /> db3数据库.创建表 (处, db3字段)<br /> db3数据库.创建表 (社, db3字段)<br /> db3数据库.创建表 (校, db3字段)<br /> <br /> 文本文件 ＝ 取运行目录 () ＋ “\2022年办事处社区.txt”<br /> 学校代码 ＝ 读入文本 (打开文件 (文本文件, , ), )<br /> 文本_分割文本 (学校代码, #换行符, , 学校代码组)<br /> 进度条1.最大位置 ＝ 取数组成员数 (学校代码组)<br /> db3数据表.打开 (处, db3数据库)<br /> .计次循环首 (取数组成员数 (学校代码组), 数量)<br />     一行文本 ＝ 学校代码组 [数量]<br />     判断代码 ＝ 取文本左边 (一行文本, 1)<br />     .判断开始 (判断代码 ＝ “a”)<br />         区代码 ＝ 取文本中间 (一行文本, 2, 3)<br />         区名称 ＝ 取文本右边 (一行文本, 取文本长度 (一行文本) － 4)<br />         ' db3数据表.打开 (处, db3数据库)<br />         db3数据表.插入 ()<br />         db3数据表.写字段值 (1, 区代码)<br />         db3数据表.写字段值 (2, 区名称)<br />         db3数据表.提交 ()<br />     .默认<br /> <br />     .判断结束<br />     进度条1.位置 ＝ 数量<br /> .计次循环尾 ()

补充内容 (2022-6-14 17:27):
总共也就一两千行数据。

补充内容 (2022-6-14 17:30):
感觉1秒内运行完的，结果得以分钟计。

亮蓝色的风

在 计次循环首 (取数组成员数 (学校代码组), 数量) 循环前加 db3数 据库.开始事务 () 循环结束后加 db3数 据库.提交事务 ()
再进一步优化：不使用 db3数 据表.插入 ()，改用SQL语句

  

sql ＝ “insert into chu(daima,name) VALUES ('” ＋ 区代码 ＋ “','” ＋ 区名称 ＋ “')”
db3数据库.执行SQL语句 (sql)

i支持库列表	支持库注释
sqlite3	(未知支持库)

.版本 2<br /> .支持库 sqlite3<br /> <br />         sql ＝ “insert into chu(daima,name) VALUES ('” ＋ 区代码 ＋ “','” ＋ 区名称 ＋ “')”<br />         db3数据库.执行SQL语句 (sql)

* 2000
* “原方法+事务” | 2001 | 1638.000000
* 2000
* “语句+事务” | 2001 | 515.000000
测试.e (931.73 KB, 下载次数: 0)

2022-6-14 23:43 上传

点击文件名下载附件

rectdbszy

读入文本换成快速文本对象

rectdbszy

  

数据库文件 ＝ 取运行目录 () ＋ “\代码库.db3”
文件_删除 (配置文件)
文件_删除 (数据库文件)
db3字段 [1].名称 ＝ “daima”
db3字段 [2].名称 ＝ “name”
db3数据库.打开 (数据库文件, 真)
区 ＝ “qu”
处 ＝ “chu”
校 ＝ “xiao”
社 ＝ “she”
db3数据库.创建表 (区, db3字段)
db3数据库.创建表 (处, db3字段)
db3数据库.创建表 (社, db3字段)
db3数据库.创建表 (校, db3字段)
文件号 ＝ 打开文件 (取运行目录 () ＋ “\2022年办事处社区.txt”, , )
关闭文件 (文件号)
学校代码 ＝ 读入文本 (文件号, )
文本_分割文本 (学校代码, #换行符, , 学校代码组)
进度条1.最大位置 ＝ 取数组成员数 (学校代码组)
db3数据表.打开 (处, db3数据库)
计次循环首 (取数组成员数 (学校代码组), 数量)
一行文本 ＝ 学校代码组 [数量]
判断代码 ＝ 取文本左边 (一行文本, 1)
判断 (判断代码 ＝ “a”)
区代码 ＝ 取文本中间 (一行文本, 2, 3)
区名称 ＝ 取文本右边 (一行文本, 取文本长度 (一行文本) － 4)
' db3数据表.打开 (处, db3数据库)
db3数据表.插入 ()
db3数据表.写字段值 (1, 区代码)
db3数据表.写字段值 (2, 区名称)
db3数据表.提交 ()


进度条1.位置 ＝ 数量
计次循环尾 ()
' 修改了一下

.版本 2<br /> <br /> 数据库文件 ＝ 取运行目录 () ＋ “\代码库.db3”<br /> 文件_删除 (配置文件)<br /> 文件_删除 (数据库文件)<br /> db3字段 [1].名称 ＝ “daima”<br /> db3字段 [2].名称 ＝ “name”<br /> db3数据库.打开 (数据库文件, 真)<br /> 区 ＝ “qu”<br /> 处 ＝ “chu”<br /> 校 ＝ “xiao”<br /> 社 ＝ “she”<br /> db3数据库.创建表 (区, db3字段)<br /> db3数据库.创建表 (处, db3字段)<br /> db3数据库.创建表 (社, db3字段)<br /> db3数据库.创建表 (校, db3字段)<br /> 文件号 ＝ 打开文件 (取运行目录 () ＋ “\2022年办事处社区.txt”, , )<br /> 关闭文件 (文件号)<br /> 学校代码 ＝ 读入文本 (文件号, )<br /> 文本_分割文本 (学校代码, #换行符, , 学校代码组)<br /> 进度条1.最大位置 ＝ 取数组成员数 (学校代码组)<br /> db3数据表.打开 (处, db3数据库)<br /> .计次循环首 (取数组成员数 (学校代码组), 数量)<br />     一行文本 ＝ 学校代码组 [数量]<br />     判断代码 ＝ 取文本左边 (一行文本, 1)<br />     .判断开始 (判断代码 ＝ “a”)<br />         区代码 ＝ 取文本中间 (一行文本, 2, 3)<br />         区名称 ＝ 取文本右边 (一行文本, 取文本长度 (一行文本) － 4)<br />         ' db3数据表.打开 (处, db3数据库)<br />         db3数据表.插入 ()<br />         db3数据表.写字段值 (1, 区代码)<br />         db3数据表.写字段值 (2, 区名称)<br />         db3数据表.提交 ()<br />     .默认<br /> <br />     .判断结束<br />     进度条1.位置 ＝ 数量<br /> .计次循环尾 ()<br /> <br /> '修改了一下

shanyukun

rectdbszy 发表于 2022-6-14 20:00
[e=0].版本 2

数据库文件 ＝ 取运行目录 () ＋ “\代码库.db3”

太快了！!
就是没有读出和写入数据。

把：关闭文件（文件号），这一句屏蔽之后，速度又慢回来了。

shanyukun

rectdbszy 发表于 2022-6-14 19:53
读入文本换成快速文本对象

主要是循环里比较慢。读入，分割文本还能接受。

shanyukun

大家测试一下，2000条数据，要几十秒。

rectdbszy

shanyukun 发表于 2022-6-14 21:43
大家测试一下，2000条数据，要几十秒。

哪就只有多线程了，要不就只有优化，减少代码的二次识别

rectdbszy

测试了下要39000，看是不是要快速一点

亮蓝色的风

测试.e (931.73 KB, 下载次数: 2)

2022-6-14 23:45 上传

点击文件名下载附件
* 2000
* “原方法+事务” | 2001 | 1685.000000
* 2000
* “语句+事务” | 2001 | 624.000000