超级列表框怎么保存到数据库

方法是逐一读取超级列表框的数据，保存到数据库中去！.版本2.支持库iext.局部变量循环次数,整数型.局部变量第一列,文本型.局部变量第二列,文本型.局部变量第三列,文本型.局部变量SQL语句,文本型记录集1.置连接(数据库连接1).判断循环首(循环次数＜超级列表框1.取表项数())第一列＝超级列表框1.取标题(循环次数,

.版本 2.支持库 iext

打开 (“你要打开的数据库名字.edb”, , , , , , )

超级列表框1.全部删除 ()

.计次循环首 (取记录数 (), )

位置 ＝ 超级列表框1.插入表项 (, “0”, , , , )

超级列表框1.置标题 (位置, 0, 到文本 (读 (1))) ‘数据库有多少个数据就填写多少个读（）

超级列表框1.置标题 (位置, 1, 到文本 (读 (2)))

超级列表框1.置标题 (位置, 2, 到文本 (读 (3)))

跳过 ()

.计次循环尾 ()

这种列程应该比较多吧,我最近想写的一个软件也有这个功能 附上源码你参考下吧

.版本 2.支持库 iext

.程序集 起动窗口程序集

.子程序 __启动窗口_创建完毕

.判断开始 (外部数据库1.打开MDB数据库 (取运行目录 () ＋ “\data\mpdata.mdb”, , “mp611”, , ) ＝ 真)

信息框 (“欢迎使用加菲猪售后管理系统”, 0, )

.默认

信息框 (“系统启动失败！”, 0, )

.判断结束

刷新列表框 ()

.子程序 刷新列表框

.局部变量 记录集句柄, 整数型

.局部变量 索引, 整数型

记录集句柄 ＝ 外部数据库1.查询 (“select * from wxdj”)

超级列表框1.全部删除 ()

.判断循环首 (外部数据库1.尾记录后 (记录集句柄) ＝ 假)

索引 ＝ 超级列表框1.插入表项 (, 外部数据库1.读 (记录集句柄, “djbh”), , , , )

超级列表框1.置标题 (索引, 1, 外部数据库1.读 (记录集句柄, “yhxm”))

超级列表框1.置标题 (索引, 2, 外部数据库1.读 (记录集句柄, “lxdh”))

超级列表框1.置标题 (索引, 3, 外部数据库1.读 (记录集句柄, “sjggxh”))

超级列表框1.置标题 (索引, 4, 外部数据库1.读 (记录集句柄, “sjch”))

超级列表框1.置标题 (索引, 5, 外部数据库1.读 (记录集句柄, “gzms”))

超级列表框1.置标题 (索引, 6, 外部数据库1.读 (记录集句柄, “sxrq”))

超级列表框1.置标题 (索引, 7, 外部数据库1.读 (记录集句柄, “sxry”))

超级列表框1.置标题 (索引, 8, 外部数据库1.读 (记录集句柄, “fhrq”))

超级列表框1.置标题 (索引, 9, 外部数据库1.读 (记录集句柄, “tzqj”))

外部数据库1.到后一记录 (记录集句柄)

.判断循环尾 ()

外部数据库1.关闭记录集 (记录集句柄)

---