... Static oSAY, cSAY, oSAY1, cSAY1 //------------------------------------------- Func Access() LOCAL oErr, SAYING, cFILENUM, oCN, cNAME, nLEN, nPOS, oRs, oDLG LOCAL lOK SET CENTURY on SET EPOCH to 1990 SET DELETED on oRs := CREATEOBJECT( "ADODB.Recordset" ) TRY oRS:Open( "SELECT ...