Sqlite3问题

晚点相遇

Sqlite3里删除一个数据怎么把id列重新排序
比如现在id1-100的数据我把88这个id的数据删除了 怎么重新排序这个id

z573277679

  

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

测试删除与重排 ()

子程序名	返回值类型	公开	备 注
测试删除与重排			创建、插入、删除并重排

变量名	类 型	静态	数组	备 注
局_数据库	Sqlite数据库
局_数据库路径	文本型
局_执行状态	逻辑型
局_记录集	Sqlite记录集
局_id	文本型
局_name	文本型

局_数据库路径 ＝ 取运行目录 () ＋ “\test_demo.db”
局_执行状态 ＝ 局_数据库.打开 (局_数据库路径, 真)
如果真 (局_执行状态 ＝ 假)
返回 ()
局_数据库.执行SQL语句 (“DROP TABLE IF EXISTS user_table;”)
局_数据库.执行SQL语句 (“CREATE TABLE user_table (id INTEGER PRIMARY KEY AUTOINCREMENT, name TEXT);”)
局_数据库.执行SQL语句 (“INSERT INTO user_table (name) VALUES ('张三');”)
局_数据库.执行SQL语句 (“INSERT INTO user_table (name) VALUES ('李四');”)
局_数据库.执行SQL语句 (“INSERT INTO user_table (name) VALUES ('王五');”)
调试输出 (“删除操作前的数据库状态”)
局_记录集 ＝ 局_数据库.取记录集 (“SELECT * FROM user_table ORDER BY id ASC;”)
局_记录集.打开 ()
判断循环首 (局_记录集.到下一记录 () ＝ 真)
局_id ＝ 局_记录集.读字段文本值 (“id”, )
局_name ＝ 局_记录集.读字段文本值 (“name”, )
调试输出 (“原始数据 -> ID: [” ＋ 局_id ＋ “] | 姓名: ” ＋ 局_name)
判断循环尾 ()
局_记录集.关闭 ()
数据库_删除并重排ID (局_数据库, “user_table”, 2)
调试输出 (“删除并重排后的数据库状态”)
局_记录集 ＝ 局_数据库.取记录集 (“SELECT * FROM user_table ORDER BY id ASC;”)
局_记录集.打开 ()
判断循环首 (局_记录集.到下一记录 () ＝ 真)
局_id ＝ 局_记录集.读字段文本值 (“id”, )
局_name ＝ 局_记录集.读字段文本值 (“name”, )
调试输出 (“重排后数据 -> ID: [” ＋ 局_id ＋ “] | 姓名: ” ＋ 局_name)
判断循环尾 ()
局_记录集.关闭 ()
局_数据库.关闭 ()

子程序名	返回值类型	公开	备 注
数据库_删除并重排ID	逻辑型		单表小工具
参数名	类 型	参考	可空	数组	备 注
参数_数据库	Sqlite数据库				必须是已经执行“打开()”操作的数据库对象
参数_表名	文本型				需要操作的表名，如：“user_table”
参数_删除的ID	整数型				要删除的具体ID，例如：88

变量名	类 型	静态	数组	备 注
局_SQL_删除	文本型
局_SQL_重排	文本型
局_SQL_重置序列	文本型
局_执行状态	逻辑型

局_SQL_删除 ＝ “DELETE FROM ” ＋ 参数_表名 ＋ “ WHERE id = ” ＋ 到文本 (参数_删除的ID) ＋ “;”
局_SQL_重排 ＝ “UPDATE ” ＋ 参数_表名 ＋ “ SET id = id - 1 WHERE id > ” ＋ 到文本 (参数_删除的ID) ＋ “;”
局_SQL_重置序列 ＝ “UPDATE sqlite_sequence SET seq = (SELECT MAX(id) FROM ” ＋ 参数_表名 ＋ “) WHERE name = '” ＋ 参数_表名 ＋ “';”
参数_数据库.开始事务 (“delete_trans”)
局_执行状态 ＝ 参数_数据库.执行SQL语句 (局_SQL_删除)
如果真 (局_执行状态 ＝ 假)
参数_数据库.回滚事务 (“delete_trans”)
返回 (假)
局_执行状态 ＝ 参数_数据库.执行SQL语句 (局_SQL_重排)
如果真 (局_执行状态 ＝ 假)
参数_数据库.回滚事务 (“delete_trans”)
返回 (假)
参数_数据库.执行SQL语句 (局_SQL_重置序列)
局_执行状态 ＝ 参数_数据库.提交事务 (“delete_trans”)
如果真 (局_执行状态 ＝ 假)
返回 (假)
返回 (真)

i支持库列表	支持库注释
sqlite3	(未知支持库)
spec	特殊功能支持库

.支持库 sqlite3<br /> .支持库 spec<br /> <br /> .子程序 __启动窗口_创建完毕<br /> <br /> 测试删除与重排 ()<br /> <br /> .子程序 测试删除与重排, , 公开, 创建、插入、删除并重排<br /> .局部变量 局_数据库, Sqlite数据库<br /> .局部变量 局_数据库路径, 文本型<br /> .局部变量 局_执行状态, 逻辑型<br /> .局部变量 局_记录集, Sqlite记录集<br /> .局部变量 局_id, 文本型<br /> .局部变量 局_name, 文本型<br /> <br /> 局_数据库路径 ＝ 取运行目录 () ＋ “\test_demo.db”<br /> 局_执行状态 ＝ 局_数据库.打开 (局_数据库路径, 真)<br /> .如果真 (局_执行状态 ＝ 假)<br />     返回 ()<br /> .如果真结束<br /> 局_数据库.执行SQL语句 (“DROP TABLE IF EXISTS user_table;”)<br /> 局_数据库.执行SQL语句 (“CREATE TABLE user_table (id INTEGER PRIMARY KEY AUTOINCREMENT, name TEXT);”)<br /> 局_数据库.执行SQL语句 (“INSERT INTO user_table (name) VALUES ('张三');”)<br /> 局_数据库.执行SQL语句 (“INSERT INTO user_table (name) VALUES ('李四');”)<br /> 局_数据库.执行SQL语句 (“INSERT INTO user_table (name) VALUES ('王五');”)<br /> 调试输出 (“删除操作前的数据库状态”)<br /> 局_记录集 ＝ 局_数据库.取记录集 (“SELECT * FROM user_table ORDER BY id ASC;”)<br /> 局_记录集.打开 ()<br /> .判断循环首 (局_记录集.到下一记录 () ＝ 真)<br />     局_id ＝ 局_记录集.读字段文本值 (“id”, )<br />     局_name ＝ 局_记录集.读字段文本值 (“name”, )<br />     调试输出 (“原始数据 -> ID: [” ＋ 局_id ＋ “] | 姓名: ” ＋ 局_name)<br /> .判断循环尾 ()<br /> 局_记录集.关闭 ()<br /> 数据库_删除并重排ID (局_数据库, “user_table”, 2)<br /> 调试输出 (“删除并重排后的数据库状态”)<br /> 局_记录集 ＝ 局_数据库.取记录集 (“SELECT * FROM user_table ORDER BY id ASC;”)<br /> 局_记录集.打开 ()<br /> .判断循环首 (局_记录集.到下一记录 () ＝ 真)<br />     局_id ＝ 局_记录集.读字段文本值 (“id”, )<br />     局_name ＝ 局_记录集.读字段文本值 (“name”, )<br />     调试输出 (“重排后数据 -> ID: [” ＋ 局_id ＋ “] | 姓名: ” ＋ 局_name)<br /> .判断循环尾 ()<br /> 局_记录集.关闭 ()<br /> 局_数据库.关闭 ()<br /> <br /> .子程序 数据库_删除并重排ID, 逻辑型, 公开, 单表小工具<br /> .参数 参数_数据库, Sqlite数据库, 参考, 必须是已经执行“打开()”操作的数据库对象<br /> .参数 参数_表名, 文本型, , 需要操作的表名，如：“user_table”<br /> .参数 参数_删除的ID, 整数型, , 要删除的具体ID，例如：88<br /> .局部变量 局_SQL_删除, 文本型<br /> .局部变量 局_SQL_重排, 文本型<br /> .局部变量 局_SQL_重置序列, 文本型<br /> .局部变量 局_执行状态, 逻辑型<br /> <br /> 局_SQL_删除 ＝ “DELETE FROM ” ＋ 参数_表名 ＋ “ WHERE id = ” ＋ 到文本 (参数_删除的ID) ＋ “;”<br /> 局_SQL_重排 ＝ “UPDATE ” ＋ 参数_表名 ＋ “ SET id = id - 1 WHERE id > ” ＋ 到文本 (参数_删除的ID) ＋ “;”<br /> 局_SQL_重置序列 ＝ “UPDATE sqlite_sequence SET seq = (SELECT MAX(id) FROM ” ＋ 参数_表名 ＋ “) WHERE name = '” ＋ 参数_表名 ＋ “';”<br /> 参数_数据库.开始事务 (“delete_trans”)<br /> 局_执行状态 ＝ 参数_数据库.执行SQL语句 (局_SQL_删除)<br /> .如果真 (局_执行状态 ＝ 假)<br />     参数_数据库.回滚事务 (“delete_trans”)<br />     返回 (假)<br /> .如果真结束<br /> 局_执行状态 ＝ 参数_数据库.执行SQL语句 (局_SQL_重排)<br /> .如果真 (局_执行状态 ＝ 假)<br />     参数_数据库.回滚事务 (“delete_trans”)<br />     返回 (假)<br /> .如果真结束<br /> 参数_数据库.执行SQL语句 (局_SQL_重置序列)<br /> 局_执行状态 ＝ 参数_数据库.提交事务 (“delete_trans”)<br /> .如果真 (局_执行状态 ＝ 假)<br />     返回 (假)<br /> .如果真结束<br /> 返回 (真)