医药数据库第5章.pptxVIP

第五章;随着信息技术和网络化技术的迅猛发展，数据库及数据库技术在各个领域中得到了广泛应用。对于医药领域来说，医药电子商务、医院信息系统（hospital information system，HIS)药品企业管理系统、医药信息检索、药物辅助分析与设计、医药决策支持系统等就是数据库及数据库技术应用的典型示例。医院信息系统是数据库在医药领域中最普及应用的例子，它是计算机技术对医院管理、临床医学及信息管理长期影响、渗透以及相互结合的产物。医院信息系统为医院所属各部门提供病人诊疗信息和行政管理等信息，并尽量满足所有授权用户的功能需求，已成为医院科学管理和提高医疗服务水平的重要手段。;5.1 Visual Basic 数据库访问技术概述;DAO 是一种面向对象的界面接口，通过DAO/Jet功能可以访问ISAM(indexed sequential access methed）数据库，使用DAO/ODBC Direct功能可以实现远程RDO (远程数据对象）功能。RDO 为使用代码创建和操作一个远程ODBC数据库系统的各个部件提供了一个框架，是ODBC API的一个浅层界面接口，专为访问远程ODBC关系数据源而设计。ADO 是DAO/RDO的后继产物，它扩展了 DAO和RDO所使用的对象模型，这意味着它包含较少的对象、更多的属性、方法（和参数）以及事件。 ;;通常，ADO Data控件并不出现在VB的工具箱中。要想使用ADO Data控件，首先应按下面的步骤将ADO Data控件添加到工具箱中：运行VB后，选择“工程”丨“部件”菜单，并在“部件”对话框中选择Microsoft ADO Data Control 6.0 (OLE DB),如图所示 ;1.ADO Data控件与数据库操作相关的属性 ;ConnectionString属性设置：;(2) RecordSource 属性 RecordSource属性设置要连接的表或SQL查询语句。可以在“属性”窗口中将RecordSource属性设置为指定数据库的一个表。这里的设置必需与CommandType属性配合使用，即首先在弹出的RecordSource属性页中将命令类型设置为2-adCmdTable，然后在“表或存储过程名称”中选择表。 RecordSource确定具体可访问的数据，这些数据构成记录集对象Recordset。该属性值可以是数据库中的单个表名、一个存储查询，也可以是使用SQL查询语言的一个查询字符串。 ;(3) CommandType 属性 CommandType属性用于指定RecordSource属性的取值类型。可直接在“属性’’窗口中CommandType属性框右边的下拉列表中选择需要的类型，其取值如下： ? adCmdUnknown默认值。CommandText属性中的命令类型未知。 ? adCmdTable将CommandText作为其列全部由内部生成的SQL查询返回表格的名 称进行计算。 ? adCmdText将CommandText作为命令或存储过程调用的文本进行计算。 ? adCmdStoredProc将CommandText作为存储过程名进行计算。 (4) ConnectionTimeout 属性 该属性设置等待建立一个连接的时间，以秒为单位。若连接超时，则返回一个错误。 ;2. ADO控件的常用事件 (1)WillMove 和 MoveComplete 事件 WillMove事件在当前记录的位置即将发生变化时触发， 如使用ADO Data控件上的按钮移动记录位置时。MoveComplete事件在位置改变完成时触发。 (2)WillChangeField 和 FieldChangeComplete 事件 WillChangeField事件是当记录集中当前记录的一个或多个字段发生变化时触发，而FieldChangeComplete事件则是当字段的值发生变化后触发。 (3)WillChangeRecord 和 RecordChangeComplete 事件 WillChangeRecord事件是当记录集中的一个或多个记录发 生变化前触发，而RecordChangeComplete事件则是当记录发生变化后触发。 ;3. ADO控件的常用方法 (1) Refresh 方法 在ADO Data控件打开或 重新打开数据库的内容时，该方法可以更新ADO Data控件的数据设置，使ADO Data控件能够及时反映数据库改变后的数据情况。 ;(3)AddNew 方法 该方法用于在ADO Data控件的记录集中添加一条新记录，其使用语法如下: Adodcl.Recordset.AddNew 其中，Adodcl是一个ADO D