Run Sub in MS Access using OLE

Fredmeu

New Member
Hi all,

I hope you can help me out on this one....(progress v8)

After setting up a connection from Progress to MS ACCESS,
I'm trying to pass some progress values to an access sub(procedure)

Currently i'm using the following command from progress:

chAccessApplication:Run(sub_nm#, param1#).

where sub_nm# contains the name of the access sub(procedure)
and param1# the value I want to give to the first parameter in the access subfunction.

i.e. chAccessApplication:Run("Dump.FillVariables","test").

In my accessdb I ofcourse have project Dump and function "FillVariables".
Below my VB code in the function;

Static Function FillVariables(Optional ByVal Tst As String)
MsgBox Tst
End Function


Now when I run the progress code I get errormessage that the
input/output modus of the parameter is incorrect (progress error 5900).

However when I remove param1# from my call

chAccessApplication:Run("Dump.FillVariables").

the code suddenly DOES work....

I'm at a loss as to how I can correctly pass my progress values to the MS access function, so any input is much appreciated...

Fred van der Meulen
Vitalogic
The Netherlands
 
Back
Top