Sim, poderá nomear todas as tabelas ao sair da sua aplicação, renomeando-as corretamente após acessar a aplicação da forma certa, caso contrário a aplicação perde a funcionalidade.
Public Sub Remove_Prefix()
Dim obj As AccessObject
Dim dbs As Object
Set dbs = Application.CurrentData
'Search for open AccessObject objects in AllTables collection.
For Each obj In dbs.AllTables
'If found, remove prefix
If Left(obj.Name, 4) = "dbo_" Then
DoCmd.Rename Mid(obj.Name, 5), acTable, obj.Name
End If
Next obj
End Sub
Tags: Access, prefix, rename, remove, SQL, Table, tabela, renomear, dbo, prefixo,

Nenhum comentário:
Postar um comentário