>clear > >lcDbc = "C:\Program Files\microsoft visual foxpro 9\Samples\Data\testdata.dbc " >lcConnStr = "DRIVER=Microsoft Visual FoxPro Driver; " + ; > "Deleted=Yes; Null=Yes; Collate=Machine; " + ; > "BackgroundFetch=No ; " + ; > "Exclusive=No; " + ; > "SourceType=DBC; " + ; > "SourceDB=" + lcDbc > >lnConn = SqlStringConnect(lcConnStr) >IF lnConn < 0 > ? "Connection error" > AERROR(aErrInfo) > ? aErrInfo[2] > _cliptext= aErrInfo[2] > >ENDIF >>