Activex DLL抛出错误“Object Required”

时间:2014-01-30 20:27:50

标签: dll vb6

我的vb6 exe正在调用一个Active-x dll(在COM +中注册),但是当dll尝试调用一个读取SQL db的方法时,会出现“需要对象”错误。

我的exe代码是:

Set oBulkRework = New apBulkRework.BulkRework
sReturnCode = oBulkRework.BulkRework(sProductID, iQty, sUID)
Set oBulkRework = Nothing

我的DLL代码是:

    public Function BulkRework(ByVal psProductID As String, _
                         ByVal piQty As Long, _
                         ByVal psUID As String) As String

    Dim oReceipt As dbReceipt.Receipt
    Dim oRS_Receipt As ADODB.Recordset
    Set oReceipt = GetObjectContext.CreateInstance("dbReceipt.Receipt")
 ==> Set oRS_Receipt = oReceipt.SearchForRework(psProductID,piQty,psUID)

    Set oReceipt = Nothing

dbReceipt ddl执行sql execute来选择记录集合。

该程序在“==>”行崩溃。

如果我从开发环境运行它,我会得到Err.Description =“Object Required”,Err.Number = -2147164123。

如果我运行exe,我得到:   Err.Descriptn =“类不支持自动化或不支持预期的接口”

Err.Number = 430

我错过了什么?感谢您的帮助。

0 个答案:

没有答案