On Aug 23, 2:03 am, ch...@kissolutions.net wrote:
Quote:
Hi
>
I have a simple split db, that I want to create a backend table with
Fields, PK, Indexes and Formats.
>
The problem I am getting is the Error No 3219 from this line of code:-
fldInd.Properties.Append prpFld
>
"You tried to append a property to a Properties collection of an
object that does not support user-defined properties. "
>
Set tdfEmpHrs = dbLink.CreateTableDef("tblEmpHrs")
'Create Fields
With tdfEmpHrs
>
'St Date - Create
Set fldInd = .CreateField("EmpHrsSt", dbDate)
.Fields.Append fldInd
'Properties
Set prpFld = fldInd.CreateProperty("Format")
prpFld.Type = dbText 'or
dbDate
prpFld.Value = "Short Date"
fldInd.Properties.Append prpFld
fldInd.Properties.Refresh
>
Ive tried this line of code too to Format the Date Field, with the
same error:-
>
Set prpFld = fldInd.CreateProperty("Format", dbDate or
dbText, "Short Date")
fldInd.Properties.Append prpFld
>
Im not sure why you have to use dbText Data Type in a dbDate Field,
but I saw it on one of Allen Browne's reply to a posting!
>
Any help would be appreciated!
>
Thanks for your time and efforts!
>
Chris - Sydney Australia
It isn't possible to add a field to a linked table through code.