title image


Smiley Re: Komme ich an die Feldbeschreibungen ran ???
Über die Description-Property des entsprechenden Field-Objekts (DAO!):Private Function GetDescr(TblName, FldName)Dim DB As database, Fld as Field, Tbl as TabledefSet DB = CurrentdBOn error resume next Set Tbl = DB.Tabledefs(TblName) Set Fld = Tbl.Fields(FldName) Set Tmp = "" Set Tmp = Fld.Properties("Description") GetDescr = Tmpend FunctionReinhard


Gruß aus dem Norden
Reinhard


Bitte immer die Access-Version angeben!
DB-Wiki


Wie man Fragen richtig stellt

YaccessAccess-FAQUnd ansonsten: Wikipedia




geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: