User Defined Property bei DAO.Field

11/08/2009 - 16:16 von Christian | Report spam
Hallo an alle,

ich möchte einem "Field"-objekt eine Benutzerdefinierte Eigenschaft zuweisen.
Bislang habe ich das so:

Dim prpNew As DAO.Property
Dim fldField As DAO.Field
...
Set fldField = rsCompactedRS.Fields(strName)
Set prpNew = fldField.CreateProperty("IsEqual", DB_BOOLEAN)
prpNew.Value = True
fldField.Properties.Append prpNew
...

Und in der letzten Zeile bleibt er hàngen mit der Aussage:
"Run-time error '3219':
Invalid operation."

Was mache ich falsch?
Vielen Dank im Voraus!

Viele Grüße,
Christian
 

Lesen sie die antworten

#1 Mark Doerbandt
11/08/2009 - 16:42 | Warnen spam
Hallo, Christian,

Christian:

Dim prpNew As DAO.Property
Dim fldField As DAO.Field
...
Set fldField = rsCompactedRS.Fields(strName)
Set prpNew = fldField.CreateProperty("IsEqual", DB_BOOLEAN)
prpNew.Value = True
fldField.Properties.Append prpNew
...

Und in der letzten Zeile bleibt er hàngen mit der Aussage:
"Run-time error '3219':
Invalid operation."

Was mache ich falsch?



versuche mal, CreateProperty nicht vom Field, sondern vom
Database-Objekt aufzurufen. Das Backend ist Access!?

Gruss - Mark

Informationen fuer Neulinge in den Access-Newsgroups unter
http://www.doerbandt.de/Access/Newbie.htm

Bitte keine eMails auf Newsgroup-Beitràge senden.

Ähnliche fragen