Forums Neueste Beiträge
 

Feldtype als Text ausgeben

04/02/2010 - 09:41 von Lupus Goebel | Report spam
Hallöschen,

damit lese ich den Typ von einer Tabelle aus

\\\
Dim db As Database
Dim tbl As TableDef
Dim fld As Field

Set db = CurrentDb()

Set tbl = db.TableDefs("tblLogin")
For Each fld In tbl.Fields
Debug.Print fld.Type, fld.Name
Next

Set tbl = Nothing
Set db = Nothing
///

Jedoch liefert mir der teil "fld.Type" einfach nur eine Zahl und kein
Text. Kann ich mir unter Access 2003 den Typnamen ausgeben lassen?

MfG - Lupus Goebel
Der Sumpf- Morasthobbybastler und Anfaenger mit
Wissensdurst (http://www.lupusdw.de http://foto.lupusdw.de)
Urlaub macht man in Irland: http://www.eaglesnest-bb.com/
 

Lesen sie die antworten

#1 Peter Doering
04/02/2010 - 09:49 | Warnen spam
Hallo,

Lupus Goebel wrote:

damit lese ich den Typ von einer Tabelle aus

\\\
Dim db As Database
Dim tbl As TableDef
Dim fld As Field

Set db = CurrentDb()

Set tbl = db.TableDefs("tblLogin")
For Each fld In tbl.Fields
Debug.Print fld.Type, fld.Name
Next

Set tbl = Nothing
Set db = Nothing
///

Jedoch liefert mir der teil "fld.Type" einfach nur eine Zahl und kein
Text. Kann ich mir unter Access 2003 den Typnamen ausgeben lassen?



Hatte ich erst vor kurzem gepostet:

http://google.com/groups?selm=7qe3r...vidual.net

Gruss - Peter

Mitglied im http://www.dbdev.org
FAQ: http://www.donkarl.com

Ähnliche fragen