|
发表于 2024-7-26 15:59:17
|
显示全部楼层
湖南省湘潭市
.版本 2
.支持库 SqliteDB
.支持库 spec
.子程序 数据库初始化
.局部变量 Sqlite数据库, Sqlite数据库
.局部变量 OrderList, Sqlite表, , , 订单的Sqlite表
.局部变量 返回值, 逻辑型
.局部变量 字段信息, Sqlite字段信息, , "4"
.局部变量 错误信息, 文本型
返回值 = Sqlite数据库.打开 (数据库路径, 真)
调试输出 (“打开数据库.打开”, 返回值)
.如果真 (返回值 = 假)
调试输出 (“数据库打开失败”)
返回 ()
.如果真结束
返回值 = Sqlite数据库.表是否存在 (“OrderList”)
调试输出 (“Sqlite数据库.表是否存在”, 返回值)
.如果真 (返回值 = 假)
字段信息 [1].名称 = “订单编号” ' 订单编号
字段信息 [1].类型 = -1
字段信息 [1].最大文本长度 = 0
字段信息 [2].名称 = “商品名称” ' 商品名称
字段信息 [2].类型 = #文本型
字段信息 [2].最大文本长度 = 0
字段信息 [3].名称 = “订单来源” ' 订单来源
字段信息 [3].类型 = #文本型
字段信息 [3].最大文本长度 = 0
字段信息 [4].名称 = “订单日期” ' 订单日期
字段信息 [4].类型 = #日期时间型
返回值 = Sqlite数据库.创建表 (“OrderList”, 字段信息)
调试输出 (“Sqlite数据库.创建表”, 返回值)
.如果真 (返回值 = 假)
信息框 (“数据表创建失败”, #警告图标, “数据表创建”, )
结束 ()
.如果真结束
.如果真结束
Sqlite数据库.关闭 ()
OrderList.关闭 ()
zySqlite数据库类.打开 (数据库路径, #SQLITE_打开_读写, 真)
调试输出 (“zySqlite.打开”, 返回值)
.如果真 (返回值 = 假)
信息框 (“数据库打开失败”, #警告图标, “数据库打开”, )
结束 ()
补充内容 (2024-8-12 21:30):
这个功能好像确实没用,你参考我这个吧 |
|