使用sqlite3数据库进行读取省市县联动失败？

pfxd521

【求助大神】我使用sqlite3数据库进行读取后进行三级联动只是出现了省，大神看看哪里出错了。

npzs

很简单的事儿被你搞那么复杂：
（注：你的表不全，有的市区根本就没有县级单位哈）

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口			地址码(6)+出生日期(8)+顺序码(3)+校验码(1)
变量名	类 型	数组	备 注
sql数据库	Sqlite3数据库连接
sql记录集	Sqlite3数据库记录集
sql字段	Sqlite3字段类型

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

如果真 (sql数据库.连接 (“region.db”) ＝ 假)
信息框 (sql数据库.取错误文本 (), #错误图标, , )
结束 ()

sql记录集 ＝ sql数据库.置sql命令 (“select * from region where parent_id=0”)
如果真 (sql记录集.是否已打开 () ＝ 假)
信息框 (sql记录集.取错误文本 (), #错误图标, , )
返回 ()

sql记录集.到首记录 ()
计次循环首 (sql记录集.取记录数 (), )
sql记录集.到下一条 ()  ' 你这模块有问题，正常情况下，首记录是第一条有数据的记录，而他这个第一条是空的，所以得把他的顺序放前面了
组合框_省.加入项目 (sql记录集.读文本型 (2), sql记录集.读整数型 (0))
' sql记录集.到下一条 ()‘正常应该是先读后移动
计次循环尾 ()
sql记录集.关闭 ()
' 组合框_省.现行选中项 ＝ 0  ' 想初始化自动选择第一项要开启这两句
' _组合框_省_列表项被选择 ()

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

如果真 (sql记录集.是否已打开 ())
sql记录集.关闭 ()
sql数据库.关闭 ()

子程序名	返回值类型	公开	备 注
_组合框_省_列表项被选择

组合框_市.清空 ()
组合框_县.清空 ()
sql记录集 ＝ sql数据库.置sql命令 (“select * from region where parent_id=” ＋ 到文本 (组合框_省.取项目数值 (组合框_省.现行选中项)))
如果真 (sql记录集.是否已打开 () ＝ 假)
信息框 (sql记录集.取错误文本 (), #错误图标, , )
返回 ()
sql记录集.到首记录 ()
计次循环首 (sql记录集.取记录数 (), )
sql记录集.到下一条 ()
组合框_市.加入项目 (sql记录集.读文本型 (2), sql记录集.读整数型 (0))
计次循环尾 ()
sql记录集.关闭 ()
' 组合框_市.现行选中项 ＝ 0  ' 想初始化自动选择第一项要开启这两句
' _组合框_市_列表项被选择 ()

子程序名	返回值类型	公开	备 注
_组合框_市_列表项被选择

组合框_县.清空 ()
sql记录集 ＝ sql数据库.置sql命令 (“select * from region where parent_id=” ＋ 到文本 (组合框_市.取项目数值 (组合框_市.现行选中项)))
如果真 (sql记录集.是否已打开 () ＝ 假)
信息框 (sql记录集.取错误文本 (), #错误图标, , )
返回 ()
sql记录集.到首记录 ()
计次循环首 (sql记录集.取记录数 (), )
sql记录集.到下一条 ()
组合框_县.加入项目 (sql记录集.读文本型 (2), sql记录集.读整数型 (0))
计次循环尾 ()
sql记录集.关闭 ()
如果真 (组合框_县.取项目数 () ＞ 0)
组合框_县.现行选中项 ＝ 0

.版本 2<br /> <br /> .程序集 窗口程序集_启动窗口, , , 地址码(6)+出生日期(8)+顺序码(3)+校验码(1)<br /> .程序集变量 sql数据库, Sqlite3数据库连接<br /> .程序集变量 sql记录集, Sqlite3数据库记录集<br /> .程序集变量 sql字段, Sqlite3字段类型<br /> <br /> .子程序 __启动窗口_创建完毕<br /> <br /> .如果真 (sql数据库.连接 (“region.db”) ＝ 假)<br />     信息框 (sql数据库.取错误文本 (), #错误图标, , )<br />     结束 ()<br /> .如果真结束<br /> <br /> sql记录集 ＝ sql数据库.置sql命令 (“select * from region where parent_id=0”)<br /> .如果真 (sql记录集.是否已打开 () ＝ 假)<br />     信息框 (sql记录集.取错误文本 (), #错误图标, , )<br />     返回 ()<br /> .如果真结束<br /> <br /> sql记录集.到首记录 ()<br /> .计次循环首 (sql记录集.取记录数 (), )<br />     sql记录集.到下一条 ()  ' 你这模块有问题，正常情况下，首记录是第一条有数据的记录，而他这个第一条是空的，所以得把他的顺序放前面了<br />     组合框_省.加入项目 (sql记录集.读文本型 (2), sql记录集.读整数型 (0))<br />     ' sql记录集.到下一条 ()‘正常应该是先读后移动<br /> .计次循环尾 ()<br /> sql记录集.关闭 ()<br /> <br /> ' 组合框_省.现行选中项 ＝ 0  ' 想初始化自动选择第一项要开启这两句<br /> ' _组合框_省_列表项被选择 ()<br /> <br /> .子程序 __启动窗口_将被销毁<br /> <br /> .如果真 (sql记录集.是否已打开 ())<br />     sql记录集.关闭 ()<br /> .如果真结束<br /> sql数据库.关闭 ()<br /> <br /> .子程序 _组合框_省_列表项被选择<br /> <br /> 组合框_市.清空 ()<br /> 组合框_县.清空 ()<br /> sql记录集 ＝ sql数据库.置sql命令 (“select * from region where parent_id=” ＋ 到文本 (组合框_省.取项目数值 (组合框_省.现行选中项)))<br /> .如果真 (sql记录集.是否已打开 () ＝ 假)<br />     信息框 (sql记录集.取错误文本 (), #错误图标, , )<br />     返回 ()<br /> .如果真结束<br /> sql记录集.到首记录 ()<br /> .计次循环首 (sql记录集.取记录数 (), )<br />     sql记录集.到下一条 ()<br />     组合框_市.加入项目 (sql记录集.读文本型 (2), sql记录集.读整数型 (0))<br /> <br /> .计次循环尾 ()<br /> sql记录集.关闭 ()<br /> <br /> ' 组合框_市.现行选中项 ＝ 0  ' 想初始化自动选择第一项要开启这两句<br /> ' _组合框_市_列表项被选择 ()<br /> <br /> .子程序 _组合框_市_列表项被选择<br /> <br /> 组合框_县.清空 ()<br /> sql记录集 ＝ sql数据库.置sql命令 (“select * from region where parent_id=” ＋ 到文本 (组合框_市.取项目数值 (组合框_市.现行选中项)))<br /> .如果真 (sql记录集.是否已打开 () ＝ 假)<br />     信息框 (sql记录集.取错误文本 (), #错误图标, , )<br />     返回 ()<br /> .如果真结束<br /> sql记录集.到首记录 ()<br /> .计次循环首 (sql记录集.取记录数 (), )<br />     sql记录集.到下一条 ()<br />     组合框_县.加入项目 (sql记录集.读文本型 (2), sql记录集.读整数型 (0))<br /> <br /> .计次循环尾 ()<br /> sql记录集.关闭 ()<br /> <br /> .如果真 (组合框_县.取项目数 () ＞ 0)<br />     组合框_县.现行选中项 ＝ 0<br /> .如果真结束

省市区三级联动.e (117.33 KB, 下载次数: 13)

2019-2-8 09:47 上传

点击文件名下载附件