如何获得visual foxpro数据库中的所有表名，和某个表中的所有字段名
如何获得visual foxpro数据库中的所有表名，和某个表中的所有字段名　　请大神帮助。小弟感激不尽！

[解决办法]
OPEN DATABASE 数据库名称
FOR I=1 TO ADDOBJECTS(BB,"TABLE")
? BB(I) &&数据库表名称
ENDFOR

USE 数据表名称

FOR I=1 TO FCOUNT()
? FIELD(I) &&数据表字段名
ENDFOR
[解决办法]
用 ADO的OPENSCHEMA OR ADOX取得