加入收藏 | 设为首页 | 会员中心 | 我要投稿 李大同 (https://www.lidatong.com.cn/)- 科技、建站、经验、云计算、5G、大数据,站长网!
当前位置: 首页 > 大数据 > 正文

vb.net 教程 8-3 数据库操作8

发布时间:2020-12-16 23:51:48 所属栏目:大数据 来源:网络整理
导读:本节再接再厉,看看数据库还有些什么样的架构。 上一节的学习,我们已经知道使用 OleDbConnection . GetOleDbSchemaTable来获得数据库的架构, GetOleDbSchemaTable 的声明如下: Public Functio n GetOleDbSchemaTable ( schema As Guid,restrictions As Ob

本节再接再厉,看看数据库还有些什么样的架构。

上一节的学习,我们已经知道使用 OleDbConnection.GetOleDbSchemaTable来获得数据库的架构,

GetOleDbSchemaTable 的声明如下:

Public Function GetOleDbSchemaTable ( schemaAs Guid,restrictions AsObject() ) As DataTable

schema是System.Data.OleDb.OleDbSchemaGuid类,实际使用的时候是使用的OleDbSchemaGuid 的值之一,

它指定要返回的架构表。MSDN解释中指明了该类有很多静态成员(以下是部分):

为了看看所有的表架构信息,可以将OleDbSchemaGuid成员一一列出来,再根据成员写代码,

但是

很麻烦。

所以

本例子中将使用一点高级的技术——反射:Reflection

通过反射获得所有的成员信息:

    Private Sub Form2_Load(sender As Object,e As EventArgs) Handles MyBase.Load
        Dim OleDbSchemaGuidType As Type = GetType(OleDbSchemaGuid)
        For Each OleDbSchemaGuidType_Member As Reflection.MemberInfo In OleDbSchemaGuidType.GetMembers
            If OleDbSchemaGuidType_Member.MemberType = Reflection.MemberTypes.Field Then
                ComboBox1.Items.Add(OleDbSchemaGuidType_Member.Name)
            End If
        Next
    End Sub
运行时可以看到,在ComboBox中列出了所有的 OleDbSchemaGuid成员:

按下按钮后根据选择的表架构类型获得相应的信息填充到DataGridView中:

    Private Sub Button14_Click(sender As Object,e As EventArgs) Handles Button14.Click
        Dim OleDbSchemaGuidType As Type = GetType(OleDbSchemaGuid)
        For Each OleDbSchemaGuidType_Member As Reflection.MemberInfo In OleDbSchemaGuidType.GetMembers
            If OleDbSchemaGuidType_Member.Name = ComboBox1.Text Then

                Dim odc As New OleDbConnection()
                odc.ConnectionString = "Provider = Microsoft.ACE.OLEDB.12.0;data source=D:save博客教程8 数据库Northwind.mdb"
                Try
                    odc.Open()
                    Dim dt As DataTable
                    dt = odc.GetOleDbSchemaTable(OleDbSchemaGuidType.InvokeMember(OleDbSchemaGuidType_Member.Name,Reflection.BindingFlags.GetField,Nothing,Nothing),Nothing)  ' (OleDbSchemaGuidType_Member.DeclaringType,Guid),Nothing)

                    DataGridView1.DataSource = dt

                Catch ex As Exception
                    MessageBox.Show("错误信息:" & ex.Message)
                Finally
                    odc.Close()
                End Try

            End If
        Next
    End Sub
比如选择Columns的架构信息:

当然并不是所有的架构信息都支持mdb数据库,幸好我们在代码中设置了Try...Catch...防止错误发生导致程序崩溃,仅仅出现一个提示:


由于本章属于数据库操作,所以对于反射不会详细讲解,大家掌握数据架构相关知识就行了。

以后有机会再慢慢讲讲反射。


由于.net平台下C#和vb.NET很相似,本文也可以为C#爱好者提供参考。

学习更多vb.net知识,请参看vb.net 教程 目录

(编辑:李大同)

【声明】本站内容均来自网络,其相关言论仅代表作者个人观点,不代表本站立场。若无意侵犯到您的权利,请及时与联系站长删除相关内容!

    推荐文章
      热点阅读