>lcFolder = "H:\TEMP\sdffiles" >lcSdfFile = "tempsdf.txt" >lcSchemaFile = "schema.ini" > >* Create test SDF file >TEXT TO lcStr NOSHOW >AAAAA00005555BBBBBB >CCCCC00003556CCCCCC >QREWW00432445GFDGDF >ENDTEXT >STRTOFILE(lcStr, lcFolder + "\" + lcSdfFile) > >* Create Column definition for the ODBC driver >TEXT TO lcStr TEXTMERGE NOSHOW >[<<lcSdfFile>>] >ColNameHeader = False >Format = FixedLength >MaxScanRows=0 >CharacterSet=OEM >Col1 = FLD01 char width 5 >Col2 = FLD02 char width 8 >Col3 = FLD03 char width 6 >ENDTEXT > >STRTOFILE(lcStr, lcFolder + "\" + lcSchemaFile) > >lcConnStr = "DRIVER={Microsoft Text Driver (*.txt; *.csv)};DBQ=" + lcFolder + ";" >lnConn = SQLSTRINGCONNECT(lcConnStr) >IF lnConn < 0 > * Error > =AERROR(laError) > ? ALLTRIM( laError[1,2] ) > RETURN >ENDIF > >oCA = CREATEOBJECT("CursorAdapter") >oCA.DataSourceType = "ODBC" >oCA.DataSource = lnConn >oCA.SelectCmd = "SELECT * FROM " + lcSdfFile >oCA.Alias = "crsSdfText" >oCA.CursorFill() >BROWSE >>