seek 命令示例

在下面的示例中，先打开 customer 表，并按 company 字段建立索引。然后，用 seek 命令查找与内存变量 gcseekval 的值相匹配的索引关键字表达式。

close databases
open database (home( ) + 'samples\data\testdata')
use customer order company && 打开 customer 表

set exact off
store 'b' to gcseekval
seek gcseekval

if found( )
display fields company, contact
endif