数据库连接和数据库执行 极语言
数据库模块里面的函数怎么写的
小程序 数据.读表(表名) 整数 长度;文本 语句[64]; 格式化(语句,"select count(*) from %s",表名) 长度=数据.读取(语句);如果(长度>0){ 格式化(语句,"select * from %s",表名) 数据.执行(语句)}返回(长度); 结束
数据.读表(表名)这个函数返回的是长度,数据类型是整数,也就是长度是一个内存地址,
那就弄一个文本变量接收这个地址,
不知道这个长度返回多少字节,
那就预估会返回3位数,一个数字按照2字节算,就是6字节,
我给6字节,不,我多给一个字节.
文本 总和文本[7]=结果1;
在读表之前需要连接数据库,看看函数咋写的
小程序 数据.连接(语句) 数据分配(1,0, @环境) 设置环境(环境, 200,3,0) 数据分配(2, 环境, @数据库) 驱动连接(数据库,0,语句, -3,0,0,0,1) 结束
首先没有返回值,但是需要接受一个参数
语句一般都是文本数据了,那整一个文本类型,
这个语句咋写的,去看了一下程序内置的说明书F1,如下图
ok,这个语句有了,我写了一个工具.
算一下需要多少字节,非汉字有57个字符,一个非汉字按照1字节计算,
汉字的话,有7个,一个汉字按照2字节算,
57*1+7*2=71字节,我多给一个字节,总共算72字节.
文本 SQLite数据库[72] = "Driver={SQLite3 ODBC Driver};Database=E:\SEC\测试\数据库连接\Chinook.db";
先看看这个
需要按一下F4,勾选[数据库.sc],确定修改
需要注意,若你的语句是错的,没有任何反馈
以sqlite为例:
-
程序段 窗体启动 文本 SQLite数据库[72] = "Driver={SQLite3 ODBC Driver};Database=E:\SEC\测试\数据库连接\Chinook.db"; 数据.连接(SQLite数据库); 数据.执行("insert into Album(Title, ArtistId)VALUES('aa', 1000)"); 整数 结果1 = 数据.读表("Album"); 文本 总和文本[7]=结果1; 信息框(0, 总和文本, "当前数据库表的总行数:", 信息图标); 结束;
-
每插入一次,我去数据库刷新一下,如图: