FiveTech Software tech support forums

FW,

May I know those who had experienced using FiveODBC.

Thanks,

Jose

What I mean is how's the performance, specially with MS SQL server.

Thanks.

It works fine, but you should upgrade to FWH 32 bits, as it offers a much better integration with the operating system.

Antonio,

Our base code is in Clipper 5.2. I tried to convert them to xHarbour but there are issues like Telepathy lib which don't have 32 bits version and several C codes that generates errors, when linked. I looked for 32 bit version as you suggested but Extransensory Software do not have 32 bit version of Telepathy.

For now, we are trying to connect our program to SQL server for possible enhancement.

I am able to connnect using FiveODBC but it returns only one record.

Heres the code taken from your example.

******************
Function LS_odbc()
******************
Local oODBC := TOdbc():New "DsnEntry", "YourName", "YourPassword")

If !oOdbc:lSuccess
oOdbc:ShowErrorList("ODBC session not successfully initialized, aborting...")
oOdbc:End()
return nil
Endif
*oDbf := oOdbc:Query( "SELECT * FROM JOURNAL" )
Odbf := TdbOdbcDirect():New("SELECT * FROM JOURNAL WHERE JRDATE = '10/6/06' ORDER BY JRDATE, JRTIME", oOdbc)
if oOdbc:IsError()
oOdbc:ShowErrorList()
oOdbc:aErrors := {}
oDbf:End()
return nil
endif
oDbf:Open()

*oDBF:goBottom()
*msginfo(str(ODbf:recNO()))
*msgInfo(oDBF:jrzday)
*Browse( cTitle, cListName, bNnew, bModify, bDelete, bSearch, bList )
copy to tmp
Browse("Journal")
return nil

Note:
The browse shows one record only.
The tmp file contain one record only.

Can we keep clipper 5.2 and accomplish FiveODBC? Just let me know if it possible.

We don't need to convert to 32 bit right now since Clipper 5.2 version looks stable.

Gracias,

-jose

Jose,

Have you checked at the ODBC database that there are more than one record matching that SQL sentence ?

Antonio,

Thanks for the quick reply.

Yes, there are over 60 rows when I querry it from SQL.

Jose

after line
oDbf:Open()

you must add

oDbf:Complete()


regards Eugeniusz

Eugeniusz,

Thanks for the hint. It works.

Regards,

Jose