VB与oracle数据库连接问题，在线等

Question

我做了一个程序，其中有连接ORACLE数据库的部分，在同一台机器同一条件下用源代码连接正常，但生成执行方式之后什么都没有变的情况下就连不上数据库了，请各位帮忙分析下是什么原因？
这是连接数据库部分的代码 
DLYHM = "USER ID=" + LSDLYHM 
DLMM = "password=" + LSDLMM 
DLSLM = "Data Source=" + LSDLSLM 
LSsjk = DLYHM + ";" + DLMM + ";" + DLSLM 
LSsjk = "Provider=OraOLEDB.Oracle.1;Persist Security Info=False;" + LSsjk     Set LJSJK_SA = New ADODB.Connection 
    LJSJK_SA.Open LSsjk 
在同机上生成EXE之后就连接不上数据库了

Answer 1

我做了ERR的错误判断，正常时的值是0,连接不上数据库时的值是-2147467259

Answer 2

可能是你的
DLYHM = "USER ID=" + LSDLYHM
DLMM = "password=" + LSDLMM
DLSLM = "Data Source=" + LSDLSLM 
没取到。
也可能是你开了防火墙。