sqlite数据库cha询读取问题

十一弋

全_sqlite记录集.读字段文本值(,)  调试cha询语句没有问题，为什么读取不到数据到编辑框里。

钥匙key

最关键的一句。。
记录集.到下一记录 ()
你没有到下一行。没有进记录集。在外面找东西。当然找不到。相当于数组这时候的下标是0.但是开始起始下标要求是1.怎么也获取不到数据呀。。。

灵海雪缘

会不会是编码问题，转换一下编码试试。

fire9

转ansi试试

十一弋

用sqlite表来操作就能把数据显示到编辑框，但是sqlite表.查找语句是失败的，语句是写的不对吗？

十一弋

fire9 发表于 2024-6-1 13:02
转ansi试试

试了也不行

SYzenghao

参考一下，例外你应该做成类

  

子程序名	返回值类型	公开	备 注
记录_cha询数据_按明码	逻辑型
参数名	类 型	参考	可空	数组	备 注
明码	文本型
页数	整数型				从1开始
每页数量	整数型
返回追溯数据	record

变量名	类 型	静态	数组	备 注
sql语句	文本型
记录集	Sqlite记录集
record	record

sql语句 ＝ “SELECT * FROM main.record WHERE code1 LIKE '%” ＋ 明码 ＋ “%' ”
sql语句 ＝ sql语句 ＋ “LIMIT ” ＋ 到文本 (到长整数 ( (页数 － 1) × 每页数量)) ＋ “,” ＋ 到文本 (每页数量) ＋ “;”
重定义数组 (返回追溯数据, 假, 0)
如果真 (记录集.置SQL语句 (sql语句, sql) ＝ 真)
如果真 (记录集.打开 () ＝ 真)
如果真 (记录集.取记录个数 () ＞ 0)
计次循环首 (记录集.取记录个数 (), )
如果真 (记录集.到下一记录 () ＝ 假)
跳出循环 ()
record.id ＝ 记录集.读字段整数值 (“id”, )
record.time ＝ 到时间 (记录集.读字段文本值 (“time”, ))
record.line ＝ 记录集.读字段文本值 (“line”, )
record.BoxCode ＝ 记录集.读字段文本值 (“BoxCode”, )
record.Batch ＝ 记录集.读字段文本值 (“batch”, )
record.code ＝ 记录集.读字段文本值 (“code”, )
record.code1 ＝ 记录集.读字段文本值 (“code1”, )
record.check ＝ 记录集.读字段文本值 (“check”, )
record.flag ＝ 记录集.读字段整数值 (“flag”, )
加入成员 (返回追溯数据, record)
计次循环尾 ()
记录集.关闭 ()
返回 (真)
记录集.关闭 ()

返回 (假)

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

.版本 2<br /> .支持库 sqlite3<br /> <br /> .子程序 记录_cha询数据_按明码, 逻辑型, 公开,                       <br /> .参数 明码, 文本型<br /> .参数 页数, 整数型, , 从1开始<br /> .参数 每页数量, 整数型<br /> .参数 返回追溯数据, record, 参考 数组<br /> .局部变量 sql语句, 文本型<br /> .局部变量 记录集, Sqlite记录集<br /> .局部变量 record, record<br /> <br /> sql语句 ＝ “SELECT * FROM main.record WHERE code1 LIKE '%” ＋ 明码 ＋ “%' ”<br /> sql语句 ＝ sql语句 ＋ “LIMIT ” ＋ 到文本 (到长整数 ((页数 － 1) × 每页数量)) ＋ “,” ＋ 到文本 (每页数量) ＋ “;”<br /> <br /> 重定义数组 (返回追溯数据, 假, 0)<br /> .如果真 (记录集.置SQL语句 (sql语句, sql) ＝ 真)<br />     .如果真 (记录集.打开 () ＝ 真)<br />         .如果真 (记录集.取记录个数 () ＞ 0)<br />             .计次循环首 (记录集.取记录个数 (), )<br />                 .如果真 (记录集.到下一记录 () ＝ 假)<br />                     跳出循环 ()<br />                 .如果真结束<br />                 record.id ＝ 记录集.读字段整数值 (“id”, )<br />                 record.time ＝ 到时间 (记录集.读字段文本值 (“time”, ))<br />                 record.line ＝ 记录集.读字段文本值 (“line”, )<br />                 record.BoxCode ＝ 记录集.读字段文本值 (“BoxCode”, )<br />                 record.Batch ＝ 记录集.读字段文本值 (“batch”, )<br />                 record.code ＝ 记录集.读字段文本值 (“code”, )<br />                 record.code1 ＝ 记录集.读字段文本值 (“code1”, )<br />                 record.check ＝ 记录集.读字段文本值 (“check”, )<br />                 record.flag ＝ 记录集.读字段整数值 (“flag”, )<br />                 加入成员 (返回追溯数据, record)<br />             .计次循环尾 ()<br />             记录集.关闭 ()<br />             返回 (真)<br />         .如果真结束<br />         记录集.关闭 ()<br />     .如果真结束<br /> <br /> .如果真结束<br /> 返回 (假)

天行大华

你这样写代码太乱了了，要封装下，方便查问题。

十一弋

钥匙key 发表于 2024-6-1 15:35
最关键的一句。。
记录集.到下一记录 ()
你没有到下一行。没有进记录集。在外面找东西。当然找不到。相当于 ...

全_sqlite记录集 ＝ 全_sqlite数据库.取记录集 (“select * from `员工信息表` where ID =” ＋ 到文本 (窗口_员工管理.超级列表框_员工列表.取表项数值 (窗口_员工管理.超级列表框_员工列表.现行选中项)))这条语句出现问题，拼接了到文本 (窗口_员工管理.超级列表框_员工列表.取表项数值 (窗口_员工管理.超级列表框_员工列表.现行选中项))就会读不到数据。