adding field to table index via VB

  • Thread starter Thread starter Virgil
  • Start date Start date
V

Virgil

Here's a tricky question for you. Is it possible to add a
table field to an already established table index via VB?
Tried this method and it failed at the Append fld line:
Dim db As DAO.Database
Dim tbl As TableDef
Dim fld As Field
Dim idx As Index
Dim fld As Field
Dim i As Integer, x As Integer

Set db = CurrentDb()
Set tbl = db.TableDefs("table name")
Set idx = tbl.Indexes("PrimaryKey")
Set fld = idx.CreateField("field name")
idx.Fields.Append fld
 
Here's a tricky question for you. Is it possible to add a
table field to an already established table index via VB?
Tried this method and it failed at the Append fld line:
Dim db As DAO.Database
Dim tbl As TableDef
Dim fld As Field
Dim idx As Index
Dim fld As Field
Dim i As Integer, x As Integer

Set db = CurrentDb()
Set tbl = db.TableDefs("table name")
Set idx = tbl.Indexes("PrimaryKey")
Set fld = idx.CreateField("field name")
idx.Fields.Append fld
Click to expand...

look in the help file for CreateField Method
 
I don't believe it is. I believe you would have to drop the existing index
and create a new one.

--
Brendan Reynolds (MVP)
http://brenreyn.blogspot.com

The spammers and script-kiddies have succeeded in making it impossible for
me to use a real e-mail address in public newsgroups. E-mail replies to
this post will be deleted without being read. Any e-mail claiming to be
from brenreyn at indigo dot ie that is not digitally signed by me with a
GlobalSign digital certificate is a forgery and should be deleted without
being read. Follow-up questions should in general be posted to the
newsgroup, but if you have a good reason to send me e-mail, you'll find
a useable e-mail address at the URL above.
 
Back
Top