при таком вот запросе?
ТекстЗапроса = "Select * from ART";

можно, но тогда запрос должен быть к системной табличке... вроде бы.

SELECT `COLUMN_NAME`
FROM `INFORMATION_SCHEMA`.`COLUMNS`
WHERE `TABLE_SCHEMA`='yourdatabasename'
    AND `TABLE_NAME`='yourtablename'

(0) пробегись по RecordSet.Fields

для индекс = 0 по recordset.fields.count - 1 цикл
    сообщить(recordset.fields(индекс));
конеццикла;

поправочка

сообщить(recordset.fields(индекс).name);

(4) OLE.Field
(5) ааа
Спасибо! :)

(0) и для тех, кто в танке
есть ADOX
MyCat=Новый COMОбъект ("ADOX.Catalog");
    MyCat.ActiveConnection = MyCon;
    Для Ст=0 По MyCat.Tables.Count() Цикл
...

(7) Лишнее

(8) тупое

(9) Поостри тут ещё...
Есть recordset.fields.
Остальное лишнее. Как и комментарии

(8) Лишнее - это * в селекте
((