... += "HAVING Dia = 0 " txSql += "GROUP BY cod_imovel, cod_locat, dia " txSql += "ORDER BY cod_imovel, cod_locat" ***conexão expressa HEHEHEHE try oRs := CreateObject("ADODB.RecordSet") oRs:CursorLocation := adUseClient oRs:LockType := adLockOptimistic oRs:CursorType ...