易语言数据库 edb

版本

2

支持库

shell

程序集

窗口程序集_启动窗口

子程序

创建数据库子程序1

局部变量

字段信息,

字段信息,

,

"1"

局部变量

要分割的文本,

字节集

局部变量

分割的文本,

文本型,

,

"0"

'

##############先指定数据库，数据名称，数据类型，

字段信息

[1]名称

＝

“文本1”

'

数据库名称

字段信息

[1]类型

＝

#文本型

'

数据库数据类型

字段信息

[1]最大文本长度

＝

20

'

如果数据库数据信息保存类型为文本型，就要指定文本长度

'

##############这样数据库就先行指定了一行数据

创建

(取当前目录

()

＋

“\范例”,

字段信息)

'

这时创建数据库，会包括一个空行，把文本分割后的文件导入数据库这一空行

要分割的文本

＝

读入文件

(取特定目录

(#系统桌面)

＋

“\1txt”)

'

把文件读出来，导入到变量（要分割的文本）

加入成员

(分割的文本,

分割文本

(到文本

(要分割的文本),

#换行符,

))

'

这这里分割一下，文本都是一行一行的就用换行符来分割吧

写

(“文本1”,

分割的文本

[1])

'

这里可以用计次循环来赋值

打开（数据库）

跳到（取记录数-10）

计次循环首（10，i）

值=读（“字段名称或位置”）

写入到第二个数据库

跳过（）

计次循环尾

我猜想#姓名应该是数据库字段名,正确的语法应该是:查找(读("姓名")="程序")

如果字段类型为文本型的可用 编辑框1内容=读("年龄") 如果是其他类型的需转换到文本型,本例程应改为:

跳到(1)'为了保证每次均从库文件的首记录开始进行查找,首先将针指置于首记录

如果真(查找(读("姓名")="程序")=假)

信息框("没有匹配的姓名",0,"错误")

返回()

如果真结束

编辑框1内容=到文本(读("年龄"))

其中:“姓名”和“年龄”均为该数据库的字段名(本例假设姓名为文本型，年龄为整数型)

查找，读写

查找；总得知道要改到是哪条，找到它，读出来，改写成你要到，再放回去。

如果你没有给条件，那只有全部读，判断（判断是否为0），是则读出来改写，再放回去。

你总有一样条件是要必须成立的，否则就没办法 *** 作

我给你一个正确的代码。

程序集 窗口程序集1

子程序 _按钮1_被单击

加空记录 ()

写 (#账号, 组合框1内容)

写 (#密码, 到数值 (编辑框1内容))

组合框1内容 ＝ “”

编辑框1内容 ＝ “”

子程序 __启动窗口_创建完毕

打开 (取运行目录 () ＋ “\1edb”, , , , , , )

到首记录 ()

判断循环首 (尾记录后 () ＝ 假)

组合框1加入项目 (读 (“账号”), )

跳过 ()

判断循环尾 ()

这上面的代码都没错。错的是下面的代码。

子程序 _组合框1_列表项被选择

跳到 (组合框1现行选中项 ＋ 1)

编辑框1内容 ＝ 读 (“密码”) ，错的是这句：编辑框1内容 ＝ 读 (“密码”)

你把它改成：

编辑框1内容 ＝ “”

编辑框1加入文本 (到文本 (读 (#密码)))

另外你要把账号字段设置文本型，不然会出错提示数据类型不匹配。

这样就可以了。

以上就是关于易语言数据库 edb全部的内容，包括:易语言数据库 edb、易语言Edb数据库读写、易语言edb数据库查找等相关内容解答，如果想了解更多相关内容，可以关注我们，你们的支持是我们更新的动力！