易语言之外部数据库使用
一．access数据库
 
新版外部数据库支持库提供类似ADO数据库访问方式，外部数据库的访问基本思路是这样的：通过连接控件连接到数据库，表操作控件取得连接，并内部表操作控件对数据库进行操作，现在对它的使用方法作些介绍。
准备工作：
建立窗口，放置控件（数据库连接、记录集、按钮，显示记录的控件（这里用了超级列表框），并且用access建立一个空的数据库，字段信息如下：
 
 
程序界面如图1所示。
图1
1.连接数据库
使用前，易语言首要要通知到数据库，然后和其达成连接协议。有两种连接方式。
（1）ADO连接方式
命令及格式：〈逻辑型〉 对象．连接Access （文件名，密码）
参数<1>的名称为“文件名”，类型为“文本型（text）”。Access数据库文件的完整路径名。
参数<2>的名称为“密码”，类型为“文本型（text）”，初始值为“”。Access数据库的作密码。本参数可以为空，若为空，表示Access数据库没有密码。
例句：信息框 (选择 (数据库连接1.连接Access (“SoccerPlayer DB.mdb”, “”), “连接成功”, “连接失败”), 0, )，返回真说明连接成功，否则连接失败。运行程序，点击“连接access”，成功后如图2显示：
图2
(2) access通用连接
命令及格式：〈逻辑型〉 对象．连接 （连接文本）
参数<1>的名称为“连接文本”，类型为“文本型（text）”。本参数提供连接时使用的连接文本。
例句：信息框 (数据库连接1.连接 (“Provider=Microsoft.Jet.OLEDB.4.0;Data Source=SoccerPlayer DB.mdb”), 0, )，返回真说明连接成功，否则连接失败。运行程序，点击“通用连接access”连接，显示真假信息。
 
 
2.设置连接
连接后，将操作权限设置给记录集之后记录集将对数据库进行操作。
命令及格式：〈逻辑型〉 对象．设连接 （连接）
参数<1>的名称为“连接”，类型为“数据库连接（CommonConnection）”。要设置的数据库连接。
例句：信息框 (选择 (记录集1.设连接 (数据库连接1), “设置成功”, “设置失败”), 0, )，返回真说明设置成功，否则设置失败。如图3显示：
图3
3.打开表
设置好连接之后，就可以打开数据库中的表进行具体操作了，先在看如何打开表，以下命令。
命令及格式：〈逻辑型〉 对象．打开 （打开表，打开选项）
参数<1>的名称为“打开表”，类型为“文本型（text）”。输入数据库中的某一个表名或SQL语句。
参数<2>的名称为“打开选项”，类型为“整数型（int）”。打开表时的动作类型，可以为以下常量或数值之一：1、#打开普通SQL； 2、#打开表名。
例句：信息框 (选择 (记录集1.打开 (“基本信息”, #打开表名), “打开表成功”, “打开表失败”), 0, )，返回真说明打开表成功，否则打开表失败。如图4显示：
图4
 
4.移动读写位置
数据库打开后，默认读写位置在尾记录，我们常规是从首记录开始操作，我们需要移动到我们指定记录。
(1) 到首记录
命令及格式：〈逻辑型〉 对象．到首记录 （）
例句：信息框 (选择 (记录集1.到首记录 (), “移动位置成功”, “移动位置失败”), 0, )，返回真说明移动位置成功，否则移动位置失败。如图5显示：
access例句
图5
同时还有其他移动记录的命令，相关如下：
(2) 到尾记录
命令及格式：〈逻辑型〉 对象．到尾记录 （）
例句：信息框 (选择 (记录集1.到尾记录 (), “移动位置成功”, “移动位置失败”), 0, )，返回真说明移动位置成功，否则移动位置失败。
(3) 到下一条
命令及格式：〈逻辑型〉 对象．到下一条 （）
例句：信息框 (选择 (记录集1. 到下一条 （）, “移动位置成功”, “移动位置失败”), 0, )，返回真说明移动位置成功，否则移动位置失败。
 
(4) 到前一条
命令及格式：〈逻辑型〉 对象．到前一条（）
例句：信息框 (选择 (记录集1. 到前一条 （）, “移动位置成功”, “移动位置失败”), 0, )，返回真说明移动位置成功，否则移动位置失败。
(5) 移到
命令及格式：〈逻辑型〉 对象．移到 （目标记录号）
参数<1>的名称为“目标记录号”，类型为“整数型（int）”。本参数提供目标记录号值，该值从 0 开始。
例句：信息框 (记录集1.移到 (超级列表框1.现行选中项), 0, ), 0, )，返回真说明移动位置成功，否则移动位置失败。
5.添加记录
新版外部数据库记录添加方式有了改变，按照以下步骤进行：
添加空记录→分别写字段→更新数据
(1) 添加空记录
命令及格式：〈逻辑型〉 对象．添加 （）
例句：信息框 (选择 (记录集1.添加 (), “添加空记录成功”, “添加空记录失败”), 0, ) ，返回真说明添加空记录成功，否则添加空记录失败。如图6显示：
图6
(2) 写文本型字段
命令及格式：〈逻辑型〉 对象．写文本 （序号或字段名，文本）
参数<1>的名称为“序号或字段名”，类型为“通用型（all）”。字段的序号或者字段名。
参数<2>的名称为“文本”，类型为“文本型（text）”。要写入的文本。
例句：    信息框 (选择 (记录集1.写文本 (1, “世恒”), “写文本字段成功”, “写文本字段失败”), 0, )，返回真说明写文本字段成功，否则写文本字段失败。如图7显示：
图7
(3) 写日期型字段
命令及格式：〈逻辑型〉 对象．写日期 （序号或字段名，日期）
参数<1>的名称为“序号或字段名”，类型为“通用型（all）”。字段的序号或者字段名。
参数<2>的名称为“日期”，类型为“日期时间型（date）”。要写入的日期变量。
例句：        信息框 (选择 (记录集1.写日期 (2, 到时间 (“1980-2-21”)), “写日期字段成功”, “写日期字段失败”), 0, )，返回真说明写日期字段成功，否则写日期字段失败。如图8显示：
图8
(4) 写单精度型字段 
命令及格式：〈逻辑型〉 对象．写单精度 （序号或字段名，双精度）
参数<1>的名称为“序号或字段名”，类型为“通用型（all）”。字段的序号或者字段名。
参数<2>的名称为“双精度”，类型为“小数型（float）”。要写入的双精度值。例句：        信息框 (选择 (记录集1.写单精度 (3, 1.7), “写单精度字段成功”, “写单精度字段失败”), 0, )，返回真说明写单精度字段成功，否则写单精度字段失败。如图9显示：
图9
（5）写双精度型字段
命令及格式：〈逻辑型〉 对象．写双精度 （序号或字段名，双精度）
参数<1>的名称为“序号或字段名”，类型为“通用型（all）”。字段的序号或者字段名。
参数<2>的名称为“双精度”，类型为“双精度小数型（double）”。要写入的双精度值。
例句：        信息框 (选择 (记录集1.写双精度 (4, 68.55), “写双精度字段成功”, “写双精度字段失败”), 0, )，返回真说明写双精度字段成功，否则写双精度字段失败。如图10显示：
图10
（6）写逻辑型字段
命令及格式：〈逻辑型〉 对象．写逻辑 （序号或字段名，逻辑）
参数<1>的名称为“序号或字段名”，类型为“通用型（all）”。字段的序号或者字段名。参数<2>的名称为“逻辑”，类型为“逻辑型（bool）”。要写入的逻辑型值。
例句：        信息框 (选择 (记录集1.写逻辑 (5, 假), “写逻辑字段成功”, “写逻辑字段失败”), 0, )，返回真说明写逻辑字段成功，否则写逻辑字段失败。如图11显示：
图11
货币型字段的写入按照双精度写入即可。
（7）更新记录
字段写入后，我们需要刷新一下显示。
命令及格式：〈逻辑型〉 对象．更新 （）
例句：            信息框 (选择 (记录集1.更新 (), “更新记录成功”, “更新记录失败”), 0, )，返回真说明更新成功，否则更新失败。如图12显示：

版权声明：本站内容均来自互联网，仅供演示用，请勿用于商业和其他非法用途。如果侵犯了您的权益请与我们联系QQ:729038198，我们将在24小时内删除。