连接Oracle的时候失败

Question

vb6的程序连接Oracle数据库
Public OraSession As Object 'ORACLE OLE变量
Public OraDatabase As Object '业务属性数据库（ORACLE8I）
Public OraDynaset As Object '全局记录集变量

Set OraSession = CreateObject("OracleInProcServer.XOraSession")
Set OraDatabase = OraSession.DbOpenDatabase("sbp", "CLAIMOPT/OPTMIALC", 4&)
在DbOpenDatabase的时候报错“ORA-12154:TNS:无法解析指定的连接标识符”
原因是什么？

Answer 1

引自免费微信小程序：皆我百晓生

遇到“ORA-12154:TNS:无法解析指定的连接标识符”的错误，通常意味着Oracle客户端未能正确找到数据库的网络服务名。这可能是由于tnsnames.ora文件配置不正确、网络问题、防火墙阻止或Oracle服务未运行等原因导致的。下面是一些详细的解决步骤：

1. 检查tnsnames.ora文件

确保你的tnsnames.ora文件中包含了正确的服务名条目。这个文件通常位于Oracle客户端的安装目录下的NETWORK\ADMIN目录中。

示例条目：

sbp =
  (DESCRIPTION =
    (ADDRESS = (PROTOCOL = TCP)(HOST = your_host)(PORT = 1521))
    (CONNECT_DATA =
      (SERVER = DEDICATED)
      (SERVICE_NAME = sbp)
    )
  )

替换your_host为你的数据库服务器IP地址或主机名，1521为监听端口，sbp为你尝试连接的服务名。

2. 验证网络连接

确认从客户端机器到数据库服务器的网络连接是通畅的。可以尝试使用ping命令测试网络连通性。

ping your_host

3. 检查监听器状态

确保Oracle数据库监听器正在运行，并且能够接收来自客户端的连接请求。可以在数据库服务器上使用lsnrctl status命令检查监听器状态。

4. 配置环境变量

确保客户端机器上的TNS_ADMIN环境变量指向了包含tnsnames.ora文件的目录。如果没有设置，Oracle会默认查找标准位置。

5. 使用sqlplus测试连接

在命令行下使用sqlplus工具尝试连接数据库，以验证配置是否正确。

sqlplus CLAIMOPT/OPTMIALC@sbp

6. 防火墙和安全软件

检查客户端和服务器上的防火墙设置，确保没有规则阻止TCP/IP连接到1521端口。

7. 更新Oracle客户端

确认Oracle客户端版本与服务器版本兼容，必要时更新或重新安装客户端。

8. 代码示例修正

在VB6代码中，确保提供的连接字符串与tnsnames.ora文件中的服务名一致。

Set OraDatabase = OraSession.DbOpenDatabase("sbp", "CLAIMOPT/OPTMIALC", 4&)

这里假设sbp是tnsnames.ora文件中定义的服务名。

遵循以上步骤应该能解决大部分的连接问题。如果问题仍然存在，可能需要更深入地排查Oracle日志或联系网络管理员获取进一步的帮助。