第十章节利用ADO开发数据库应用程序.pptVIP

…… List1.Clear 本循环把RS1记录集中的所有字段的字段名添加到列表框List1中 For I = 0 To RS1.Fields.Count - 1 List1.AddItem RS1.Fields(I).Name Next I …… Text1.Text = RS1.Fields(List1.ListIndex).DefinedSize 显示选定字段的DefineSize属性 Text2.Text = RS1.Fields(List1.ListIndex).Type 显示选定字段的Type属性 Text3.Text = RS1.Fields(List1.ListIndex).Value 选定选定字段的Value属性 …… 10.6.1 Error对象的常用属性 10.6.2 Errors对象的常用属性与方法 10.6 Error对象和Errors集合 10.6.1 Error对象的常用属性 1．Description属性 该属性是一个字符串属性，用来获得错误的简要说明。 2．NativeError属性 该属性是一个长整型属性，用来返回给定Error对象的、特定提供者的错误代码。 3．Number属性 该属性是一个长整型属性，使用它可确定发生的错误类型，该属性的值是与错误条件对应的唯一数字。 4．Source属性 该属性是一个字符串属性，用来确定产生错误的原始对象或应用程序的名称。该名称可以是对象的类名或编程ID。对于ADODB的错误，属性值将是ADODB.ObjectName，ObjectName是触发错误的对象名称。只读。 5．SQLState属性 该属性是一个字符串属性，用来指示给定Error对象的SQL状态。当提供者在处理SQL语句过程中出现错误时，使用该属性可返回5个字符的错误代码。 10.6.2 Errors对象的常用属性与方法 　　Errors对象是从属于某个Connection对象的集合对象，它的成员是Error对象，可通过Errors对象的Count属性返回它所包含的Error对象的个数。 　　Errors对象的方法有两个，分别是Item和Clear，Item方法的格式和功能基本同Fields集合的Item方法。Clear方法的作用是清除Errors集合中的Error对象。Clear方法的使用格式如下： Errors.Clear 　　其中，Errors是集合对象名。 10.7 ADO对象综合应用例 【例10-3】编写一个对CollegeMIS数据库中的Student表进行浏览和维护的程序，程序的设计界面如图10-9所示，程序的运行界面如图10-10所示。“首记录”、“前移”、“后移”、“末记录”、“删除”、“添加”、“修改”、“确定”、“取消”按钮的作用与例9-5中对应按钮的功能一样。程序运行时，在“修改”记录或“添加”记录的状态下，可以通过“照片”文本框后面的“…”按钮来打开一个对话框，选择图像文件作为当前学生的照片；单击“退出”按钮将关闭、释放连接和记录集对象并结束应用程序。 实现要求如下： （1）只有在添加记录和修改记录时，才能通过界面上的控件输入内容； （2）执行相应操作时，按钮的状态要发生变化。如记录指针移到了首记录，“首记录”和“前移”按钮不能使用；单击“添加”按钮后，所有的移动按钮、“删除”按钮、“添加”和“修改”按钮均不可用等等； （3）使用ADO对象编程实现。 实现思路（要完成本题的任务，需解决以下几个关键点）： （1）当前记录的显示与当前记录的修改。由于每当记录指针发生了移动，均需用当前记录的内容更新界面上的控件，因此可把当前记录的显示编写成一个过程，在需要时调用即可。在该过程中只需依次把记录集的各Field对象的值显示在界面的各控件中即可。“添加”记录和“修改”记录均需根据界面上控件的值更新当前记录，因此可把对当前记录的更新也编写成一个过程，在需要时调用即可。在该过程中只需依次把界面上控件的内容赋值给记录集的各Field对象即可。 （2）由于所有的功能按钮操作的记录集都是同一个记录集，故记录集变量应该是模块级的。 实现思路（要完成本题的任务，需解决以下几个关键点）： （3）照片的显示和保存。照片是一个二进制字段，这就涉及到二进制字段的存取。可利用Field对象的AppendChunk和GetChunk方法来实现二进制字段的存取。将二进制文件存入二进制字段的方法是先将二进制文件打开，读取里面的数据，再使用AppendChunk方法将读出的数据存入数据库的二进制字段。读出数据的时候，使用GetChunk将数据