如何检测一个表的某列都是空数据呢
比如 一个dbf 有N个字段 其中部分字段的所有行（记录）都是空 如何把这些空字段 找出来呢
2013-06-05 15:59
2013-06-05 16:02
2013-06-05 16:05
2013-06-05 16:08
2013-06-05 16:18
2013-06-05 16:18
程序代码：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
2013-06-05 16:27