为什么报 "ActiveX 不能创建" ?
源码:
dim WS As rdoEnvironment
dim DB As New rdoConnection
Set WS = rdoEngine.rdoEnvironments(0)
Set DBEvents = DB
Connect_Str = "DSN=meter;UID=meter;PWD=meter;Database=meter;" 'ODBC接口
' MsgBox Connect_Str
With DB
.Connect = Connect_Str
.LoginTimeout = 20
.QueryTimeout = 15
.EstablishConnection rdDriverNoPrompt, False
End With
问题:
在开发机上没有问题,但是在有的机器上报"ActiveX 不能创建",数据库连接不上,装上 office 或 VB又行了.
我打包已经把 Rdo20chs.dll打进去了?