opret felt i backend via frontend

Jeg kan ikke huske syntaksen 100%, men det ser nogenlunde således ud:

    Dim db as database
    Dim prpLoop As Property
    Dim tdef as DAO.tabledef
    Set db = Opendatabase("C:\Dokumenter\DinDatabase.mdb")
    Set tdef = db.CreateTableDef("NyTabel")
    With tdef
        .Fields.Append .CreateField("FirstName", dbText)
        .Fields.Append .CreateField("LastName", dbText)
        .Fields.Append .CreateField("Phone", dbText)
        .Fields.Append .CreateField("Notes", dbMemo)
    End With
    db.TableDefs.Append tdef

Du behøver da vist ikke denne:
Dim prpLoop As Property

hmmm ja men jeg skal ikke tilføje ny tabel
kun eet felt

Jeg prøvede denne men den opretter vist ikke noget felt


Dim dbs As Database
Dim Rst As DAO.Recordset
Dim tbl, flt, typ
    Dim tdf As TableDef
    Dim fldLoop As Field
'Her skrives navnet på den tabel der skal ændres
tbl = "Produkter"
' her skrives navnet på det felt der skal tilføjes
flt = "test"
'her skrives den type felte skal have ,
typ = "dbInteger"
    Set dbs = OpenDatabase(getbackendnameandpath(-1))
    Set tdf = dbs.TableDefs!produkter

 
    tdf.CreateField flt, dbInteger

nåå, jeg må lære at læse en af de nærmeste dage ;o)

Prøv denne:
    Dim db as database
    Dim tdef as DAO.tabledef
    Set db = Opendatabase("C:\Dokumenter\DinDatabase.mdb")
    Set tdef = db.tabledefs("NyTabel")
    With tdef
        .Fields.Append .CreateField("FirstName", dbText)
    End With

du er en engel kunne squtte får det hele til at passe
synes også denne linje er mærkelig  forstår ikke det mellemrum der er efter append
  .Fields.Append .CreateField("FirstName", dbText)

I dette tilfælde ville det også være lettere at skrive således:
tdef.Fields.Append tdef.CreateField("FirstName", dbText)

i stedet for:

With tdef
  .Fields.Append .CreateField("FirstName", dbText)
End With

Giver det mere mening?

ja tror jeg er med .
er det sikker mht til at lukke forbindelsen til backenden igen. så jeg ikke får nogle problemer når de bruger frontenden videre efter denne. skal man muligvis opdater kæderne igen eller ?

Sålænge, det er rent Access, så tror jeg ikke, at der er nogle problemer. Det var noget andet, hvis backend f.eks. var SQL server.

Men jeg kan kun sige: prøv!

Jeg har ikke selv prøvet det før....

ok takker endnu engang for alles....