Feldtype eine Tabelle erfragen

[Optiplex]

Hallo zusammen,
Ich benötige den Feldtyp ( Text; Zahl ) aus einer Tabelle (Tabelle1). Ich habe bis jetzt folgendes

  Dim TblDef As DAO.TableDef
  Dim DB As DAO.Database
  Dim Fld As DAO.Field
 
  Set DB = Application.CurrentDb
  Set TblDef = DB.TableDefs(TabellenName)
  Set Fld = TblDef.Fields(FeldName)
  GetFieldType = Fld.Type           -----> ist das die benötigete Eigenschaft ?

Was ist der Rückgabewert für GetFieldType (long oder )  und gibt es konstanten für den Rückgabewert wobei ich die für TEXT und Zahl benötige.

Gruß Dieter

[DF6GL]

Hallo,

Cursor auf "Type" platzieren und F! drücken.

[oma]

Hallo,

sorry, hatte die Frage nicht richtig gelesen

Gruß Oma

[lumbumba]

GetFieldType sollte typ Long sein.
Die entsprechenden Konstanten und deren Werte sind dann

dbBoolean = 1
dbByte = 2
dbInteger = 3
dbLong = 4
dbCurrency = 5
dbSingle = 6
dbDouble = 7
dbDate = 8
dbBinary = 9
dbText = 10
dbLongBinary = 11
dbMemo = 12
dbGUID = 15
dbBigInt = 16
dbVarBinary = 17
dbChar = 18
dbNumeric = 19
dbDecimal = 20
dbFloat = 21
dbTime = 22
dbTimeStamp = 23     

[Optiplex]

Danke lumbumba,
genau das wollte ich wissen. Ich gehe mal davon aus, dass ich die richtige Eigenschaft (Type) abfrage?

@DF6GL
Ich wusste nicht ob ich die richtige Eigenschaft abfrage, sonst hätte ich zuerst in der Hilfe nachgesehen. Ich hätte zwar dann die Konstanten gefunden aber nicht deren Wertigkeit und schon gar nicht den Datentyp für die Rückgabe. In der Hilfe steht eben auch nicht alles.

Gruß
Dieter

[lumbumba]

Ja.

[Optiplex]

Danke lumbumba,
hast mir sehr geholfen

Gruß Dieter