|
本帖最后由 阿杰 于 2023-7-13 08:14 编辑
- <火山程序 类型 = "通常" 版本 = 1 />
- 方法 取记录数量 <类型 = 整数 注释 = "例如:取记录数量 (数据库, "表名") 或 取记录数量 (数据库, "表名","姓名=\'张三\'")">
- 参数 参数据库 <类型 = SQLite数据库类>
- 参数 参表名 <类型 = 文本型>
- 参数 参条件 <类型 = 文本型 注释 = "例如:姓名=\'张三\'" @默认值 = "">
- {
- 变量 局记录集 <类型 = SQLite记录集类>
- 变量 记录数量 <类型 = 整数>
- 变量 局SQL <类型 = 文本型>
- 如果 (文本是否为空 (参条件))
- {
- 局SQL = "select count(*) from " + 参表名
- }
- 否则 // 不等于空
- {
- 局SQL = "select count(*) from " + 参表名 + " where " + 参条件
- }
- // 调试输出 (局SQL)
- 局记录集 = 参数据库.取记录集 (局SQL, )
- 如果 (局记录集.是否有效)
- {
- 如果真 (局记录集.执行语句 () == SQLite执行结果.下一行就绪)
- {
- 记录数量 = 局记录集.读整数数据 (0)
- }
- }
- 返回 (记录数量)
- }
- 方法 取记录数量2 <类型 = 整数>
- 参数 参数据库 <类型 = SQLite数据库类>
- 参数 参表名 <类型 = 文本型>
- 参数 参条件 <类型 = 文本型 注释 = "例如:姓名=\'张三\'" @默认值 = "">
- {
- 变量 记录数量 <类型 = 整数>
- 变量 局记录集 <类型 = SQLite记录集类>
- 如果 (文本是否为空 (参条件))
- {
- 局记录集 = 参数据库.取记录集 ("select * from " + 参表名, )
- }
- 否则 // 不等于空
- {
- 局记录集 = 参数据库.取记录集 ("select * from " + 参表名 + " where " + 参条件, )
- }
- 如果 (局记录集.是否有效)
- {
- 判断循环 (局记录集.执行语句 () == SQLite执行结果.下一行就绪)
- {
- 记录数量 = 记录数量 + 1
- }
- }
- 返回 (记录数量)
- }
复制代码
|
|