Access新手来看:如何更改表/窗体/报表...得名字

<script type="text/javascript"><!-- google_ad_client = "pub-2947489232296736"; /* 728x15, 创建于 08-4-23MSDN */ google_ad_slot = "3624277373"; google_ad_width = 728; google_ad_height = 15; //--> </script> <script type="text/javascript" src="http://pagead2.googlesyndication.com/pagead/show_ads.js"> </script>
<script type="text/javascript"><!-- google_ad_client = "pub-2947489232296736"; /* 160x600, 创建于 08-4-23MSDN */ google_ad_slot = "4367022601"; google_ad_width = 160; google_ad_height = 600; //--> </script><script type="text/javascript" src="http://pagead2.googlesyndication.com/pagead/show_ads.js"> </script>

新手来看:如何更改表/窗体/报表...得名字

 

问题:

如何更改表或者其他数据库对象得名字

 


方法一:


更改表名,调用 ADOX 即可 (测试环境为ADOX2.7)
Function Test()
    Debug.Print renameTableName("b", "cxcd")
End Function
Function renameTableName(strOldName As String, strNewName As String) As Boolean
    On Error Resume Next
    Dim tbl As ADOX.Table
    Dim cat As New ADOX.Catalog
    Set cat.ActiveConnection = CurrentProject.Connection
    '上面这句中 CurrentProject.Connection 在VB中要更改为已经open的connection对象
    For Each tbl In cat.Tables
        If tbl.Name = strOldName Then tbl.Name = strNewName
    Next
    If Err.number <> 0 Then
        renameTableName = False
    Else
        renameTableName = True
    End If
End Function

 

方法二:


请使用  DoCmd.Rename "新表名", acTable, "原表名"
 来完成
请多参考帮助
以下摘自Access2000帮助
Rename 方法

Rename 方法在 Visual Basic 中执行 Rename 操作。

expression.Rename(NewName, ObjectType, OldName)

expression   必需。返回 DoCmd 对象的表达式。

NewName  Variant 型,必需。字符串表达式,代表要重新命名的对象的新名称。这个新名称必须符合 Microsoft Access 对象的对象命名规则。

ObjectType  AcObjectType,可选。要重命名的对象的类型。

AcObjectType 可以是下列 AcObjectType 常量之一: 
acDataAccessPage 
acDefault 默认 
acDiagram 
acForm 
acFunction 
acMacro 
acModule 
acQuery 
acReport 
acServerView 
acStoredProcedure 
acTable 

OldName  Variant 型,可选。字符串表达式,代表由 ObjectType 参数指定的类型的有效对象名称。如果在某个类库数据库中执行包含 Rename 方法的 Visual Basic 代码,Microsoft Access 将首先在该类库数据库中搜索具有该名称的对象,然后再到当前数据库中搜索。

说明
有关该操作及其参数如何工作的详细信息,请参阅该操作的主题。

如果将 ObjectType 和 OldName 参数留空(对于 ObjectType 参数,假设其为默认常量,即 acDefault),Microsoft Access 将重新命名在“数据库”窗口中选择的对象。若要选择“数据库”窗口中的对象,可以使用 SelectObject 操作或 SelectObject 方法,并将“在‘数据库’窗口中”参数设为“是”(True)。

如果将 ObjectType 和 OldName 参数留空,则在 NewName 参数后面不要使用逗号。

示例
下面的示例对“Employees”表进行重命名。

DoCmd.Rename "Old Employees Table", acTable, "Employees"


 

<script type="text/javascript"><!-- google_ad_client = "pub-2947489232296736"; /* 728x15, 创建于 08-4-23MSDN */ google_ad_slot = "3624277373"; google_ad_width = 728; google_ad_height = 15; //--> </script> <script type="text/javascript" src="http://pagead2.googlesyndication.com/pagead/show_ads.js"> </script>
<script type="text/javascript"><!-- google_ad_client = "pub-2947489232296736"; /* 160x600, 创建于 08-4-23MSDN */ google_ad_slot = "4367022601"; google_ad_width = 160; google_ad_height = 600; //--> </script><script type="text/javascript" src="http://pagead2.googlesyndication.com/pagead/show_ads.js"> </script>
阅读更多
个人分类: 数据库
想对作者说点什么? 我来说一句

图书管理系统

2015年06月03日 9.09MB 下载

没有更多推荐了,返回首页

加入CSDN,享受更精准的内容推荐,与500万程序员共同成长!
关闭
关闭