I am trying to use a function from a DLL made in VB6. I use this code to call the function.

ISXSSDLRFQ = DLL project name
Engine = Class name

Code:
sSetObj = "ISXSSDLRFQ.Engine"
Set objEngine = Server.CreateObject(CStr(sSetObj))

sUID = DecryptText(sUID, sAcct)
sPWD = DecryptText(sPWD, sAcct)

if objEngine.CheckLogin(CStr(sAcct), CStr(sUID), CStr(sPWD), CStr(sSetDSN), CStr(sSetUID), CStr(sSetPWD), CStr(sSetSchema))  then
  sResult = EncryptText(sSess,sAcct)
  sResult = "1"
else
  sResult = "-1"
end if
My problem is that I'm getting this error. I'm really stuck on this one. any help would be much appreciated.

Code:
ISXSSDLRFQ (0x800A004C)
Path not found
/rfqloader/QTLoginRequest.asp, line 17