(1)在客户机上调用Oracle 9i客户机的【网络配置助手】(Net Configuration Assistant)配置一个能够连接数据库服务器的【本地网络服务名称】,笔者配置的名称为myoraclelink。这个名称是可以任意取的。 (2)在客户机的【控制面板】/【32位ODBC】中创建一个系统数据源名称,这个名称必须是graduateDB。当然假如读者要采用自己的名称,可以在VB程序的模块MODULE1中进行适当的修改。修改的代码如下。 ――――――――――――――――――――――――――――――――――――― ‘定义了名为ConnectString的无参数函数,连接数据库 Public Function ConnectString() As String ConnectString = "DSN=graduateDB;UID=graduateuser;PWD=12345678" End Function ―――――――――――――――――――――――――――――――――――――