CodeButcher

I am building an ASP on a server. I need to call a cobol DLL to process entered data and return the results to the page.

The ASP succeeds in calling the VB wrapper, but the wrapper returns

WrapEXINCOR error '800a0035'
File not found: Kypos\EXINCOR.DLL

Kypos is a virtual directory with an actual full path name of C:\KYPOS

The DLL is there, and the ISS permissions are set such that web applications should be able to execute them (unless I have missed something)

I am using VB6(SP5)

Here is the code from my cls form.

Private Declare Sub JMPCINT2 Lib "f3biprct.dll" ()
Private Declare Sub JMPCINT3 Lib "f3biprct.dll" ()
Private Declare Sub ADJCLAIM Lib "Kypos\EXINCOR.DLL" (Lactcode As String, Lclmrec As String)


Private Sub Class_Initialize()

Call JMPCINT2

End Sub

Private Sub Class_Terminate()

Call JMPCINT3

End Sub

Public Function CallExincor(actcode As String, clmrec As String)

Call JMPCINT2

Dim Cactcode As String
Dim Cclmrec As String
Cactcode = actcode
Cclmrec = clmrec
Call ADJCLAIM(Cactcode, Cclmrec)
clmrec = Cclmrec

Call JMPCINT3

End Function


Any help greatfully appreciated.

00100b

Try specifying the actual full path in the API declaration instead of using the virtual directory.

CodeButcher

I am sorry. I should have gone a bit farther with my description.

I have tried using a full path name. I have tried placing the dll in the local directory and refering to it directly. I have tried using the name of the dll both with and without the extension.

I have checked the path in the environment variables and the path is present. I added my local folder to the path when trying to call it locally to no avail.

I have commented the call in the dll and tested it with success, but without the processing of the data. The variable were passed back (with no change of course) and the entire thing worked as expected. The Application that I am passing the data to is a tested system so I just know I am so close I can smell success.

Please .... any further suggestions?