关于adox??
大家好!我 想请教一个问题,代码如下:
Public Sub CreateMDB(ByVal strDatabasePath As String)
On Error GoTo ErrTrap
Set CAT = New ADOX.Catalog
' ===[Create Database]===
CAT.Create "Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=" & strDatabasePath & ";" & _
"Jet OLEDB:Database Password=" & strPWD & ";" & _
"Jet OLEDB:Engine Type=5;"
CreateTables
CreateIndexes
CreateKeys
Set CAT = Nothing
Exit Sub
ErrTrap:
MsgBox Err.Number & " / " & Err.Description
Exit Sub
Resume
End Sub
请问代码中Set CAT = New ADOX.Catalog的具体含义是什么啊?我不清楚ADOX具体又什么功能,同时Catalog的含义又是什么?我的MSDN上好像没有他们的详细帮助,请高手指点啊 ,最好详细一点!
问题点数：40、回复次数：3Top
1 楼ljhdi（ ）回复于 2005-04-16 09:23:39 得分 10
只用过adox建表，得到数据库中的表名，修改表的字段属性Top
2 楼remotesea（）回复于 2005-04-16 09:59:42 得分 0
谢谢你的答复!
请问能否说一下Catalog的具体作用,很感谢Top
3 楼zichen66（）回复于 2005-04-16 10:07:14 得分 30
ADOX:ADO的安全擴展,它用數據定義語言的能力擴大了標准ADODB庫,例如它擴展了枚舉表,視圖和數據庫中存儲過程的能力,以及創建新表,視圖和存儲過程的能力,ADO還有其他的擴展,如在線分析進程(OLAP)操作的ADOMD庫和對Microsoft Jet 復制的支持.
Catalog(目錄)對象:是ADOX結構的一個進入點,它代表數據庫,且包括所有表,存儲過程,視圖,用戶和用戶組,Catalog對象允許用戶完成兩種不同的:枚舉現存數據庫中的對象,或從一點創建一個新數據庫.
它包含以下五個集合:
Tables:下面包含Table對象,Table對象又包含 Clumns,Indexes,Keys集合,這些集合下還有相應的對象
Views:下面包含View對象
Procedures:下面包含Procedure對象
Groups:下面包含Group對象,Group對象又包含 Users集合,Users集合下包含User對象
Users:下面包含User對象,User對象下包含Groups集合,Groups集合下包含Group對象
其中:
Table對象:所有數據庫中的表均包含在Tables集合中,利用它你可以枚舉數據庫中所有表和每個表中的所有列:
Dim tbl as Adox.Table,Col AS Adox.Column
For Each Tbl In Catalog對象的實例.Tables
Print "Table:" & Tbl.Name
Print "Field List============="
For Each Col In Tbl.Columns
Print " " & Col.Name
Next
Next
View 和 Procedure對象分別代表數據庫中的視圖和存儲過程
而Group 和 User 對象它包含能訪問一些或所有數據庫對象的成組用戶和單個用戶,但Sqlserver 和Oracle及ODBC驅動不支持 Groups 和 Users 集合Top
