Delphi 利用 SybaseOleDBProvider 连接 SYBASE 数据库

 

本方法是利用 Sybase PcClient 中自带的 OLEDB 驱动程序实现对 SYBASE 数据库的连接。具体实现步骤如下：

 

一、使用 sydaadm.exe 配置数据源

1. 运行 sydaadm.exe（默认路径：C:/sybase/OLEDB）

 

2. 执行【File】->【New】->【Data Source】

3. 打开新建数据源窗体，并在【Data Source Name】中输入数据源的名称，如MySybase

4. 单击【Set Up Data Source】按钮，打开“Sybase ASE OLE DB Provider SetUp”窗体。

 

序号

项目

填写内容

1

Description

有关数据源色描述，可不填写

2

Server Name

填写服务器名称或者IP地址

3

Database Name

需要连接的数据库名称

4

Network Protocol

默认为“Winsock”，不用修改

5

Server Port or

Name Pipes Address

服务端口号，默认为“5000”，需要与Sybase数据库安装时的一致。

5. 单击【Test Connect】按钮进行连接测试

6. 测试成功返回下面的窗体

7. 单击“Test Connect”窗体的【确定】按钮后会返回到“Sybase ASE OLE DB Provider SetUp”窗体，之后单击【应用】和【确定】按钮返回到“Sybase Configuration Manager”窗体，此时新添加的数据源就出现在“Sybase OLE DB Objects”树状列表框中，窗体中右窗格显示的是选中的数据源的参数列表。至此 Sybase OLE DB 数据源配置完毕，你可以在默认路径（C:/sybase/OLEDB）中看到一个名为“MySybase.ids”的文件，就是刚刚配置的数据源文件（用记事本打开见下图）。 

[Provider]        
ProviderName=Sybase ASE OLE DB Provider        
ClsID={DDACBAD3                 -9F        47-7379-96DA                 -00105A        17E                 92A        }        
 
[Properties]        
Initial Catalog=GY        
Connect Timeout=15        
Server Name=192.168.5.123        
Network Protocol=Winsock        
Server                                   Port                 Address=5000        
Optimize Prepare=Partial        
Select Method=Direct        
Raise Error Behavior=MS Compatible        
Print Statement Behavior=MS Compatible        
Extended ErrorInfo=FALSE        
Stored Proc Row Count=Last Statement Only        
Row Cache Size=50        
Enable Quoted Identifiers=0        
Packet Size=1        
Default Length For Long Data=1024        
UseSybaseLDAP=0        
SybaseServerName=389        
UseLDAPHAServer=0        
Use SSL=0        
EnableSPColumnTypes=True        
TruncateTimeTypeFractions=1

 

二、在Delphi 7 中通过 ADO 连接 Sybase 数据库

1. 设置 ADO 连接字符串，单击【Build】按钮

2. 在【提供程序】选项卡“OLE DB 提供程序”中选择“Sybase ASE OLE DB Procider”后,单击【下一步】按钮

3. 在【连接】选项卡“数据源”中录入刚才设置的数据源名称“MySybase”,“用户名称”中录入登录Sybase数据库的用户名，如sa，选择“选择要使用的初始目录”中需要连接的数据库名称，如GY,单击【测试连接】按钮

4. 连接成功后会显示“测试连接成功”对话框窗体，到此Delphi已经成功连接到Sybase数据库上。