VB6.0工程运行问题

Question

VB项目在工程里面直接运行没问题，但编译成exe后出错，错误430：类不支持自动化或不支持希望的接口。这是怎么回事？

Answer 1

1，做个安装包，安装后再运行软件
2，如果是数据库应用，则安装mdac2.8mdactyp.exe

Answer 2

在对下列这个函数过程进行引用时出现错误：
Private Function IDValidate(ByVal ORcpuID As String, ByVal ORnetcardMac As String) As ReturnInfo '计算机身份验证
    On Error GoTo Proc_Err
    Dim objcomputeridentityCls As New computeridentityCls
    Dim Rs
    
    '计算机身份验证
    Set Rs = objcomputeridentityCls.F_identityValidation(ORcpuID, ORnetcardMac)
    If Rs Is Nothing Then
        IDValidate = ReturnFail
    ElseIf Rs.RecordCount = 0 Then
        IDValidate = ReturnHasnt
    ElseIf VarType(Rs("许可")) < 2 Then
        MsgBox "本计算机已经申请,管理员尚未授权,请与管理员联系,系统即将关闭!"
        IDValidate = ReturnNo
    ElseIf Trim(Rs("许可")) = "否" Then
        MsgBox Trim(Rs("许可说明"))
        IDValidate = ReturnFalse
    ElseIf Trim(Rs("许可")) = "是" Then
        IDValidate = ReturnTrue
    End If
    Set Rs = Nothing
    Set objcomputeridentityCls = Nothing
    Exit Function
    
Proc_Err:
    Set Rs = Nothing
    Set objcomputeridentityCls = Nothing
    IDValidate = ReturnFail
    Call mdlCommon_showError("mdlStart", "Private Function IDValidate(ByVal ORcpuID As String, ByVal ORnetcardMac As String)", _
        Err.Number, Err.Description, GC_StrPleaseRepeat)
End Function

Answer 3

我看了一下，问题就出在Set Rs = objcomputeridentityCls.F_identityValidation(ORcpuID, ORnetcardMac) 这一句上，objcomputeridentityCls是创建的类的一个实例，F_identityValidation是该类的一个方法，但以前编译后从来没出现这种情况

Answer 4

在生成exe后，在本机上运行exe出现这种情况，在工程中运行没问题

Answer 5

我发现这个问题很怪，重新生成工程组，再运行exe就没问题，但是打包后，安装后再运行又出现这个问题，真是没办法？

Answer 6

mdactyp2.8.exe 安装出现错误，好象是说所有功能已经存在