| MSDAORA.1是MicrosoftOLEDBproviderforOracle的连接，也可运用其他的方式，UserID=systemPassword=sa分别是服务端Oracle数据库的用户名和密码，HOST=202.198.128.100是服务器端的IP地址，PORT=1521是默认的端口号，SERVICE_NAME=Vibratio是服务器数据库服务的名字，rs.Open'select*fromTest',conn中的Test是本例Oracle数据库名为VIBRATION的数据库中建立的表。
3.3添加客户端库文件及环境变量
1、由于无需安装Oracle数据库的客户端，只需要需要在客户端的计算机上添加动态连接库文件。在Oracle下载一个InstantClientPackage的软件，即
instantclient-basic-win32-10.1.0.5-20060419中的文件解压到指定位置，本文解压的位置为C:OracleInstantClient。classes12.jar、oci.dll、ocijdbc10.dll、ociw32.dll、ojdbc14.jar、orannzsbb10.dll、oraocci10.dll、oraociei10.dll以上8个文件为instantclient-basic-win32-10.1.0.5-20060419中的库文件，然后再在作为客户端的计算机上的C:OracleInstantClient建立下一级文件夹 etworkadmin，在其中添加远程监听文件tnsnames.ora，该程序可以Oracle服务器的安装目录Oracleproduct.1.0Db_1admin文件夹中找到，其内容如下：
VIBRATIO=
(DESCRIPTION=
(ADDRESS_LIST=
(ADDRESS=(PROTOCOL=TCP)(HOST=202.198.128.100)(PORT=1521))
)
(CONNECT_DATA=
(SERVICE_NAME=VIBRATIO)
)
)
2、在客户端的环境变量路径path中加入C:OracleInstantClient，在作为客户端的计算机上安装VisualBasic自带的打包文件，运行打包程序后显示的结果就是服务器端的Oracle数据库中的表Test的内容，如图3（Fig.3）所示。
图3客户端软件设计结果
Fig.3ResultofClientSoftwaredesign
3、本文中的程序在以下环境运行通过：
服务器：WindowsXP服务器，Oracle10g数据库
客户端：WindowsXP，VisualBasic6.0，Oracle10g客户端组件
结束语
ADO数据对象进行数据库访问，速度快、功能强大。VisualBasic环境下无客户端对Oracle数据库进行访问，减少了安装客户端的麻烦，运用本文提出的方法就可以实现无Oracle客户端访问Oracle数据库，此方法操作简单，运行可靠性高。
参考文献
1 张盛华. VB基于ADO访问ORACLE数据库的策略[J]. 电脑知识与技术. 数据库与信息管理. 2005,(36): 44-47.
2 NICK SNOWDON. Oracle与Visual Basic 编程指南[M]. 魏东,魏民,邢雷等,译. 北京:电子工业出版社, 2000:265-266.
3 黄保和,李更名. Visual Basic程序设计与数据库应用[M]. 厦门大学出版社. 2009:240-242.
4 胡小江. 21天学通Visual Basic[M]. 北京:电子工业出版社. 2009:345-357.
5 邵回祖. VB下利用ADO技术访问Oracle数据库[J].电力学报. 2003,(4):257-259.
6 马栎. 在Visual Basic中实现与Oracle数据库的多种访问方式[J]. 计算机时代. 2004,(7):39-40. 3/3 首页 上一页 1 2 3 |
