關(guān)于ADOX的相關(guān)知識
更新時間：2006年12月26日 00:00:00 作者：
轉(zhuǎn)自：http://blog.junstudio.org/article.asp?id=262
一、ADOX 概述
Microsoft? ActiveX? Data Objects Extensions for Data Definition Language and Security (ADOX) 是對 ADO 對象和編程模型的擴展。ADOX 包括用于模式創(chuàng)建和修改的對象，以及安全性。由于它是基于對象實現(xiàn)模式操作，所以用戶可以編寫對各種數(shù)據(jù)源都能有效運行的代碼，而與它們原始語法中的差異無關(guān)。
ADOX 是核心 ADO 對象的擴展庫。它顯露的其他對象可用于創(chuàng)建、修改和刪除模式對象，如表格和過程。它還包括安全對象，可用于維護用戶和組，以及授予和撤消對象的權(quán)限。
要通過開發(fā)工具使用 ADOX，需要建立對 ADOX 類型庫的引用。對 ADOX 庫的說明為“Microsoft ADO Ext. for DDL and Security.”。ADOX 庫文件名為“Msadox.dll”，程序 ID (ProgID) 為“ADOX”。有關(guān)建立庫引用的詳細信息，請參閱開發(fā)工具的文檔。
二、ADOX 對象
Catalog 包含描述數(shù)據(jù)源模式目錄的集合。
Column 表示表、索引或關(guān)鍵字的列。
Group 表示在安全數(shù)據(jù)庫內(nèi)有訪問權(quán)限的組帳號。
Index 表示數(shù)據(jù)庫表中的索引。
Key 表示數(shù)據(jù)庫表中的主關(guān)鍵字、外部關(guān)鍵字或唯一關(guān)鍵字。
Procedure 表示存儲的過程。
Table 表示數(shù)據(jù)庫表，包括列、索引和關(guān)鍵字。
User 表示在安全數(shù)據(jù)庫內(nèi)具有訪問權(quán)限的用戶帳號。
View 表示記錄或虛擬表的過濾集。
三、ADOX 方法
Append（Columns） 將新的 Column 對象添加到 Columns 集合。
Append（Groups） 將新的 Group 對象添加到 Groups 集合。
Append（Indexes） 將新的 Index 對象添加到 Indexes 集合。
Append（Keys） 將新的 Key 對象添加到 Keys 集合。
Append（Procedures） 將新的 Procedure 對象添加到 Procedures 集合。
Append（Tables） 將新的 Table 對象添加到 Tables 集合。
Append（Users） 將新的 User 對象添加到 Users 集合。
Append（Views） 將新的 View 對象添加到 Views 集合。
ChangePassword 更改用戶帳號的密碼。
Create 創(chuàng)建新的目錄。
Delete 刪除集合中的對象。
GetObjectOwner 返回目錄中對象的擁有者。
GetPermissions 獲得對象上組或用戶的權(quán)限。
Item 按名稱或序號返回集合的指定成員。
Refresh 更新集合中的對象，以反映針對提供者可用的和指定的對象。
SetObjectOwner 指定目錄中對象的擁有者。
SetPermissions 設(shè)置對象上組或用戶的權(quán)限。
四、ADOX 屬性
ActiveConnection 指示目錄所屬的 ADO Connection 對象。
Attributes 描述列特性。
Clustered 指示索引是否被分簇。
Command 指定可用于創(chuàng)建或執(zhí)行過程的 ADO Command 對象。
Count 指示集合中的對象數(shù)量。
DateCreated 指示創(chuàng)建對象的日期。
DateModified 指示上一次更改對象的日期。
DefinedSize 指示列的規(guī)定最大大小。
DeleteRule 指示主關(guān)鍵字被刪除時將執(zhí)行的操作。
IndexNulls 指示在索引字段中有 Null 值的記錄是否有索引項。
Name 指示對象的名稱。
NumericScale 指示列中數(shù)值的范圍。
ParentCatalog 指定表或列的父目錄以便訪問特定提供者的屬性。
Precision 指示列中數(shù)據(jù)值的最高精度。
PrimaryKey 指示索引是否代表表的主關(guān)鍵字。
RelatedColumn 指示相關(guān)表中相關(guān)列的名稱（僅關(guān)鍵字列）。
RelatedTable 指示相關(guān)表的名稱。
SortOrder 指示列的排序順序（僅索引列）。
Type(列) 指示列的數(shù)據(jù)類型。
Type（關(guān)鍵字） 指示關(guān)鍵字的數(shù)據(jù)類型。
Type（表） 指示表的類型。
Unique 指示索引關(guān)鍵字是否必須是唯一的。
UpdateRule 指示主關(guān)鍵字被更新時會執(zhí)行的操作。
五、范例
5.1 創(chuàng)建數(shù)據(jù)庫范例
如下代碼顯示如何通過 Create 方法創(chuàng)建新的 Jet 數(shù)據(jù)庫。
Sub CreateDatabase()
Dim cat As New ADOX.Catalog
cat.Create "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\new.mdb"
End Sub
5.2 創(chuàng)建表范例
Sub CreateTable()
Dim tbl As New Table
Dim cat As New ADOX.Catalog
'打開目錄。
' 打開目錄。
cat.ActiveConnection = _
"Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=c:\Program Files\Microsoft Office\" & _
"Office\Samples\Northwind.mdb;"
tbl.Name = "MyTable"
tbl.Columns.Append "Column1", adInteger
tbl.Columns.Append "Column2", adInteger
tbl.Columns.Append "Column3", adVarWChar, 50
cat.Tables.Append tbl
End Sub
5.3 創(chuàng)建索引范例
如下代碼演示如何創(chuàng)建新的索引。索引針對表的兩個列建立。
Sub CreateIndex()
Dim tbl As New Table
Dim idx As New ADOX.Index
Dim cat As New ADOX.Catalog
' 打開目錄。
' 打開目錄。
cat.ActiveConnection = _
"Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=c:\Program Files\Microsoft Office\" & _
"Office\Samples\Northwind.mdb;"
' 定義表并將其追加到目錄
tbl.Name = "MyTable"
tbl.Columns.Append "Column1", adInteger
tbl.Columns.Append "Column2", adInteger
tbl.Columns.Append "Column3", adVarWChar, 50
cat.Tables.Append tbl
' 定義多列索引
idx.Name = "multicolidx"
idx.Columns.Append "Column1"
idx.Columns.Append "Column2"
' 將索引追加到表上
tbl.Indexes.Append idx
End Sub
5.4 創(chuàng)建關(guān)鍵字范例
如下代碼演示如何創(chuàng)建新的外部關(guān)鍵字。假定已存在兩個表（Customers 和 orders）。
Sub CreateKey()
Dim kyForeign As New ADOX.Key
Dim cat As New ADOX.Catalog
cat.ActiveConnection = "Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=c:\Program Files\Microsoft Office\" & _
"Office\Samples\Northwind.mdb;"
kyForeign.Name = "CustOrder"
kyForeign.Type = adKeyForeign
kyForeign.RelatedTable = "Customers"
kyForeign.Columns.Append "CustomerId"
kyForeign.Columns("CustomerId").RelatedColumn = "CustomerId"
kyForeign.UpdateRule = adRICascade
cat.Tables("Orders").Keys.Append kyForeign
End Sub
一、ADOX 概述
Microsoft? ActiveX? Data Objects Extensions for Data Definition Language and Security (ADOX) 是對 ADO 對象和編程模型的擴展。ADOX 包括用于模式創(chuàng)建和修改的對象，以及安全性。由于它是基于對象實現(xiàn)模式操作，所以用戶可以編寫對各種數(shù)據(jù)源都能有效運行的代碼，而與它們原始語法中的差異無關(guān)。
ADOX 是核心 ADO 對象的擴展庫。它顯露的其他對象可用于創(chuàng)建、修改和刪除模式對象，如表格和過程。它還包括安全對象，可用于維護用戶和組，以及授予和撤消對象的權(quán)限。
要通過開發(fā)工具使用 ADOX，需要建立對 ADOX 類型庫的引用。對 ADOX 庫的說明為“Microsoft ADO Ext. for DDL and Security.”。ADOX 庫文件名為“Msadox.dll”，程序 ID (ProgID) 為“ADOX”。有關(guān)建立庫引用的詳細信息，請參閱開發(fā)工具的文檔。
二、ADOX 對象
Catalog 包含描述數(shù)據(jù)源模式目錄的集合。
Column 表示表、索引或關(guān)鍵字的列。
Group 表示在安全數(shù)據(jù)庫內(nèi)有訪問權(quán)限的組帳號。
Index 表示數(shù)據(jù)庫表中的索引。
Key 表示數(shù)據(jù)庫表中的主關(guān)鍵字、外部關(guān)鍵字或唯一關(guān)鍵字。
Procedure 表示存儲的過程。
Table 表示數(shù)據(jù)庫表，包括列、索引和關(guān)鍵字。
User 表示在安全數(shù)據(jù)庫內(nèi)具有訪問權(quán)限的用戶帳號。
View 表示記錄或虛擬表的過濾集。
三、ADOX 方法
Append（Columns） 將新的 Column 對象添加到 Columns 集合。
Append（Groups） 將新的 Group 對象添加到 Groups 集合。
Append（Indexes） 將新的 Index 對象添加到 Indexes 集合。
Append（Keys） 將新的 Key 對象添加到 Keys 集合。
Append（Procedures） 將新的 Procedure 對象添加到 Procedures 集合。
Append（Tables） 將新的 Table 對象添加到 Tables 集合。
Append（Users） 將新的 User 對象添加到 Users 集合。
Append（Views） 將新的 View 對象添加到 Views 集合。
ChangePassword 更改用戶帳號的密碼。
Create 創(chuàng)建新的目錄。
Delete 刪除集合中的對象。
GetObjectOwner 返回目錄中對象的擁有者。
GetPermissions 獲得對象上組或用戶的權(quán)限。
Item 按名稱或序號返回集合的指定成員。
Refresh 更新集合中的對象，以反映針對提供者可用的和指定的對象。
SetObjectOwner 指定目錄中對象的擁有者。
SetPermissions 設(shè)置對象上組或用戶的權(quán)限。
四、ADOX 屬性
ActiveConnection 指示目錄所屬的 ADO Connection 對象。
Attributes 描述列特性。
Clustered 指示索引是否被分簇。
Command 指定可用于創(chuàng)建或執(zhí)行過程的 ADO Command 對象。
Count 指示集合中的對象數(shù)量。
DateCreated 指示創(chuàng)建對象的日期。
DateModified 指示上一次更改對象的日期。
DefinedSize 指示列的規(guī)定最大大小。
DeleteRule 指示主關(guān)鍵字被刪除時將執(zhí)行的操作。
IndexNulls 指示在索引字段中有 Null 值的記錄是否有索引項。
Name 指示對象的名稱。
NumericScale 指示列中數(shù)值的范圍。
ParentCatalog 指定表或列的父目錄以便訪問特定提供者的屬性。
Precision 指示列中數(shù)據(jù)值的最高精度。
PrimaryKey 指示索引是否代表表的主關(guān)鍵字。
RelatedColumn 指示相關(guān)表中相關(guān)列的名稱（僅關(guān)鍵字列）。
RelatedTable 指示相關(guān)表的名稱。
SortOrder 指示列的排序順序（僅索引列）。
Type(列) 指示列的數(shù)據(jù)類型。
Type（關(guān)鍵字） 指示關(guān)鍵字的數(shù)據(jù)類型。
Type（表） 指示表的類型。
Unique 指示索引關(guān)鍵字是否必須是唯一的。
UpdateRule 指示主關(guān)鍵字被更新時會執(zhí)行的操作。
五、范例
5.1 創(chuàng)建數(shù)據(jù)庫范例
如下代碼顯示如何通過 Create 方法創(chuàng)建新的 Jet 數(shù)據(jù)庫。
Sub CreateDatabase()
Dim cat As New ADOX.Catalog
cat.Create "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\new.mdb"
End Sub
5.2 創(chuàng)建表范例
Sub CreateTable()
Dim tbl As New Table
Dim cat As New ADOX.Catalog
'打開目錄。
' 打開目錄。
cat.ActiveConnection = _
"Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=c:\Program Files\Microsoft Office\" & _
"Office\Samples\Northwind.mdb;"
tbl.Name = "MyTable"
tbl.Columns.Append "Column1", adInteger
tbl.Columns.Append "Column2", adInteger
tbl.Columns.Append "Column3", adVarWChar, 50
cat.Tables.Append tbl
End Sub
5.3 創(chuàng)建索引范例
如下代碼演示如何創(chuàng)建新的索引。索引針對表的兩個列建立。
Sub CreateIndex()
Dim tbl As New Table
Dim idx As New ADOX.Index
Dim cat As New ADOX.Catalog
' 打開目錄。
' 打開目錄。
cat.ActiveConnection = _
"Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=c:\Program Files\Microsoft Office\" & _
"Office\Samples\Northwind.mdb;"
' 定義表并將其追加到目錄
tbl.Name = "MyTable"
tbl.Columns.Append "Column1", adInteger
tbl.Columns.Append "Column2", adInteger
tbl.Columns.Append "Column3", adVarWChar, 50
cat.Tables.Append tbl
' 定義多列索引
idx.Name = "multicolidx"
idx.Columns.Append "Column1"
idx.Columns.Append "Column2"
' 將索引追加到表上
tbl.Indexes.Append idx
End Sub
5.4 創(chuàng)建關(guān)鍵字范例
如下代碼演示如何創(chuàng)建新的外部關(guān)鍵字。假定已存在兩個表（Customers 和 orders）。
Sub CreateKey()
Dim kyForeign As New ADOX.Key
Dim cat As New ADOX.Catalog
cat.ActiveConnection = "Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=c:\Program Files\Microsoft Office\" & _
"Office\Samples\Northwind.mdb;"
kyForeign.Name = "CustOrder"
kyForeign.Type = adKeyForeign
kyForeign.RelatedTable = "Customers"
kyForeign.Columns.Append "CustomerId"
kyForeign.Columns("CustomerId").RelatedColumn = "CustomerId"
kyForeign.UpdateRule = adRICascade
cat.Tables("Orders").Keys.Append kyForeign
End Sub
相關(guān)文章
大家都知道SQL注入對于網(wǎng)站或者服務器來講都是一個非常危險的問題，如果這一方面沒處理好的話網(wǎng)站可能隨時給注入了，所以這篇文章就給大家總結(jié)了node-mysql中防止SQL注入的幾種常用做法，有需要的朋友們可以參考借鑒。2016-10-10
數(shù)據(jù)庫命名規(guī)范，在實際的數(shù)據(jù)庫開發(fā)中，需要注意。2009-03-03
公司要在openEuler系統(tǒng)中安裝openGauss數(shù)據(jù)庫,經(jīng)過幾天的查資料,終于是安裝成功了,并且能在navicat中遠程連接使用,本文給大家介紹如何使用navicat遠程連接openGauss,感興趣的朋友跟隨小編一起看看吧2023-10-10
首先說明的盲注是注入的一種，指的是在不知道數(shù)據(jù)庫返回值的情況下對數(shù)據(jù)中的內(nèi)容進行猜測，實施SQL注入。盲注一般分為布爾盲注和基于時間的盲注。這篇文章主要講解的是基于布爾的盲注。下面來一起看看吧。2016-09-09
數(shù)據(jù)設(shè)計之權(quán)限的實現(xiàn)
這篇文章主要介紹了數(shù)據(jù)設(shè)計之權(quán)限的實現(xiàn)，文章圍繞主題展開詳細的內(nèi)容介紹，具有一定的參考價值，需要的朋友可以參考一下2022-08-08
數(shù)據(jù)庫查詢優(yōu)化(主從表的設(shè)計)
寫過許多的數(shù)據(jù)庫查詢語句，面對過許多的問題，也在磕磕碰碰中學到了很多東西。昨天在看系統(tǒng)數(shù)據(jù)庫設(shè)計與SQL代碼時，突然“發(fā)現(xiàn)”了許多平常不屑看到的問題，于是就萌生了把它提出來思考的念頭2013-08-08
剛進公司的時候，研究的主要是SQL注入，因為之前沒有搞過安全，所有費了好長一段時間對SQL注入基本知識進行了解。所以這篇文章并不是什么很深入的技術(shù)博客，或許應該叫它‘ SQL注入掃盲 ’有需要的朋友可以參考學習，下面來一起看看吧。2017-01-01
時序數(shù)據(jù)庫TDengine寫入查詢的問題分析
最近TDengine很火，本人也一直很早就有關(guān)注，其官方給出的測試性能結(jié)果很喜人，所以一開源，本人就進行了相關(guān)調(diào)研，最終發(fā)現(xiàn)還是存在著一定的問題，期待后續(xù)的完善吧2022-03-03
這篇文章主要介紹了JDBC常用接口總結(jié)，以及部分使用代碼語句，需要的朋友可以參考下。2017-09-09
今天小編就為大家分享一篇關(guān)于數(shù)據(jù)庫語言分類DDL、DCL、DML詳解，小編覺得內(nèi)容挺不錯的，現(xiàn)在分享給大家，具有很好的參考價值，需要的朋友一起跟隨小編來看看吧2019-03-03