Anlegen von schreibbaren Systemtabellen
rkos
Gesendet: 07.05.12 09:41
Betreff: Anlegen von schreibbaren Systemtabellen


Hi an alle,

ich möchte gerne die beiden Systemtabellen MSysIMEXSpecs und MSysIMEXColumns per VBA anlegen, falls sie noch nicht vorhanden sind. MIt dem Code:

db.CreateTableDef("MSysIMEXSpecs" , dbSystemObject)

und den diversen CreateField() und CurrentDb.TableDefs.Append Aufrufen, entsteht eine System Table, die aber leider nicht beschreibbar ist. Nach einigen Herumprobieren, ist mir aufgefallen, dass die per code erzeugten Tabellen in ihrem Feld "Attributes" immer den Wert -2147483646 stehen haben, wohingegen diese Tabellen, wenn man sie durch einen Import/Export übers Menü implizit erzeugt, immer den Wert 2 besitzen. Auch nachträgliches Zuordnen des Attributes Wertes oder explizit 2 oder 2& im Aufruf statt der dbSystemObject Konstante haben nix gebracht. (Das Attribut "Updatebale" ist in beiden Fällen der Erzeugung immer true)

Daher meine Frage: Wie kann man mit VBA eine vom User beschreibbare Systemtabelle anlegen?

Gruß Robert

PS: ich verwende Acc 2010 / Windows 7
Top of the page Bottom of the page