>Yes you can!
>local lError
>on error lError=.t.
>lConnHandle=SQLCONNECT("upsize")
>on error
>IF lError=.t.
> = MESSAGEBOX('Cannot make connection. Try entering your UserID and Password again.',;
> 16, 'SQL Connect Error')
> ThisForm.txtUserID.SetFocus
>ELSE
> ThisForm.Release
>ENDIF

It almost worked. The error was still displaying. I discovered if I added =DBSETPROP('upsize','connection','DispWarnings',.f.) it works! I can only assume the error I was getting was a 'non-trappable error' and setting DispWarnings to .F. disables display of the error.

Jeff