C
chengcheng178
Unregistered / Unconfirmed
GUEST, unregistred user!
用Vb作的软件，连接数据库在写程序的这台机器上运行没有问题,但到了另一台机器就不能运行了,打包安装后提示以下错误
实时错误‘430’类不支持自动或不支持期望的接口
在不能运行的那台机器上，打开作的源程序
Public myconn As ADODB.Connection
Public str_conn As String
Public rds_manager As ADODB.Recordset
Public rds_user As ADODB.Recordset
Public rds_book As ADODB.Recordset
Public rds_jieyue As ADODB.Recordset
Public rds_total As ADODB.Recordset
Public str_sql As String
Public manager_id As String
Sub Main()
str_conn = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="
+ App.Path + "/book.mdb;Persist Security Info=False"
Set myconn = New ADODB.Connection
myconn.Open str_conn
Set rds_manager = New ADODB.Recordset===========在此处就报错了，数据库连接不上,提示类不支持自动或不支持期望的接口,下面 的几行也是这样的错误
Set rds_user = New ADODB.Recordset
Set rds_book = New ADODB.Recordset
Set rds_jieyue = New ADODB.Recordset
main.Show
End Sub
请高手帮助，谢谢！
实时错误‘430’类不支持自动或不支持期望的接口
在不能运行的那台机器上，打开作的源程序
Public myconn As ADODB.Connection
Public str_conn As String
Public rds_manager As ADODB.Recordset
Public rds_user As ADODB.Recordset
Public rds_book As ADODB.Recordset
Public rds_jieyue As ADODB.Recordset
Public rds_total As ADODB.Recordset
Public str_sql As String
Public manager_id As String
Sub Main()
str_conn = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="
+ App.Path + "/book.mdb;Persist Security Info=False"
Set myconn = New ADODB.Connection
myconn.Open str_conn
Set rds_manager = New ADODB.Recordset===========在此处就报错了，数据库连接不上,提示类不支持自动或不支持期望的接口,下面 的几行也是这样的错误
Set rds_user = New ADODB.Recordset
Set rds_book = New ADODB.Recordset
Set rds_jieyue = New ADODB.Recordset
main.Show
End Sub
请高手帮助，谢谢！