Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Re: autoincrement feld einfügen
Autor: Prian0815
Datum: 24.10.07 16:24
Hi Zwackel, Hab zum Thema gerade noch das hier für ADO gefunden, vielleicht hilfts dir ja irgendwie weiter. Zumindest kann ich mir vorstellen, dass sowas mit ADO besser funzt als mit DAO. Folgender Code erstellt in der vorhandenen Tabelle 'relAuftragMeldung' das Feld vom Type 'Byte': Private Sub CreateField() Dim vCat As ADOX.Catalog Dim vTable As ADOX.Table Dim vCol As ADOX.Column Set vCat = CreateObject("ADOX.Catalog") vCat.ActiveConnection = con 'con ist die bereits geöffnete verbindung Set vTable = vCat.Tables("relAuftragMeldung") Set vCol = CreateObject("ADOX.Column") 'feld definieren With vCol .Name = "ZustGeladenKnz" .Type = adUnsignedTinyInt Set .ParentCatalog = vCat .Properties("Default") = 0 .Properties("Jet OLEDB:Allow Zero Length") = True .Properties("Nullable") = True End With 'feld anfügen vTable.Columns.Append vCol ' Objekte zerstören Set vCat = Nothing Set vTable = Nothing Set vCol = Nothing End Sub Gruß Armin P.S.: always look on the bright side of Life!

autoincrement feld einfügen	1.263	Zwackel	24.10.07 13:57
Re: autoincrement feld einfügen	705	Prian0815	24.10.07 16:24
Re: autoincrement feld einfügen	693	Zwackel	24.10.07 20:52
Re: autoincrement feld einfügen	673	Dieter	26.10.07 07:45

Sie sind nicht angemeldet! Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden. Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  Gesamtübersicht

Suchen