关于用ADOX创建表，但是连接的时候有时候找到该表，有时候又找不到(100分)

我是用ADOX创建表的
var
cat: Variant;
s: string;
begin
Cat := CreateOleObject('ADOX.Catalog');
cat.ActiveConnection := Format(rsCCreateMDB, [ADBName]);
tb := CreateOleObject('ADOX.Table');
tb.Name := ATableName;
AppendAllFields(ADSFrom); //该过程创建字段
cat.Tables.Append(tb);
tb := Unassigned;
end;

问题是：创建完之后，我用ADO相连，报错，说所指定的表名没有创建，然后我跟踪
进去，发现有时又是好的。打开数据库，发现表也已经创建了。
不知道为什么，希望各位大侠帮忙！谢谢。

up

断开再连接。

这个问题已经解决了，但是
用添加字段时，我用的ADOXTable.Columns.Append(FieldName, FieldType, DataSize);

可是Adox默认的添加的字段的Attributes值是0，而我要求adColNullable。
于是我采用先创建一个Column，设置完各个属性在添加到表里。但
它提示我：多步OLE DB操作产生错误。不知怎么办。

我已经解决了。

你的速度还真快，我还没来得及看 你都全解决了。