使用adox示例

创建一个名为test.mdb的新的Microsoft Access数据库，其中表中有两个列，COL1和COL2.

Public Class Form1

 

    Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs)

        ' Create SQL and Connection strings

        Dim ConnectionString As String = "Provider=Microsoft.Jet.OLEDB.4.0; DataSource=c:\Test.mdb"

 

        Try

            ' Create a Catalog object

            Dim ct As New Catalog()

            ct.Create(ConnectionString)

 

            ' Create a table and two columns

            Dim dt As New Table()

            dt.Name = "MyTable"

            dt.Columns.Append("col1", DataTypeEnum.adInteger, 4)

            dt.Columns.Append("col2", DataTypeEnum.adVarWChar, 255)

 

 

            'Add table to the tables collection

            ct.Table.Append(DirectCast(dt, Object))

 

        Catch exp As Exception

            MessageBox.Show(exp.Message.ToString())

        End Try

    End Sub

End Class

Microsoft ActiveX数据为数据定义语言和安全性(ADOX)设计的对象扩展是一个ADO的扩展，并提供对象模型来操作数据定义和安全性。

只需使用VS .NET的"添加引用"参考选项添加对Adox类型库的引用，并根据在非托管代码中使用命名空间及其成员。