如何获得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取得