关于引用ADO的问题

[xd521]

本工程：
一个form
一个module
引用了ADO2.1

form里有部分代码：
Dim Cn As New ADODB.Connection
Dim RS As New ADODB.Recordset

module里面有部分代码
Public Conn As New ADODB.Connection
Public RsQ As New ADODB.Recordset
Public RsP As New ADODB.Recordset
Public RsL As New ADODB.Recordset
Public RsY As New ADODB.Recordset

用VB调试运行，不报错
生成exe文件后，运行报错，
错误是连接数据库出错
报错的是Conn

解释：
为什么要这样写呢？
因为一开始只有我的部分程序
是放在form里，连接数据库的，
一直没问题
但是后来，同事的程序也要放进来
但是怕变量定义有重复
把他的那部分代码放在一个模块里
他原来的程序是放在一个class里的
直接考出来的，放在我的module里的
这是为什么呢

主要问题：
为什么调试可以运行
生成exe文件后，运行报错呢？

请教！！
谢谢！！

[高高兴兴的晶晶]

再具体点,

贴代码

• 打赏
• 举报

回复 赞

[forever_chang]

使用什么数据库？
引用一个高版本的ADO试试

• 打赏
• 举报

回复 赞

[xd521]

ORACLE9i

代码太多了

• 打赏
• 举报

回复 赞

[xd521]

运行时错误'-2147217843(80040e4d)':
[Oracle][ODBC][Ora]ORA-12154:TNS:无法处理服务名

• 打赏
• 举报

回复 赞

[SuperZhou]

用MDAC 2.8试试
用的提供者是Microsoft OLE DB Provider For Oracle吗

• 打赏
• 举报

回复 赞

[zhangzhijian]

conStr = "Provider=Microsoft.Jet.OLEDB.3.51;Data Source=" & strDBLocal & ";Persist Security Info=False"

• 打赏
• 举报

回复 赞