如何检测一个表的某列都是空数据呢
比如 一个dbf 有N个字段 其中部分字段的所有行(记录)都是空 如何把这些空字段 找出来呢
CLEAR CREATE CURSOR T (A C(10),B D,C N(2)) INSERT INTO T VALUES ([123],{},2) INSERT INTO T VALUES ([],{},2) INSERT INTO T VALUES ([],{},0) LOCAL DELFIELD(RECCOUNT()) STORE [] TO DELFIELD FOR I=1 TO RECCOUNT() COUNT FOR EMPTY(EVALUATE(FIELD(I))) TO X IF X=RECCOUNT() MESSAGEBOX([字段]+FIELD(I)+[中所有记录为空]) DELFIELD(I)=FIELD(I) ENDIF ENDFOR FOR I=1 TO RECCOUNT() IF TYPE(FIELD(I))!=[U] AND NOT EMPTY(DELFIELD(I)) ALTER TABLE T DROP &DELFIELD(I) ENDIF ENDFOR BROWSE