| db databasePath rs | databasePath := 'Sample.sqlite' asLocalPathName. db := FMDatabase withPath: databasePath. db open ifTrue: [ rs := db executeQuery: 'select * from Books where Pages > 200'. [rs next ] whileTrue: [ self print: (' // ', (rs stringForColumn: 'Title')). ]. db close. ].