>
>Доступ к бд через ADO

>Команда.CommandText = "CREATE TABLE ..."
>RecordSet = CreateObject("ADODB.RecordSet");
>RecordSet = Команда.Execute; //создаем таблицу

//создаем новую запись

RecordSet.AddNew(); - Это не может работать по определению, с
CommandText = "CREATE TABLE ...", этот запрос не возвращает рекордсета..
Надо писать

Команда.CommandText = "CREATE TABLE хх..."
RecordSet = CreateObject("ADODB.RecordSet");
Команда.Execute; //создаем таблицу
Команда.CommandText = "Select * from хх..."
RecordSet = Команда.Execute; //создаем таблицу
RecordSet.AddNew();