title image


Smiley Die Informationen...
findest du in der Properties-Auflistung des Field-Objekts (Property "Rowsource"!):



Public Function ShowTableFieldProperties(TblName As String, FldName As String)

Dim Tmp, DB As Database, tbl As TableDef, Fld As Field, Prp As Property

Set DB = CurrentDb

Set tbl = DB.TableDefs(TblName)

Set Fld = tbl.Fields(FldName)

For Each Prp In Fld.Properties

Tmp = ""

On Error Resume Next

Tmp = Prp.value

On Error goto 0

Debug.Print Prp.Name, Prp.Type, Tmp

Next

End Function



Was deine andere Frage angeht: Schau dir mal den Total Access Detective von FMS Inc. an.


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: