易语言ACCESS数据库的读操作
最近正在学习易语言,开始觉得不伦不类不过习惯一下觉得对一些编程新手来说挺适合,下面我把易语言对于数据库的连接,读写等做下说明,大家共同学习。
首先要在窗体上添加两个控件“数据库连接”和“记录集”
我刚刚开始用易语言不知为什么我的窗口组建箱中只有基本组件而没有扩展组件和外部组件?选择菜单栏的工具->支持库配置->全选->确定这样就行了
1.连接数据库连接1.连接Access (取运行目录 () +“\多用户库.mdb”, “”) [如果是SQLServer数据库可以用数据库连接1.连接SQLServer (服务器IP,数据库名 ,用户名 ,密码 )]
2.置连接记录集1.置连接 (数据库连接1)
3.打开表记录集1.打开(“表名”,#数据表名)
4.读数据记录集1.读文本(“列名”, 存储变量名) 可以把存储变量名赋值给控件
5.增删改对于这步操作我习惯于用SQL语句来写因为比较熟悉,先定义个文本变量“SQL语句”,然后赋值,举例:添加: SQL语句=“insert into 多用户表(税号,名称,类型,联系人,电话,到期时间) values ('” +删全部空 (税号编辑框.内容) +“','” +删全部空 (名称编辑框.内容) +“','” +类型+“','” +删全部空(联系人编辑框.内容) +“','” +删全部空 (电话编辑框.内容) +“','” +删全部空 (日期编辑框.内容) +“')”
删除: SQL语句=“DELETE from 多用户表 where 编号=” +编号
修改: SQL语句=“update 多用户表 set 税号='” +删全部空 (税号编辑框.内容) +“',名称='” +删全部空 (名称编辑框.内容) +“',类型='” +类型+“',联系人='” +删全部空 (联系人编辑框.内容) +“',电话='” +删全部空 (电话编辑框.内容) +“',到期时间='” +删全部空 (日期编辑框.内容) +“' where 编号=” +编号标签.标题
然后执行语句命令-------数据库连接1.执行SQL (SQL语句)
============================================================================
.版本 2
.支持库 eDB
服务器=读配置项 (取运行目录 () +“\Config.ini”, “配置”, “服务器”, )
数据库=读配置项 (取运行目录 () +“\Config.ini”, “配置”, “数据库”, )