|
重置表插入位置、数据库回到首行,解决!
如果 (执行SQL语句 (MySql句柄, “DESCRIBE ” + 组合框1.内容 ) = 真) 表字段记录集句柄 = 取记录集 (MySql句柄 )表字段记录集行数 = 取记录集行数 (表字段记录集句柄 )如果 (执行SQL语句 (MySql句柄, “SELECT * FROM ” + 组合框1.内容 ) = 真) 表值记录集句柄 = 取记录集 (MySql句柄 )表值记录集行数 = 取记录集行数 (表值记录集句柄 )信息框 (“SELECT * FROM ” + 组合框1.内容 + “执行失败”, 0, , )计次循环首 (表字段记录集行数, 表字段计次 ) 读字段值 (表字段记录集句柄, “Field”, 表字段 )超级列表框1. 插入列 (, 表字段, , , , )计次循环首 (表值记录集行数, 表值计次 ) 读字段值 (表值记录集句柄, 表字段, 表值 )如果真 (超级列表框1. 取表项数 () ≠ 表值记录集行数 )超级列表框1. 插入表项 (, , , , , )超级列表框1. 置标题 (超级列表框1. 取表项数 () - 1, 超级列表框1. 取列数 () - 1, 表值 )到下一行 (表值记录集句柄 )如果真 (超级列表框1. 取表项数 () = 表值记录集行数 )超级列表框1. 置标题 (表值计次 - 1, 超级列表框1. 取列数 () - 1, 表值 )到下一行 (表值记录集句柄 )计次循环尾 ()到首行 (表值记录集句柄 )到下一行 (表字段记录集句柄 )计次循环尾 ()信息框 (“DESCRIBE ” + 组合框1.内容 + “执行失败”, 0, , )释放记录集 (表字段记录集句柄)释放记录集 (表值记录集句柄 )
|
|