使用ADO访问达梦数库.docVIP

使用ADO访问达梦数据库 　　微软的Windows操作系统是当前应用程序的主流开发和使用平台，它提供了数种不同的数据访问存储技术，比较常见的有以下几种： 　　ODBC　　它只能通过以C/C++语言API的形式提供数据库服务。 　　OLE-DB　　为了从各种不同的数据源中存取数据，并且能够处理非关系数据；同时为了使应用程序能够以统一的方式存取各种不同的数据源，微软推出了OLE-DB。OLE-DB定义了统一的COM接口作为存取各类数据源的标准，并且统一封装在一组COM对象之中。 　　ADO　　由于OLE-DB太过于底层，很难被大部分程序员接受，同时为了让脚本语言也能使用OLE-DB存取各种数据源，微软又用COM技术将OLE-DB封装为ADO对象。 　　ADO的架构 　　大家可以看出ADO可以通过OLE-DB直接访问数据源，也可以通过OLE-DB转ODBC的方式来访问数据源，但除了为了兼容原有应用系统，否则我们推荐通过OLE-DB直接访问数据源的方式。　　DM 数据库对外提供了标准的OLE-DB和ODBC接口，所以我们可以在开发程序时任意使用ADO的两种方式（通过ODBC和通过OLE-DB）来访问达梦数据库。　　虽然现在微软又推出了新一代的ADO.NET数据访问对象，但目前还是有很多程序员在windows下进行数据库应用程序开发时使用ADO；Delphi是一种快速的RAD开发工具，并且提供了一组优秀的ADO组件；所以本文介绍一个在Delphi 7.0 下使用ADO访问达梦数据库的小程序实例。　　首先，在Delphi中设定如下程序界面： 　　ADO对象实际上就是COM对象，程序员可以直接在ObjectPascal中调用CreateOleObject方法来建立原生ADO对象；Delphi同时也提供的ADO组件封装了原生ADO对象，ADO组件包含了ADOConnection , ADOCommand , ADODataSet , ADOTable , ADOQuery , ADOStoreProc这几个组件，这五个组件统称为数据集组件，他们都封装了原生ADO的Record对象，我们在程序中使用了TADODataSet，TDataSource和TADOStoredProc三个控件，同时在程序运行时动态创建和使用了TADOConnection，TADOQuery对象。 　　下面这个演示程序可以管理数据库里的人员信息(包括TimeStamp,text,blob类型的数据)，同时可以添加和修改人员对应的相片； 　　首先使用SYSDBA登录达梦数据库的JISQL工具，执行下面的数据库脚本： 　　CREATE TABLE People_Info 　　（　　p_id ????? ?int primary key, 　　　　p_name varchar(20), 　　　　p_age? int, 　　　　p_addr varchar(200), 　　　　p_des??? text, 　　　　p_pic????? blob, 　　　　p_born timestamp　） 　　CREATE SEQUENCE SEQ_PEOPLE INCREMENT BY 1 START WITH 1; 　　CREATE OR REPLACE PROCEDURE DEL_PINFO(v_id in int) AS 　　BEGIN 　　DELETE FROM People_Info WHERE p_id = v_id; 　　END; 　　程序在运行时会动态的创建一个TADOConnect对象，效果和在设计程序时 　　拖入一个TADOConnection组件是一样的，代码如下： 　　constructor TFormADO.Create(AOwner: TComponent); 　　begin 　　inherited Create(AOwner); 　　try//数据库的连接字符串 　　Constr := Provider=DMOLEDB.1;Password=SYSDBA;LoginPrompt=false;+ 　　User ID=SYSDBA;Initial Catalog=SYSTEM;Data Source=Localhost; 　　adocon := TADOConnection.Create(self); 　　adocon.ConnectionString := Constr; 　　adocon.Connected := true; 　　ADODataSetPInfo.Connection := adocon; 　　ADODataSetPInfo.Active := true; 　　excep