Automation error---[RESOLVED]

[mik706]

I am trying to call a procedure in a dll i have created, there are no errors i can see in the code but at runtime the error:

Runtime error '-2147024770 (8007007e)'
Automation error
The specified module could not be found.

is generated. WHY?

APP Code:

Private WithEvents mobjThread As ThreadProxy.DataSearches
 
Private Sub cmdNew_Click()
    Dim DBPath As String
    
'On Error GoTo ErrHandler
    
    DBPath = "test"
    
    mobjThread.NewSearch DBPath, 1, True, 20, True
 
    Exit Sub
'ErrHandler:
'    MsgBox "Error"
End Sub

Dll Code:

Public Sub NewSearch(ByVal sDBPath As String, ByVal sInt1 As Integer, ByVal sBool1 As Boolean, ByVal sInt2 As Integer, ByVal sBool2 As Boolean)
 'do stuff
End Sub