数据库连接和数据库执行 极语言

数据库模块里面的函数怎么写的

小程序 数据.读表(表名)
整数 长度;文本 语句[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, 总和文本, "当前数据库表的总行数:", 信息图标);
结束;

-

每插入一次,我去数据库刷新一下,如图: