Try
=SQLSETPROP(0,"DispWarnings",.f.)
=SQLSETPROP(0,"DispLogin",3)
sqlHandler = SQLSTRINGCONNECT(your_conn_string)
IF sqlHandler < 0
MESSAGEBOX([No connection])
AERROR(err_array)
MESSAGEBOX(err_array(1,2))
ENDIF
_______________________________________________________________
Testing displays the presence, not the absence of bugs.
If a software application has to be designed, it has to be designed correctly!
_______________________________________________________________
Vladimir Zografski
Systems Analyst
