I am trying to get a Visual Basic Active X to work in Foxpro. I do not know VB very well. The Command I am trying to get to work is as follows in VB:

Dim TopLeftX As Long
Dim TopLeftY As Long
Dim BottomRightX As Long
Dim BottomRightY As Long
Dim PageNo As Integer
Dim strBarcode As String

strBarcode = SoftekBarcode1.GetBarString(i)
PageNo = SoftekBarcode1.GetBarStringPos(1, TopLeftX, TopLeftY, BottomRightX, BottomRightY)

My implementation in VFP (I have tried several variations) is as follows:

PUBLIC TopLeftX, TopLeftY, BottomRightX, BottomRightY as Long


lcPage = thisform.OLEreader.GetBarStringPos (1, TopLeftX, TopLeftY, BottomRightX, BottomRightY)

I am getting an OLE Error stating that OLE error code 0x80020005: Type Mismatch.

I assume it is because the variable type is not right.

Am I missing something here. All other OLE commands work just fine. Can Anybody help.

Thanks

Larry