Re: Modify Access 97 tables in Access 2003



You can use DAO (or ADOX, for that matter). The following code, run from
Access 2003, successfully created a table in my Access 97 database just now:

Sub ManipulateAccess97()
Dim db97 As DAO.Database
Dim tdfNew As TableDef
Dim strPath As String

strPath = "D:\Access.97\Test97.mdb"

Set db97 = OpenDatabase(strPath)
Set tdfNew = db97.CreateTableDef("From2003")

With tdfNew
.Fields.Append .CreateField("FirstName", dbText)
.Fields.Append .CreateField("LastName", dbText)
.Fields.Append .CreateField("Phone", dbText)
.Fields.Append .CreateField("Notes", dbMemo)
End With

db97.TableDefs.Append tdfNew
Set db97 = Nothing

End Sub

--
Doug Steele, Microsoft Access MVP
http://I.Am/DougSteele
(no private e-mails, please)


"Rick" <Rick@xxxxxxxxxxxxxxxxxxxxxxxxx> wrote in message
news:9A8E877A-4B2C-4931-B1F6-FE90DDA37651@xxxxxxxxxxxxxxxx
How do I modify an Access 97 table using Access 2003 without converting
the
database? Is there any tool available?




.



Relevant Pages

  • Re: Modify Access 97 tables in Access 2003
    ... Dim tdfNew As TableDef ... Set db97 = OpenDatabase ... .Fields.Append .CreateField("FirstName", dbText) ... Doug Steele, Microsoft Access MVP ...
    (microsoft.public.access.conversion)
  • setting index on temporary table
    ... I have created a temporary database and table that is then linked to my front ... Set tdfNew = dbsTemp.CreateTableDef ... .Fields.Append .CreateField("SecuritySymbol", dbText) ... .Fields.Append .CreateField("TotalCost", dbDouble) ...
    (microsoft.public.access.modulesdaovba)