I am trying to rename MSAccess tables in VB using ADO.
I have tried the following but it failed :
Dim cat As New ADOX.Catalog
Dim tbl As New ADOX.Table
'Open the Catelog cat.ActiveConnection =
"Provider=Microsoft.Jet.OLEDB.3.51;Persist Security Info=False;Data
Source=C:\Directory\MSAccessFile.mdb"
Set tbl = cat.Tables("Old_Name")
tbl.Name = "New_Name"
Set cat = Nothing
Any suggestions would be much appreciated.
Thanks
David