ODBC(Open Database Connectivity,开放式数据库互连)是一种应用程序接口 (API) 规范。它定义了一个标准例程集,使用它们应用程序可访问数据源中的数据。应用程序通过引用 API 的函数可以直接使用 ODBC,或利用数据访问对象 (DAO) 或远程数据对象 (RDO) 来使用ODBC。但是,在实现ODBC时,我们必须首先配置ODBC环境,进行数据源的注册,这样才能在对数据库进行编程时,对数据源进行连接、访问和操作。本文介绍几种常用的注册ODBC数据源的方法。
手工配置
1.ODBC数据源管理器
在进行数据库开发时,为了达到配置ODBC,进行DSN定义注册的目的,微软给出了一个手工操作的解决方法。在Windows 9X操作系统的控制面板中,有一个名为“ODBC数据源(32位)”的图标,可以通过它激活专门为用户设置ODBC环境的程序(ODBC Data Source Administrator,ODBC数据源管理器)。在Windows 2000操作系统中,上述图标被放置在控制面板的“管理工具”里面。
这个用于设置ODBC环境的程序叫做桌面驱动程序,它支持数种DBMS(Database Management System,数据库管理系统)。当用户想增加一个数据源和一个所需要的驱动程序时,可以通过ODBC数据源管理器的配置对话框配置特定类型的数据库。大多数情况下,在编写对数据库操作的程序时,我们至少需要知道诸如数据库文件名、系统(本地或远程)、文件夹等信息,同时要给数据源命名。
2.定义数据源的类型
用户可以定义以下三种类型的数据源:
用户数据源:作为位于计算机本地的用户数据源而创建的,并且只能被创建这个数据源的用户所使用;
系统数据源:作为属于计算机或系统而不是特定用户的系统数据源而创建的,用户必须有访问权才能使用;
文件数据源:指定到文件中作为文件数据源而定义的,任何已经正确地安装了驱动程序的用户皆可以使用这种数据源。
3.数据源注册的步骤
以Microsoft Access为例,如果在C:\myfile\文件夹里创建了一个名为myexample.mdb的数据库文件,其注册步骤如下:
在控制面板里找到“ODBC数据源”图标,打开数据源管理器的交互界面;
笔者创建的数据库文件是供本机上的用户使用的,所以这里选择“用户 DSN”;
然后按下“添加”按钮,在弹出的数据源管理器对话框里,为自己所要创建的数据源选择一个驱动程序,本文的数据库文件是用Microsoft Access创建的,所以要选择“Microsoft Access Driver (*.mdb)”;
按“完成”按钮后,进入一个标题为“ODBC Microsoft Access 安装”的界面,在其中设置“数据源名”为“mydatasource”,选取数据库文件 “C:\myfile\myexample.mdb”,然后确定即可。
这样我们就完成了一个简单的ODBC数据源的注册。当然,在以上的步骤中,用户可以根据自己的不同需要,设置不同的选项。
注册结束后,我们便可以在对数据库的编程中,操作该数据库了。
在VB中注册数据源
在VB中对数据库进行编程时,可以利用RegisterDataSource方法为ODBC数据源输入连接信息到 Windows 注册表中。它的语法是:
RegisterDataSource DSN, driver, silent, attributes
其中参数代表的含义分别为:
DSN:字符串表达式,它是在引用数据源描述信息块时所使用的名字。例如,如果数据源是一个ODBC远程数据库,这就是服务器的名字;如果是用户DSN,则是注册的数据源的名字。
drive:字符串表达式,表示ODBC驱动程序的名称。它并不是 ODBC 驱动程序动态连接库 (DLL) 文件名。例如,SQL Server 是驱动程序名,而 SQLSRVR.DLL 是 DLL 文件名。必须安装ODBC 及相应的驱动程序。
silent:布尔类型值,如果不想显示 ODBC 驱动程序对话框,用以提示指定驱动程序的信息,该值就为 True;如果希望显示 ODBC 驱动程序对话框,该值就为 False。如果 silent 为 True,那么attributes必须包含所有必需的指定驱动程序的信息。
attributes:字符串表达式,它是一个要添加到 ODBC.INI 文件中的关键字列表。编写程序时,可以根据需要选择若干attributes的参数进行设置。
例如:我们可以编写如下的VB程序,达到与上面手工注册一样的目的。程序清单如下:
Sub RegisterDataSource()
Dim strAttribs As String
’建造关键字字符串。
’C:\myfile\myexample.l.mdb数据库文件名(包含路径)
strAttribs =“DBQ=” _
& “C:\myfile\myexample.mdb” _
& Chr$(13) & “OemToAnsi=No” _
& Chr$(13) & “SERVER=SEQUEL” _
& Chr$(13) & “Network=DBNMPNTW” _
& Chr$(13) & “Database=WorkDB”_
& Chr$(13) &“Address=\ EQUEL\PIPE QL\QUERY”
’建立新的注册的 DSN。
rdoEngine.rdoRegisterDataSource “mydatasource”,
“Microsoft Access Driver (*.mdb)”, True,
strAttribs
End Sub
Private Sub Form_Load()
Call rdoRegisterDataSource
End Sub
注意:为了在代码中使用rdoEngine和远程数据对象,必须先在“引用"对话框中设置一个到 Microsoft Remote Data Object 2.0 对象库的引用,否则在第一次引用rdoEngine 对象时会导致编译错误。
利用注册表合并
1.解决思路
考查ODBC数据源注册后对Windows注册表的修改情况,我们可以发现所注册的数据源对Windows注册表的影响关键集中在[HKEY_CURRENT_USER oftware\ODBC\ODBC.INI]里。
这样,我们导出[HKEY_CURRENT_USER oftware\ODBC\ODBC.INI],每次以之为模板,把所要注册的数据源信息加入到注册表导出文件的对应位置,然后再将该文件与系统注册表合并即可。
2.具体操作
首先,我们要弄清楚Regedit 及其参数的含义。Regedit是打开系统注册表的命令。在“开始\运行\”中输入即可。它的三个参数含义如下:
Regedit /e myfile.reg :表示把注册表文件导出到myfile.reg 文件中,相当于复制整个注册表文件到myfile.reg中;
Regedit /c myfile.reg:表示把myfile.reg导入注册表,相当于用该文件的内容覆盖了注册表的内容;
Regedit /s myfile.reg :表示把myfile.reg文件的内容与注册表文件的内容进行合并。
我们只需在注册表中将有用的部分导出,而后将所要注册的数据源的信息加入,再与系统注册表合并就可以了。这个合并的过程,我们既可以手工输入来实现,也可以通过编程实现自动合并。
注意:为了防止误操作,一定要将系统注册表作一次备份。
小 结
从安全的角度考虑,笔者首推利用在Windows控制面板中的ODBC数据源管理工具来进行数据源注册,以免因对注册表的不熟或疏忽造成不必要的损失。当然,还有一些应用工具,可以实现对ODBC数据源的注册,用户可以根据不同的需求选择使用。
ODBC是微软于1993年推出的开放性数据库接口标准,它为不同数据库产品的访问和操作提供了一个统一的解决方案。作为一个开放标准,Windows平台下的许多数据库开发工具都支持通过ODBC方式来存取数据,如:Visual C++,PowerBuiler等。其它,如Borland的delphi虽然通过BDE(Borland Database Engine)方式来访问数据,但ODBC配置的数据源,在BDE中也可以正确识别和使用。
一般,ODBC数据源的配置是通过Windows控制面板中ODBC管理器手工设置完成的,这一点给程序安装人员和用户都带来了许多不便。对用户来说,程序安装应该越简单越好。因此,对程序就提出了能够根据安装环境,自动注册所需ODBC数据源的要求。虽然,关于动态注册ODBC数据源的实现方法已屡见不鲜,但大多只适用于某种确定的开发工具和环境,且实现复杂,操作不便。经笔者试验,找到了一条简单有效而通用的配置ODBC数据源的方法。
实现原理: 通过导出开发环境下注册表中ODBC数据源信息到一注册表文件中,将所导出内容作为应用程序中的字符串常量进行保存。在程序运行时,如果发现ODBC数据源未正确注册,则根据环境信息和该字符串常量动态确定正确的注册表文件内容,并写入一临时注册表文件中;利用批处理文件将该文件中ODBC数据源信息导入系统注册表中,从而实现ODBC数据源的动态注册。
二、操作步骤
1.运行注册表编辑器程序(Regedit.exe)。
2.导出注册表中\HKEY_CURRENT_USER\Software\ODBC\ODBC.INI\ODBC Data Sources下数据源名称信息到Reg1.reg文件中。注:该路径下存放的是用户定义的数据源信息,如果需要系统数据源信息,则可导出HKEY_Local_Machine\Software\ODBC.INI\ODBC Data Sources到注册文件中。
3.导出要注册的数据源名称的具体连接参数信息到db2.reg中。在此,以导出名称为“PostMdb”的数据为例,具体路径: \HKEY_CURRENT_USER\Software\ODBC\ODBC.INI\PostMdb。
4.用文本编辑器如(NotePad.exe)打开上述db1.reg文件,保留数据源名称为PostMdb的行;并将db2.reg文件内容与当前db1.reg内容合并。假设修改后“PostMdb”数据源注册信息如下:
REGEDIT4
[HKEY_CURRENT_USER\Software\ODBC\ODBC.INI\ODBC Data Sources]
″PostMdb″=″Microsoft Access Driver (*.mdb)″
[HKEY_CURRENT_USER\Software\ODBC\ODBC.INI\PostMdb]
″Driver″=″C:\\WINDOWS\\SYSTEM\\ODBCJT32.DLL″
″DBQ″=″c:\\My Documents\\db1.mdb″
″Description″=″Post Card Mis Database″
″DriverId″=dword:00000019
″FIL″=″MS Access;″
″SafeTransactions″=dword:00000000
″UID″=″″
[HKEY_CURRENT_USER\Software\ODBC\ODBC.INI\PostMdb\Engines]
[HKEY_CURRENT_USER\Software\ODBC\ODBC.INI\PostMdb\Engines\Jet]
″ImplicitCommitSync″=″″
″MaxBufferSize″=dword:00000800
″PageTimeout″=dword:00000005
″Threads″=dword:00000003
″UserCommitSync″=″Yes″
5.动态注册ODBC数据源的实现
从上述注册信息可以看出,对于特定的数据源来说,实际上要动态确定的只是“Driver”和“DBQ”两项内容。将“Driver”=“C:\\WINDOWS\\SYSTEM\\ODBCJT32.DLL”修改为“Driver”=“%s\\ODBCJT32.DLL”,将“DBQ”=“c:\\My Documents\\db1.mdb”修改为“DBQ”=“%s\\db1.mdb”。复制修改后的注册信息到程序单元中存储为一字符串常量,命名为OdbcStr。以下以delphi为例说明实现方法。
为便于说明,假设主窗体名称为Form1,通过一命令钮Button1注册ODBC数据源。具体根据读者需要自行设定。
procedure TForm1.Button1Click(Sender: TObject);
var
I :Integer;
J :double;
RegF :TextFile;
SysDir: PChar;
AppPath, Params, Path, DbPath: string;
begin
try
//生成注册用的批处理文件
Params := ′Regedit/s tmp.reg′; //批处理文件内容
AppPath := ExtractFilePath(Application.ExeName); //取得应用程序当前路径
AssignFile(RegF, AppPath + ′Reg.Bat′); //指定批处理文件路径和名称
ReWrite(RegF); //创建和打开指定的文本文件
WriteLn(RegF, Params); //将注册命令批处理内容写入文件
CloseFile(RegF);
//生成注册表文件
GetMem(SysDir, 255);
GetSystemDirectory(SysDir, 255); //取得Windows系统目录
Path := String(SysDir);
Path := InsertSplash(Path); //将类似C:\WINDOWS\SYSTEM变为C:\\WINDOWS\\SYSTEM
Delete(AppPath, Length(AppPath), 1); //将字符串尾部′\′字符删除
DbPath := InsertSplash(AppPath); //取得数据库存放路径
Params := Format(OdbcStr, [Path, DbPath]);
AssignFile(RegF, AppPath + ′Tmp.Reg′);
ReWrite(RegF);
WriteLn(RegF, Params);
CloseFile(RegF);
//通过Api函数执行reg.bat, Uses中加入对ShellApi的引用
If ShellExeCute(Application.Handle, ′Open′,′Reg.bat′, ′′, PChar(AppPath), SW_HIDE) <= 32
then
Showmessage(′导入注册表文件信息失败′);
finally
FreeMem(SysDir);
end;
end;
上述代码调用了一字符串处理函数InsertSplash,用于将路径字符串中所有的′\′处理为′\\′;这样做是必需的,否则,上述注册信息DRIVER和DBQ项无法正确注册。InsertSplash函数代码如下:
function InsertSplash(AStr: string): string; //需要在单元公有部分进行函数声明
var
I : Integer;
begin
For I := 1 to Length(AStr) do
case AStr[I] = ′\′ of
True : Result := Result + ′\\′;
False: Result := Result + AStr[I];
end;
end;
三、结束语
通过上述操作可以看出,实现ODBC数据源的动态注册并没有通过delphi特有的功能去完成,而只是通过文件读写功能,根据具体安装环境,生成ODBC数据源注册信息和批处理文件,以完成ODBC数据源的注册。这种实现方法不依赖于某种特定的开发工具,不需要通过手工进行ODBC数据源的配置,具有通用性强和操作简单的特点。而且,用上述同样的方法,读者也可编写能够注册其它类型数据源的程序,甚至,写成ODBC注册动态连接库,以利于程序复用。
文章评论(0条评论)
登录后参与讨论