我前面的代码有问题,字段名前要加表别名。向楼主表示歉意!
CLEAR
CREATE CURSOR test (a1 c(10), a2 c(10))
IF TYPE("test.a3") == "U"
? "不存在"
ALTER TABLE test ADD a3 c(20)
ELSE
? "存在"
ALTER TABLE test drop a1
ALTER TABLE test ADD a1 c(20)
ENDIF
BROWSE
CLEAR
CREATE CURSOR test (a1 c(10), a2 c(10))
IF TYPE("test.a3") == "U"
? "不存在"
ALTER TABLE test ADD a3 c(20)
ELSE
? "存在"
ALTER TABLE test drop a1
ALTER TABLE test ADD a1 c(20)
ENDIF
BROWSE
坚守VFP最后的阵地