Standardwert f?r ein Datenbankfeld festlegen (DAO) Mit diesem Code l?sst sich der Standardwert eines Access-Datenbankfeldes im Nachhinein ?ndernh / festlegen.
Autor:   Dieter Otter	Bewertung:     [ Jetzt bewerten ]	Views:  2.286
www.tools4vb.de	System:  Win9x, WinNT, Win2k, WinXP, Vista, Win7, Win8	kein Beispielprojekt

Geben Sie hier Ihre persönliche Bewertung ab! Bisher wurde noch keine Bewertung abgegeben.

sehr gut     gut     nützlich     mittelmäßig     mangelhaft

Heute möchten wir Ihnen zeigen, wie sich der Standard-Wert eines Access-Datenbankfeldes im Nachhinein ändern bzw. neu festlegen lässt.

' Datenbank öffnen
Dim oDb As DAO.Database
Set oDb = DBEngine.OpenDatabase("...")

Der Standardwert wird über die Properties-Auflistung der jeweiligen Tabelle festgelegt:

' Standardwert des Datenbankfeldes festlegen
With oDb.TableDefs("Tabellenname")
  .Fields("Feldname").Properties("DefaultValue") = ...
End With

Das war's dann auch schon.