字段a1，字符型，
记录1、111
记录2、x
记录3、111
记录4、x
记录5、x
记录6、x
记录7、111
记录8、111
记录9、x
记录10、x
记录11、111
...........
........
........
删除后要
记录1、111
记录2、x
记录3、111
记录4、x
记录5、111
记录6、111
记录7、x
记录8、111
...........
........
........
要删除a1='x'的记录，但要保留上下非‘x’值之间a1='x'的记录

dele for a1='x'

刚才的说错了，应该把两个A！为X的和不为X的分别复制到两个不同的表中

USE 表
T0=0
TA=A1
SCAN
DO CASE
CASE EMPTY(A1)=.T. .AND. T0=0 &&A1为空记录，并且是第一个
T0=1
CASE EMPTY(A1)=.T. .AND. T0=1 &&A1为空记录，并且是连续时，删除
DELE
CASE EMPTY(A1)=.T. &&A1不是空记录，将标志归0，等待下一个A1为空记录
T0=0
ENDC
ENDS
PACK


仅供参考。

请问楼主：如果第一条记录等于‘X’是否保留，最后一条记录等于‘X’是否保留

这类问题 用sql较佳, 如果已有编号, 一句代码即可~